oracle调用存储过程

https://www.cnblogs.com/pretttyboy/p/5655655.html

create or replace procedure ppro_repay_limit
is
   cursor cur_repay is select * from bid_repay_info where biderpaydate like trunc(sysdate,'mm')+8 and bidrepaystate='逾期待还款';
   cursor cur_bid is select * from bid_repay_info where biderpaydate like trunc(sysdate,'mm')+8 and bidrepaystate='待还款';
begin
    for t_repay in cur_repay loop
        update bid_repay_info set bidrepayamount=bidrepayamount*1.06 where repayid = t_repay.repayid;
        commit;
    end loop;
  for t_bid in cur_bid loop
    update bid_repay_info set bidrepaystate='逾期待还款',bidrepayamount=bidrepayamount*1.06 where repayid = t_bid.repayid;
        commit;
  end loop;
end;









create or replace procedure pro_bidinfo_limit
is
   cursor cur_bid is select * from bid_info where bidstate='待投标';
   t_days number(4);
begin
    for t_bid in cur_bid loop
        select (sysdate-t_bid.bidissuedate) as days into t_days  from dual;
        if t_days>t_bid.biddeadday then
              update bid_info set bidstate='流标' where bidid = t_bid.bidid;
        end if;
        dbms_output.put_line(t_days);
    end loop;
end;
``