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;