gistfile1.sql

create or replace procedure COPY_FROM_TABLE_PRIMER
as
begin
    for REC in (
        select TABLE_NAME
        from TABLE_PRIMER2
    ) loop
        execute immediate 'insert into ' ||REC.TABLE_NAME ||' (DAT, DAT2) select DAT, DAT2 from TABLE_PRIMER where substr(DAT, 1, 3)='''||REC.TABLE_NAME||'''';
        commit;
    end loop;
end;