-- Created on 2009-3-9 by ADMINISTRATOR
declare
-- Local variables here
i integer;
v_sql varchar2(1024);
type cursor_type is ref cursor;
v_cursor cursor_type;
type custom_type is table of T_XYZ_DATE%rowtype;
custom_table custom_type :=custom_type();
begin
-- Test statements here
v_sql :='truncate table t_xyz';
execute immediate v_sql;
v_sql :='select * from t_xyz_date';
open v_cursor for v_sql;
loop
fetch v_cursor bulk collect into custom_table limit 100000;
forall i in 1..custom_table.count
insert into t_xyz values custom_table(i);
commit;
exit when v_cursor%notfound;
end loop;
close v_cursor;
exception
when others then
rollback;
dbms_output.put_line(sqlerrm);
end;[@more@]
declare
-- Local variables here
i integer;
v_sql varchar2(1024);
type cursor_type is ref cursor;
v_cursor cursor_type;
type custom_type is table of T_XYZ_DATE%rowtype;
custom_table custom_type :=custom_type();
begin
-- Test statements here
v_sql :='truncate table t_xyz';
execute immediate v_sql;
v_sql :='select * from t_xyz_date';
open v_cursor for v_sql;
loop
fetch v_cursor bulk collect into custom_table limit 100000;
forall i in 1..custom_table.count
insert into t_xyz values custom_table(i);
commit;
exit when v_cursor%notfound;
end loop;
close v_cursor;
exception
when others then
rollback;
dbms_output.put_line(sqlerrm);
end;[@more@]
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/23984584/viewspace-1033969/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/23984584/viewspace-1033969/