dbms_lock.sleep

declare
v_id number;
cursor c1 is
select * from (select level l from dual connect by level < 100);
begin
open c1;
loop
fetch c1 into v_id;
exit when c1%notfound;
dbms_lock.sleep(1);
insert into func_test (id) values(v_id);
commit;
end loop;
close c1;
end;
/