oralce之存储过程

一：--循环向表emp中插入数据

 declare
   maxnumber number:=10000;
   v_count   number;
   begin
     v_count :=0;
     FOR x IN 1..maxnumber
     LOOP
        v_count :=v_count+1;
        insert into emp (empno,ename,job,mgr,sal,comm)
        values(1001,'tom','clerk',1001,1000,120);
        if mod(v_count,1000) = 0 then
        commit;
        end if;
     END LOOP ;
     commit;
 end;

二：--创建与emp表结构相同的临时表

 create table emp_bak
 as
 select * from emp;
 truncate table emp_bak;

三：--通过存储过程将表emp中的数据同步到临时表emp_bak中

 create or replace procedure  p_syn_data
 Is
 v_num   number;
 Begin
   V_Num :=0;
   For X In (Select * From Emp)
   Loop
     begin
       V_Num:=V_Num+1;
        Insert Into Emp (Empno,Ename,Job,Mgr,Sal,Comm)
        Values(X.Empno,X.Ename,X.Job,X.Mgr,X.Sal,X.Comm);
        If Mod(V_Num,1000) = 0 Then
        Commit;
        End If;
     end;
   End Loop;
   Commit;
   Dbms_Output.Put_Line("同步数据完成!");
 end p_syn_data;

查看临时表数据：

 --查看临时表数据
 select count(1) from emp_bak;