--建包 createorreplacepackage PA_BGYZB as type sp_cursor is ref cursor; end PA_BGYZB; --存储过程调用包 create or replace procedure PRO_GETYFBGYZB(jgidInput in varchar2,yfsbInput in varchar2,--输入变量 bgyzb_cursor out PA_BGYZB.sp_cursor ) as ypxh1 NUMBER( 18); ypcd1 NUMBER( 18); ypsl1 NUMBER( 10,4 ); ypgg1 VARCHAR2( 200); lsje1 NUMBER( 12,4 ); begin open bgyzb_cursor for select a.ypxh as YPXH,a.YPCD,a.ypsl,b.yfgg,a.lsje into ypxh1,ypcd1,ypsl1,ypgg1,lsje1 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; end PRO_GETYFBGYZB;
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。