BEGIN
   OPEN l_cursor FOR
      SELECT *
        FROM ela_document
       WHERE id BETWEEN X1 AND X2;

   LOOP
      BEGIN
         FETCH l_cursor BULK COLLECT INTO l_data LIMIT 10000;

         FORALL i IN 1 .. l_data.COUNT
            INSERT /*+ APPEND */
                  INTO  ela_document_copy
                 VALUES l_data (i);

         COMMIT;
      END;

      EXIT WHEN l_cursor%NOTFOUND;
   END LOOP;
END;
/

declare
   TYPE ARRAY IS TABLE OF ela_document%ROWTYPE;

   l_data         ARRAY;
   l_cnt          NUMBER := 0;
   l_obj          BINARY_INTEGER;
   l_log_rindex   BINARY_INTEGER;
   l_log_slno     BINARY_INTEGER;
   l_log_total    NUMBER;
   l_chunk_name   VARCHAR2 (255);
   l_cursor       SYS_REFCURSOR;
   t               NUMBER;
BEGIN
insert into ora_move (text,cdate) values ('START PROG_MOVE_TABLE_10', sysdate);


   OPEN l_cursor FOR
      select d.* from ela_document d 
      where d.elado_document_id in (select id from ela_doc_chunks where chunk# = 10);

commit;

   l_log_total := 7098807;
   l_chunk_name := 'PROG_MOVE_TABLE_10';

   SELECT o.object_id
     INTO l_obj
     FROM user_objects o
    WHERE o.object_type = 'TABLE' AND o.object_name = 'ELA_DOCUMENT';

   DBMS_APPLICATION_INFO.set_client_info ('Move_Table_Chunk');
   l_log_rindex := DBMS_APPLICATION_INFO.set_session_longops_nohint;

   DBMS_APPLICATION_INFO.set_session_longops (l_log_rindex, -- ид. строки в v$session_longops
                                              l_log_slno, -- зарезервировано Oracle
                                              l_chunk_name, -- имя длительной операции
                                              l_obj, -- ид. обрабатываемого объекта
                                              0, -- произвольное число, которое мы хотим публиковать
                                              0,        -- сколько уже сделано
                                              l_log_total, -- сколько всего нужно сделать
                                              'row',    -- одна единица работы
                                              'rows'); -- единицы работы (мн. число)

   LOOP
   BEGIN
   --t := DBMS_UTILITY.get_time;
      FETCH l_cursor BULK COLLECT INTO l_data LIMIT 10000;
   --insert into ora_move (text,cdate, description) values ('FETCH PROG_MOVE_TABLE_10', sysdate, (DBMS_UTILITY.get_time - t)/100);                             
      
      t := DBMS_UTILITY.get_time;
      FORALL i IN 1 .. l_data.COUNT
         INSERT /*+ APPEND */
               INTO  ela_document_copy
              VALUES l_data (i);
      insert into ora_move (text,cdate, description) values ('insert10->'||l_cnt, sysdate, (DBMS_UTILITY.get_time - t)/100);
      
      --t := DBMS_UTILITY.get_time;        
      FORALL i IN 1..l_data.COUNT
         DELETE FROM ela_doc_chunks WHERE ID = l_data(i).elado_document_id;
      --insert into ora_move (text,cdate, description) values ('delete10->'||l_cnt, sysdate, (DBMS_UTILITY.get_time - t)/100);

commit;

      l_cnt := l_cnt + 10000;
      DBMS_APPLICATION_INFO.set_session_longops (l_log_rindex,
                                                 l_log_slno,
                                                 l_chunk_name,
                                                 l_obj,
                                                 0,
                                                 l_cnt,
                                                 l_log_total,
                                                 'row',
                                                 'rows');
   
    exception when others then
    insert into ora_move (text,cdate, description) values (DBMS_UTILITY.format_error_stack, sysdate, l_chunk_name||': '||l_cnt||' из '||l_log_total);
commit;
   END;                                              
      EXIT WHEN l_cursor%NOTFOUND;
   END LOOP;
commit;
   CLOSE l_cursor;
   insert into ora_move (text,cdate) values ('STOP PROG_MOVE_TABLE_10', sysdate);
   END;

select value from v$system_parameter where name like 'user_dump_dest';
create directory user_dump_dest as '<результат предыдущего запроса>';
select tracefile from v$process where addr in (select paddr from v$session where sid=<трассируемая сессия>);
select bfilename('user_dump_dest','<имя файла>') from dual;

OPEN l_cursor FOR
      select d.* from ela_document d 
      where d.elado_document_id in (select id from ela_doc_chunks where chunk# = 10);

CREATE TABLE ELA_DOC_CHUNKS
(
   ID       NUMBER,
   CHUNK#   NUMBER
)
TABLESPACE USERS
NOLOGGING;

INSERT INTO ELA_DOC_CHUNKS (ID, CHUNK#)
   SELECT ELADO_DOCUMENT_ID, ORA_HASH (ELADO_DOCUMENT_ID, 10) AS chunk#
     FROM ela_document;

begin 
for c in (select start_rowid, end_rowid from DBA_PARALLEL_EXECUTE_CHUNKS ) loop
insert /*+append parallel(32) no_gather_optimizer_statistics*/ into target select * from source where rowid between c.start_rowid and c.end_rowid;
commit;
end loop;
end;

insert into t1
select * from t2 where chunk_id = :1;