[Oracle]快速插入大量（100w）数据

原文地址;http://www.cnblogs.com/whylaughing/p/6037938.html

背景：无论在开发调试或者软件测试中，测试数据的准备是调试/测试执行前重要和必要的一个环节，因此以下几种方式可以快速插入大量数据：

第一种方法：

declare 
  -- Local variables here 
  m integer; 
begin 
  -- Test statements here

--输出开始时间 
  dbms_output.put_line('start:'||sysdate); 
  m:=0;

--循环插入的数据量 
  for i in 1..1000000 loop 
   m:=m+1; 
--插入语句，其中'admintest'||m, 为admintest后面加数字，以便标识每条记录都不一样

insert into KF_SEC_USER (USER_ID, GROUP_ID, EXTSYS_USER_ID, USER_NAME, USER_CNAME, PWD, MOBILE, PHONE, EMAIL, DESCRIPTION, ENABLED, HIS_ID, ROLES, TERMINAL_ID) 
values (sys_guid(), '001', null,'admintest'||m, 'admin', '96E79218965EB72C92A549DD5A330112', '13560316185', null, null, null, null, null, null, null);

    commit; 
  end loop; 
--输出结束时间 
  dbms_output.put_line('end:'||sysdate); 
end;

 

第二种方法：

--创建存储过程语句 
CREATE OR REPLACE PROCEDURE p_insert 
IS

--批量提交参数 
num NUMBER;  
BEGIN 
    FOR i IN 1..10000000 LOOP

--插入语句 
       insert into USERINFO (ID, NAME, AGE, ADDRESS, OCCUPATION_NAME) 
values (1, 'ouhy', 25, '广东省佛山市南海区XXXX公司', '测试工程师);   --执行插入 
        num:=num+1;

  --5000笔提交一次，分批量提交，及时释放redo log buffer 
        IF Mod(num,5000)=0 THEN 
           COMMIT; 
        END IF; 
    END LOOP; 
END;

--执行语句

begin 
  p_insert; 
commit; 
  end;

Best Regards，
---------------------------------------------------------------
作者：whylaughing
博客地址：http://www.cnblogs.com/whylaughing/ 
注意事项：本文版权归作者和博客园共有，欢迎转载，但未经作者同意必须保留此段声明，且在文章页面明显位置给出原文连接，否则保留追究法律责任的权利。

我个人测试一下，插入15000条记录，一共花了140+分钟。