1

動的という名前のランタイム テーブルを作成し、一括更新を使用してテーブルごとにインデックスからデータを挿入しようとしていますが、実行しようとすると次のエラーが発生します。

行 1 のエラー: ORA-06550: 行 0、列 0: PLS-00801: 内部エラー [74301

]

declare

     type index_tbl_type IS table of
        number
     index by binary_integer;
     num_tbl index_tbl_type;
     TYPE ref_cur IS REF CURSOR;
     cur_emp ref_cur;
    begin
         execute immediate 'create table dynamic (v_num number)';--Creating a run time tabl

         FOR i in 1..10000 LOOP
              execute immediate 'insert into dynamic values('||i||')';--run time insert
         END LOOP;
        OPEN cur_emp FOR 'select * from dynamic';--opening ref cursor
            FETCH cur_emp bulk collect into num_tbl;--bulk inserting in index by table
        close  cur_emp;

        FORALL i in num_tbl.FIRST..num_tbl.LAST --Bulk update
             execute immediate 'insert into dynamic values('||num_tbl(i)||')';
    end;
4

2 に答える 2

2

FORALL ステートメントは、SQL ステートメント (INSERT、UPDATE、または DELETE) を想定しています。EXECUTE IMMEDIATE は PL/SQL ステートメントであるため、コードでその例外がスローされます。

この種のスタントを引っ張るのは、プロダクションではお勧めできません。テーブルは、動的 SQL ではなく DDL スクリプトを使用して構築する必要があります。

とにかく、この種の動的スタイルで何かをしたい場合は、次のようにします。

ステップ 1: SQL ステートメントで使用できる SQL タイプを作成する

SQL> create or replace type my_nums as table of number
  2  /

Type created.

SQL>

ステップ 2: PL/SQL の代わりに SQL テーブル タイプを使用する、私のバージョンのプロシージャ。FORALL 句を、TABLE() 句でコレクションを使用する動的 INSERT ステートメントとして書き直しました。

SQL> declare
  2
  3        num_tbl my_nums;
  4        TYPE ref_cur IS REF CURSOR;
  5        cur_emp ref_cur;
  6  begin
  7      execute immediate 'create table dynamic (v_num number)';
  8
  9      FOR i in 1..10000 LOOP
 10           execute immediate 'insert into dynamic values('||i||')'
 11      END LOOP;
 12      OPEN cur_emp FOR 'select * from dynamic';
 13      FETCH cur_emp bulk collect into num_tbl;
 14      close  cur_emp;
 15
 16      execute immediate 
 17         'insert into dynamic select * from table(:1)' using num_tbl;
 18  end;
 19  /

PL/SQL procedure successfully completed.

SQL>

ステップ 3: 動作します

SQL> select count(*) from dynamic
  2  /

  COUNT(*)
----------
     20000

SQL>
于 2010-05-06T16:20:57.110 に答える
-1
DECLARE

            TYPE numlist is table of number index by binary_integer;

            var_num numlist;

BEGIN

            for i in 1..1000 loop

                        var_num(i):=i;

            end loop;

            EXECUTE IMMEDIATE 'create table exe_table(col1 number(10))';

            forall i in var_num.first..var_num.last

                        EXECUTE IMMEDIATE 'INSERT INTO exe_table values(:P)' USING var_num(i);

end loop; 

なぜこれが機能するのですか?

于 2010-05-09T14:20:04.547 に答える