PLSQL FORALL IN INDICES OF

来源：互联网发布：域名授权完整源码编辑：程序博客网时间：2024/04/29 19:51

SQL> DESC TEST01 名前                                               NULL?                型 ----------------------------------------- -------- ---------------------------- A                                                                           NUMBER B                                                                           VARCHAR2(10)SQL> SELECT * FROM TEST01;レコードが選択されませんでした。

 CREATE OR REPLACE PACKAGE PAC1     /*******************************/     -- パッケージを作る     /*******************************/  IS      /******************************/     -- A列用の配列     /******************************/      TYPE A_TAB_TYPE IS TABLE OF TEST01.A%TYPE      INDEX BY BINARY_INTEGER;      A_TAB   A_TAB_TYPE;      /******************************/     --B列用の配列     /******************************/      TYPE B_TAB_TYPE IS TABLE OF TEST01.B%TYPE      INDEX BY BINARY_INTEGER;      B_TAB   B_TAB_TYPE;  END;  /

BEGIN     PAC1.A_TAB(1) := 10;  PAC1.A_TAB(2) := 20;  PAC1.A_TAB(3) := 30;     PAC1.B_TAB(1) := 'A'; PAC1.B_TAB(2) := 'B'; PAC1.B_TAB(3) := 'C';  END;  /

BEGIN    PAC1.A_TAB.DELETE(2);    PAC1.B_TAB.DELETE(2);  END;  /

BEGIN    FORALL  I IN  1..3       INSERT INTO TEST01 (A,B)       VALUES (PAC1.A_TAB(I),PAC1.B_TAB(I));  END; /BEGIN*行1でエラーが発生しました。:ORA-22160: 要素の索引[2]が存在しませんORA-06512: 行2

BEGIN    FORALL  I IN  INDICES OF PAC1.A_TAB       INSERT INTO TEST01 (A,B)       VALUES (PAC1.A_TAB(I),PAC1.B_TAB(I));  END;  /PL/SQLプロシージャが正常に完了しました。

SQL> SELECT * FROM TEST01;         A B---------- ----------        10 A        30 C

0 0