oracle 存储过程循环打开游标数据处理

2017-07-24 14:12:42

SQL内容：

　　1.一次性检索 100000 条数据。

　　2. 1000 条提交一次。

　　3.超过 100000 万条，重新打开游标，重新检索。

pl/sql内容如下：

CREATE OR REPLACE PROCEDURE P_MDF_TEST ( branchno1 in varchar )
AS
    cursor cur_inst is select plcno from t1test where
    branch in (  select branchcode from t_test start with branchcode =branchno1 connect by prior branchcode = supercode )
    and primprdcode in ( '123', '234')
    and ( InsExprtDate <> date '9999-12-31'  or  InsExprtDate is null );
    record cur_inst%rowtype;
    i_count int;
    iFlag int ;
 --   v_end varchar2(30);  时间
BEGIN
   dbms_output.put_line('开始执行');
    iFlag :=1;
    loop
    if iFlag = 0 then
      exit;
    end if;
    i_count:=0;
    open cur_inst;
       if cur_inst%isopen  then
       loop
           fetch cur_inst into record;
           if  cur_inst%notfound   then
             iFlag:=0;
             exit;
           end if ;
           update t1test set InsExprtDate =date '9999-12-31' where plcno=record.plcno;
           update t2test set InsExprtDate =date '9999-12-31' where plcno=record.plcno;
      --  dbms_output.put_line(record.plcno);
            i_count := i_count + 1;
            if i_count >=1000 then
        --      dbms_output.put_line(i_count);
        --      select to_char(sysdate,'yyyy-mm-dd hh24:mi:ss') into v_end from dual;
        --     dbms_output.put_line(v_end);
               i_count:=0;
               commit;
            end if ;
           if cur_inst%ROWCOUNT >=100000  then
        --    dbms_output.put_line('进来了');
         -- dbms_output.put_line(cur_inst%ROWCOUNT);
              exit ;
           end if ;
       end loop;
       commit;
       close cur_inst;
       end if;
    end loop;
    dbms_output.put_line('执行结束');
END;

 

新建测试窗口，执行以下内容：

begin
  -- Call the procedure
  p_mdf_test(branchno1 => '122');
end;