oracle存储过程游标遍历

create or replace procedure PRO_GETYFBGYZB(jgidInput  in varchar2, yfsbInput  in varchar2 --输入变量
                                    ) as
  cursor cursorParam is select a.ypxh as YPXH,a.YPCD,a.ypsl,b.yfgg ,a.lsje   
    from yf_kcmx a, yf_ypxx b
   where a.jgid = b.jgid
     and a.yfsb = b.yfsb
     and a.ypxh = b.ypxh
     and a.jgid = jgidInput
     and a.yfsb = yfsbInput;
begin
     DBMS_OUTPUT.ENABLE( 1000000);
     for temp in cursorParam
     Loop
     dbms_output.put_line( '药品序号:' || temp.ypxh);
     end Loop ;
end PRO_GETYFBGYZB;

猜你喜欢

转载自wjch-111.iteye.com/blog/2332047