将循环中的 oracle 关联数组附加到该循环中的另一个关联数组

Question

我正在尝试在具有动态 SQL 的循环内进行批量收集，并根据来自循环的输入执行多次，然后插入表中（插入 193234 条记录大约需要 4 分钟）。 为了尝试不同的不同方法，我想在循环内对 select 使用批量收集并在该循环的每次迭代中填充一个集合让我们说第一次迭代给出 10 行，然后第二次给出 0 行，第三次返回 15 行，然后是集合应该在循环结束时保存 15 条记录。 退出循环后，我将使用 forall 与我在循环内部填充的集合一起执行插入操作，而不是为循环内部的每次迭代执行插入操作。

下面是一个类似于应用程序的示例代码，我只是使用不同的表格来简化问题。

create table test_tab as select owner, table_name, column_name from all_tab_cols where 1=2;

create or replace procedure p_test
as

  l_sql varchar2(4000);
  type t_tab is table of test_tab%rowtype index by pls_integer;
  l_tab t_tab;
  l_tab1 t_tab;
  l_cnt number := 0;

begin

for i in (with tab as (select 'V_$SESSION' table_name from dual 
                       union all
                       select 'any_table'  from dual
                       union all
                       select 'V_$TRANSACTION' from dual
                       union all
                       select 'test_table' from dual
                       )
                    select table_name from tab )
loop
  
  l_sql := 'select owner, table_name, column_name from all_tab_cols where table_name = '''||i.table_name||'''';
  
 -- dbms_output.put_line(l_sql );
  execute immediate l_sql bulk collect into l_tab;
  
  dbms_output.put_line(l_sql ||' > '||l_tab.count);
  l_cnt := l_cnt +1;
  
  if l_tab.count<>0
  then
    l_tab1(l_cnt) := l_tab(l_cnt);
  end if;  
    
end loop;  
  dbms_output.put_line(l_tab1.count);
  forall i in indices of l_tab1
  insert into test_tab values (l_tab1(i).owner, l_tab1(i).table_name, l_tab1(i).column_name);

end;

它只在 test_tab 表中插入 2 行，而根据我的系统，它应该插入 150 行。

select owner, table_name, column_name from all_tab_cols where table_name = 'V_$SESSION' > 103
select owner, table_name, column_name from all_tab_cols where table_name = 'any_table' > 0
select owner, table_name, column_name from all_tab_cols where table_name = 'V_$TRANSACTION' > 47
select owner, table_name, column_name from all_tab_cols where table_name = 'test_table' > 0
2

以上是我系统中的 DBMS_OUTPUT 如果示例表名在您的数据库中不存在，您可以在循环中更改表名。

甲骨文版本——

Oracle Database 19c Standard Edition 2 Release 19.0.0.0.0 - Production

Answer 1

首先，不要为此使用关联数组集合，只需使用嵌套表集合类型。您可以使用 MULTISET UNION ALL 运算符连接嵌套表集合（避免使用循环）。

其次，如果您可以在一个查询中完成所有查询并使用IN 语句，请不要执行多个查询；如果您在单个语句中完成所有操作，那么您无需担心连接集合。

第三，如果您可以在单个语句中执行INSERT ... SELECT ...，它将比使用SELECT ... INTO ... 然后单独的INSERT 快得多；这样做意味着您不需要使用任何集合。

create or replace procedure p_test
as
begin
  INSERT INTO test_tab (owner, table_name, column_name)
  select owner, table_name, column_name
  from   all_tab_cols
  where  table_name IN (
           'V_$SESSION',
           'ANY_TABLE',
           'V_$TRANSACTION',
           'TEST_TABLE'
         );
end;
/