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;
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。