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;