Bagaimana cara menyimpan hasil dari suatu fungsi yang akan mengembalikan sysrefcursor?

Ini adalah fungsi Anda yang mengambil variabel varchar2 dan mengembalikan A refcursor( diketik dengan lemah).

 CREATE OR replace FUNCTION fn_return_cur(v IN VARCHAR2)
RETURN SYS_REFCURSOR
IS
  c1 SYS_REFCURSOR;
BEGIN
    OPEN c1 FOR
      SELECT 'ABC'
      FROM   dual
      WHERE  'col1' = v;

    RETURN c1;
END;

/  

Berikut adalah prosedur yang memiliki nilai kursor yang diteruskan sebagai argumen ke fungsi dan kursor yang dikembalikan dilewatkan sebagai argumen KELUAR.

 CREATE OR replace PROCEDURE Pr_pass_out_cur(v_2 OUT SYS_REFCURSOR)
IS
  func_arg  VARCHAR2(3);
  other_arg VARCHAR2(3);
  CURSOR c_2 IS
    SELECT 'ABC' col1,
           'DEF' col2
    FROM   dual;
BEGIN
    LOOP
        FETCH c_2 INTO func_arg, other_arg;

        EXIT WHEN c_2%NOTFOUND;

        v_2 := Fn_return_cur(func_arg);
    END LOOP;
EXCEPTION
  WHEN OTHERS THEN
             NULL;
END;

/  

Beri tahu saya tanggapan Anda.