Oracle 遍历游标的四种方式汇总（for、fetch、while、BULK COLLECT）

/* 如果是在存储过程外使用显式游标，需要使用DECLARE关键字 */
DECLARE
  /*创建游标*/
  CURSOR CUR_FIRST_INDEX IS
    SELECT A.ID        A_ID, --一级指标ID
           A.INDEXNAME A_INDEXNAME --一级指标名称
      FROM INDEX_A A
     ORDER BY A_ID;
  /*定义游标变量，该变量的类型为基于游标CUR_FIRST_INDEX的行记录*/
  ROW_CUR_FIRST_INDEX CUR_FIRST_INDEX%ROWTYPE;
/*游标处理*/
BEGIN
  /*遍历显式游标*/
  --FOR 循环
  FOR ROW_CUR_FIRST_INDEX IN CUR_FIRST_INDEX LOOP
    --循环体
    DBMS_OUTPUT.PUT_LINE('{"ID":"' || ROW_CUR_FIRST_INDEX.A_ID || '","名称":"' || ROW_CUR_FIRST_INDEX.A_INDEXNAME || '"}');
  END LOOP;
END;　　

/* 如果是在存储过程外使用隐式游标，如果用不到变量无需声明DECLARE关键字 */
/*游标处理*/
BEGIN
  /*遍历隐式游标*/
  --FOR 循环
  FOR ROW_CUR_FIRST_INDEX IN (SELECT A.ID        A_ID, --一级指标ID
                                     A.INDEXNAME A_INDEXNAME --一级指标名称
                                FROM INDEX_A A
                               ORDER BY A_ID) LOOP
    --循环体
    DBMS_OUTPUT.PUT_LINE('{"ID":"' || ROW_CUR_FIRST_INDEX.A_ID || '","名称":"' || ROW_CUR_FIRST_INDEX.A_INDEXNAME || '"}');
  END LOOP;
END;

/*游标声明代码和方式一一致，此处省略，直接展示游标处理代码*/
BEGIN
  /*遍历游标*/
  --FETCH 循环
  OPEN CUR_FIRST_INDEX; --必须要明确的打开和关闭游标
  LOOP
    FETCH CUR_FIRST_INDEX INTO ROW_CUR_FIRST_INDEX;
    EXIT WHEN CUR_FIRST_INDEX%NOTFOUND;
    --循环体
    DBMS_OUTPUT.PUT_LINE('{"ID":"' || ROW_CUR_FIRST_INDEX.A_ID || '","名称":"' || ROW_CUR_FIRST_INDEX.A_INDEXNAME || '"}');
  END LOOP;
  CLOSE CUR_FIRST_INDEX;
END;

/*游标声明代码和方式一一致，此处省略，直接展示游标处理代码*/
BEGIN
  /*遍历游标*/
  OPEN CUR_FIRST_INDEX; --必须要明确的打开和关闭游标
  FETCH CUR_FIRST_INDEX
    INTO ROW_CUR_FIRST_INDEX;
  WHILE CUR_FIRST_INDEX%FOUND LOOP
    --循环体
    DBMS_OUTPUT.PUT_LINE('{"ID":"' || ROW_CUR_FIRST_INDEX.A_ID || '","名称":"' || ROW_CUR_FIRST_INDEX.A_INDEXNAME || '"}');
    FETCH CUR_FIRST_INDEX
      INTO ROW_CUR_FIRST_INDEX;
  END LOOP;
  CLOSE CUR_FIRST_INDEX;
END;　　

/* 如果是在存储过程外使用显示游标，需要使用DECLARE关键字 */
/*声明游标*/
DECLARE
  /*创建显式游标*/
  CURSOR CUR_FIRST_INDEX IS
    SELECT A.ID        A_ID, --一级指标ID
           A.INDEXNAME A_INDEXNAME --一级指标名称
      FROM INDEX_A A
     ORDER BY A_ID;
  /*定义表类型，该表的表结构为游标CUR_FIRST_INDEX的行记录（可以存储多条游标记录）*/
  TYPE TABLE_CUR_FIRST_INDEX IS TABLE OF CUR_FIRST_INDEX%ROWTYPE;
  /* 声明表变量*/
  TAB_FIRST_INDEX TABLE_CUR_FIRST_INDEX;
/*游标处理过程*/
BEGIN
  /*遍历游标*/
  OPEN CUR_FIRST_INDEX;
  LOOP
    --将n行游标数据放到表中
    FETCH CUR_FIRST_INDEX BULK COLLECT
      INTO TAB_FIRST_INDEX LIMIT 1; -- 数据量太少，仅当前测试使用哦，实际开发建议 500 左右
    -- 退出条件
    EXIT WHEN TAB_FIRST_INDEX.COUNT = 0;
    --循环表数据
    FORALL I IN TAB_FIRST_INDEX.FIRST .. TAB_FIRST_INDEX.LAST LOOP
      DBMS_OUTPUT.PUT_LINE('{"ID":"' || TAB_FIRST_INDEX(I).A_ID || '","名称":"' || TAB_FIRST_INDEX(I).A_INDEXNAME || '"}');
    END LOOP;
  END LOOP;
  CLOSE CUR_FIRST_INDEX;
END;