帮别人的事做完就忘记，别人为自己做的事时时记着，哪怕这个人只有那么一次好，他也是曾经帮助过你的人。
第一种情况是返回的游标是某个具体的表或视图的数据，如： SQL-Code:
CREATE OR REPLACE PROCEDURE P_TESTA (
PRESULT OUT SYS_REFCURSOR
)
AS
BEGIN
OPEN PRESULT FOR SELECT * FROM USERS;
END P_TESTA;
其中USERS就是数据库中一个表。在调用的时候只要声明一个该表的ROWTYPE类型就可以了：
SQL-Code:
CREATE OR REPLACE PROCEDURE P_TESTB
AS
VARCURSOR SYS_REFCURSOR;
R USERS%ROWTYPE;
BEGIN
P_TESTA(VARCURSOR);
LOOP
FETCH VARCURSOR INTO R;
EXIT WHEN VARCURSOR%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(R.NAME);
END LOOP;
END P_TESTB;
第二种情况，我们返回的不是表的所有的列，或许只是其中一列或两列，如：
SQL-Code:
CREATE OR REPLACE PROCEDURE P_TESTA (
PRESULT OUT SYS_REFCURSOR
)
AS
BEGIN
OPEN PRESULT FOR SELECT ID,NAME FROM USERS;
END P_TESTA;
这里我们只返回了USERS表的ID,NAME这两个列，那么调用的时候也必须做相应的修改：
SQL-Code:
CREATE OR REPLACE PROCEDURE P_TESTB
AS
VARCURSOR SYS_REFCURSOR;
CURSOR TMPCURSOR IS SELECT ID,NAME FROM USERS WHERE ROWNUM=1;
R TMPCURSOR%ROWTYPE;
BEGIN
P_TESTA(VARCURSOR);
LOOP
FETCH VARCURSOR INTO R;
EXIT WHEN VARCURSOR%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(R.ID);
END LOOP;
END P_TESTB;
与之前不同的是我们声明了一个游标类型的变量TMPCURSOR ，注意TMPCURSOR 的结构必须与存储过程P_TESTA 返回的游标结构一致，否则就会出现错误。同理只要保持两个游标类型结构一致，就可以实现自由调用。
到此这篇关于oracle在一个存储过程中调用另一个返回游标的存储过程就介绍到这了。和阳光的人在一起，心里才不会变得晦暗；和快乐的人在一起，脸上就会常带面带微笑；和进取的人在一起，行动就不会变得落后；借人之智，要尽自己最大的努力去完善自己；学最好的别人，做最好的我们。更多相关oracle在一个存储过程中调用另一个返回游标的存储过程内容请查看相关栏目，小编编辑不易，再次感谢大家的支持！