CREATE OR REPLACE PROCEDURE p_insert_part
IS
--批量提交参数
num NUMBER;
begin
num := 0;
for i in 1 .. 20000
loop
num:=num+1;
insert into SINO_LOANM (loan_code, creditor)
values ('C01-20200609'|| to_char(num), 'KH20191628');
num:=num+1;
if mod(num,10000)=0 then
commit;
end if;
end loop
commit;
end;
---执行存储过程
begin
p_insert_part ;
end;