老朱写了一个存过，每5000提交一次，植入值

朱明华9608 12:59:50
         CURSOR cur_ifchrg IS
 select c_rcpt_no
 from t_fin_plyedr_coldue
 Where substr(c_prod_no,1,2) not in ('06','08','03')
 and n_got_prm =0
 --and c_ply_no='100603050026010'
 and (c_arp_flag is null or c_arp_flag<>'9')
 AND C_PLY_NO LIKE '1%' and c_bala_mrk='0';

BEGIN

 /*3更改接口表标识*/
        OPEN cur_ifchrg;
        LOOP
            FETCH cur_ifchrg INTO v_rcpt_no;
            EXIT WHEN cur_ifchrg%NOTFOUND;

            update t_fin_plyedr_coldue
            set c_arp_flag='9'
            where c_rcpt_no=  v_rcpt_no;
            commit;

        END LOOP;
        CLOSE cur_ifchrg;
朱明华9608 13:23:00
     CURSOR cur_ifchrg IS
 select c_rcpt_no
 from t_fin_plyedr_coldue
 Where substr(c_prod_no,1,2)  in ('06','08','03')
 and n_got_prm =0
 --and c_ply_no='100603050026010'
and c_arp_flag='9'
 AND C_PLY_NO LIKE '1%' and c_bala_mrk='0';

BEGIN

 /*3更改接口表标识*/
        OPEN cur_ifchrg;
        LOOP
            FETCH cur_ifchrg INTO v_rcpt_no;
            EXIT WHEN cur_ifchrg%NOTFOUND;

            update t_fin_plyedr_coldue
            set c_arp_flag='0'
            where c_rcpt_no=  v_rcpt_no;
            commit;

        END LOOP;
        CLOSE cur_ifchrg;