向表中批量插入数据

Declare
i Number :=1;
Begin
While(i<=1000)Loop

    inster into语句，其中递增的值使用+i方式

i:=i+1; --非for循环不能用"i++"
End Loop;
End;