如何从花药调用一个存储过程并修改返回的引用游标？

Question

我有两个存储过程，p_proc1 和 p_proc2。 p_proc1 返回一个引用游标，我想使用 p_proc2 中的数据。是否可以在p_proc2中调用p_proc1并修改数据集（外部连接另一个表）？数据库是Oracle。

Answer 1

不直接，不。

SYS_REFCURSOR 是一个指向结果的指针——您唯一能做的就是获取数据。您无法修改结果集。

P_PROC2 可以从 SYS_REFCURSOR 获取数据，发出查询以从其他表获取附加数据，然后将某些内容返回给调用者。那时，我倾向于将 P_PROC2 转变为流水线表函数。但是您可以只返回一个包含修改后的数据的集合。

如果 p_proc2 绝对需要返回 REF CURSOR，您可以将 p_proc1 的 REF CURSOR 中的数据提取到全局临时表中，然后在 p_proc2 中打开一个新游标来查询此全局临时表并执行您希望的任何其他操作。像这样的东西

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.