Операторы BULK COLLECT / FORALL с динамическим запросом и именем таблицы - Oracle PL / SQL

Мне нужна помощь в оптимизации этого запроса для использования операторов массового сбора и сбора данных. Я создал резервные таблицы (BCK_xxxx) для копирования всех данных из исходных таблиц (ORIG_xxx), но у меня возникают проблемы с преобразованием их в массовый сбор. Большинство примеров, которые я видел в BULK collect, уже включают определение имени и структуры таблицы с использованием% rowtype. Однако у меня есть сотни таблиц для резервного копирования, поэтому мне нужно, чтобы мой запрос, в частности, имя таблицы было динамическим. Это мой исходный запрос, который вставляет / удаляет данные один за другим без массового сбора и занимает много времени:

DECLARE
--select all table names from backup tables (ex: BCK_tablename)
CURSOR cur_temp_tbl IS
    SELECT table_name
    FROM all_tables 
    WHERE OWNER = 'BCKUP'
    ORDER BY 1;  

--select all table names from original tables (ex: ORIG_tablename)
 CURSOR cur_original_tbl IS
    SELECT table_name
    FROM all_tables 
    WHERE OWNER = 'ORIG'
    ORDER BY 1;    
    l_tbl_nm VARCHAR2(30 CHAR);

BEGIN
    --first loop to delete all tables from backup
    FOR a IN cur_temp_tbl LOOP
       l_tbl_nm := a.table_name;                                    
       EXECUTE IMMEDIATE 'DELETE FROM '||  l_tbl_nm;
       l_deleted_cnt :=  l_deleted_cnt +1;            
    END LOOP;

    --second loop to insert data from original to backup        
    FOR b IN cur_original_tbl LOOP            
         l_tbl_nm := b.table_name;   
        CASE
          WHEN INSTR(l_tbl_nm,'ORIG_') > 0 THEN
          l_tbl_nm := REPLACE(l_tbl_nm,'ORIG_','BCK_');
          ELSE
           l_tbl_nm := 'BCK_' || l_tbl_nm;
        END CASE;  

        EXECUTE IMMEDIATE 'INSERT INTO '  || l_tbl_nm || ' SELECT * FROM ' || b.table_name;
        l_inserted_cnt :=  l_inserted_cnt +1;
    END LOOP; 

    dbms_output.put_line('Deleted/truncated tables from backup :' ||l_deleted_cnt);
    dbms_output.put_line('No of tables inserted with data from original to backup :' ||l_inserted_cnt);
EXCEPTION
 WHEN OTHERS THEN
 dbms_output.put_line(SQLERRM);
 dbms_output.put_line(l_tbl_nm);
END;

Я подумываю включить приведенный ниже код для добавления после второго цикла, но у меня проблемы с объявлением курсора cur_tbl и типа данных TABLE «l_tbl_data». Я не могу использовать rowtype, поскольку имя таблицы должно быть динамическим и будет меняться на каждой итерации моего второго цикла, в котором будут перечислены все имена таблиц из исходной таблицы:

TYPE CurTblTyp  IS REF CURSOR;
cur_tbl    CurTblTyp; 
TYPE l_tbl_t IS TABLE OF tablename.%ROWTYPE;
l_tbl_data l_tbl_t ;

OPEN cur_tbl FOR  'SELECT * FROM  :s ' USING b.table_name;
FETCH cur_tbl BULK COLLECT INTO l_tbl_data LIMIT 5000;
EXIT WHEN cur_tbl%NOTFOUND;     
CLOSE cur_tbl;         

FORALL i IN 1 .. l_tbl_data .count
EXECUTE IMMEDIATE 'insert into '||l_tbl_nm||' values (:1)' USING 
l_tbl_data(i);

Надеюсь, вы поможете мне и подскажете, как я могу сделать этот код намного проще. Большое спасибо.