[PL/SQL]FOR文で配列の要素を取得する

2014年10月28日2021年8月25日

構文
FOR 変数名　IN 配列名.FIRST..配列名.LAST
LOOP 処理コード
END LOOP;

使用例

CREATE OR REPLACE PROCEDURE CFTPROC

TYPE TMD IS TABLE OF VARCHAR2(25) INDEX BY BINARY_INTEGER;

GRADE TMD;

BEGIN

GRADE(0) := 'A';

GRADE(1) := 'B';

GRADE(2) := 'C';

GRADE(3) := 'D';

FOR J IN GRADE.FIRST..GRADE.LAST

LOOP

DBMS_OUTPUT.PUT_LINE(GRADE(J));

END LOOP;

END;

CREATE OR REPLACE PROCEDURE CFTPROC IS TYPE TMD IS TABLE OF VARCHAR2(25) INDEX BY BINARY_INTEGER; GRADE TMD; BEGIN GRADE(0) := 'A'; GRADE(1) := 'B'; GRADE(2) := 'C'; GRADE(3) := 'D'; FOR J IN GRADE.FIRST..GRADE.LAST LOOP DBMS_OUTPUT.PUT_LINE(GRADE(J)); END LOOP; END;

CREATE OR REPLACE PROCEDURE CFTPROC
IS
    TYPE TMD IS TABLE OF VARCHAR2(25) INDEX BY BINARY_INTEGER;
    GRADE TMD;
BEGIN
      GRADE(0) := 'A';
      GRADE(1) := 'B';
      GRADE(2) := 'C';
      GRADE(3) := 'D';

    FOR J IN GRADE.FIRST..GRADE.LAST
      LOOP
      DBMS_OUTPUT.PUT_LINE(GRADE(J)); 
      END LOOP;
END;

Oracle

Posted by arkgame

関連投稿: