Ne přímo, ne.
SYS_REFCURSOR je ukazatel na výsledek – jediná věc, kterou s tím můžete udělat, je načíst data. Sadu výsledků nemůžete upravit.
P_PROC2 mohl načíst data z SYS_REFCURSOR, zadat dotazy k získání dalších dat z nějaké jiné tabulky a vrátit něco volajícímu. V tomto bodě bych měl tendenci upřednostňovat přeměnu P_PROC2 na funkci zřetězené tabulky. Ale můžete prostě vrátit kolekci s upravenými daty.
Pokud p_proc2 nezbytně potřebuje vrátit REF CURSOR, můžete načíst data z REF CURSOR p_proc1 do globální dočasné tabulky a poté otevřít nový kurzor v p_proc2, který se dotazuje na tuto globální dočasnou tabulku a provede jakoukoli další manipulaci, kterou si přejete. Něco jako
SQL> create global temporary table tmp_emp
2 as
3 select empno, ename, deptno from emp where 1=2;
Table created.
SQL> create or replace procedure p1( p_cur1 out sys_refcursor )
2 as
3 begin
4 open p_cur1 for select * from emp;
5 end;
6 /
Procedure created.
SQL> ed
Wrote file afiedt.buf
1 create or replace procedure p2( p_cur2 out sys_refcursor )
2 as
3 l_cur1 sys_refcursor;
4 l_rec emp%rowtype;
5 begin
6 p1( l_cur1 );
7 loop
8 fetch l_cur1 into l_rec;
9 exit when l_cur1%notfound;
10 insert into tmp_emp( empno, ename, deptno ) values( l_rec.empno, l_rec
ename, l_rec.deptno );
11 end loop;
12 open p_cur2 for
13 select empno, ename, dname
14 from tmp_emp,
15 dept
16 where dept.deptno = tmp_emp.deptno;
17* end;
SQL> /
Procedure created.
SQL> variable rc refcursor;
SQL> exec p2( :rc );
PL/SQL procedure successfully completed.
SQL> print rc
EMPNO ENAME DNAME
---------- ---------- --------------
7839 KING ACCOUNTING
7934 MILLER ACCOUNTING
7782 CLARK ACCOUNTING
7369 smith RESEARCH
7902 FORD RESEARCH
7876 ADAMS RESEARCH
7788 SCOTT RESEARCH
7566 JONES RESEARCH
7900 JAMES SALES
7499 ALLEN SALES
7698 BLAKE SALES
EMPNO ENAME DNAME
---------- ---------- --------------
7654 MARTIN SALES
7844 TURNER SALES
7521 WARD SALES
14 rows selected.