Oracle技术：批量插入测试数据

会计考友

一、Test Windos方式 　　declare
　　maxrecords constant int:=100000;
$ k2 P4 N0 G4 x+ g　　i int :=1;
/ a' j# h! q+ f' A8 F　　begin
　　for i in 1..maxrecords loop
　　insert into test2
' A' z7 ^* j2 q( }1 H　　(id, name)
! {) _: {/ w1 ]7 [: O4 L, E5 M　　values
2 T9 D0 a7 d: Z8 G% v　　(test2_seq.nextval, to_char(9999+i));
- X$ O$ k2 R1 q( ~( d" ?　　end loop;
　　dbms_output.put_line(' 成功录入数据！');
　　commit;
  T# [5 L& w. H8 k　　end;
( [% q! W9 L* }　　二、从已有表中往入另一张表导数据
　　create or replace procedure TestProc is
　　begin
3 h* M3 k4 O0 j8 W8 Z9 x5 V  |2 n　　for c in(select id, name from test2) loop
　　insert into test
　　(id,
6 Z$ M4 u% z/ Z0 A　　name)
　　values
7 g, d6 v+ n+ c　　(test_seq.nextval, c.name);
　　end loop;
　　end TestProc;