grant execute on dbms_lock to USERNAME;
?
dbms_lock.sleep(time)参数单位为秒
?
create or replace procedure initdata is
num number := 0;
begin
?
for i in 1 .. 500 loop
?
num := num + 1;
if num >= 1000 then
dbms_lock.sleep(5);
num := 0;
dbms_output.put_line(‘暂停5秒‘);
?
end if;
end loop;
?
end initdata;