Fetch Refcursor into a GTT

Question

Hello All,
I have a procedure
PROCEDURE get_tran_detail (
               i_user_id      IN NUMBER := 0,
               i_portfolio_id_list      IN NUM_ARRAY,
               i_from_dt      IN transaction.trade_dt%TYPE,
               i_to_dt IN transaction.trade_dt%TYPE,
               i_include_suppress_txn IN NUMBER,
               o_transactions OUT TXN_SUMMARY_INFO_ARRAY_test, ----output
               i_debugmode IN NUMBER := 0
How do I get the o_transactions to be inserted into a GTT?
This is what I have so far
CREATE OR REPLACE PROCEDURE get_control_ref_cursor( p_ref_cursor OUT SYS_REFCURSOR )
AS
l_base_proc_ref_cursor SYS_REFCURSOR;
l_result_rec MI_GET_TXN_GTT%rowtype;
BEGIN
mi_ade_service_pkg_test.get_tran_detail (
118
,num_array(7366975,7366976,7364727) --portfolio_id
,'22-aug-2011' --transaction_date
,sysdate
,1
,o_transactions
,0);
LOOP
FETCH l_base_proc_ref_cursor INTO l_result_rec;
INSERT INTO MI_GET_TXN_GTT VALUES( l_result_rec );
OPEN p_ref_cursor
FOR SELECT *
FROM MI_GET_TXN_GTT;
END;
Error:
LINE/COL ERROR
23/4 PLS-00103: Encountered the symbol ";" when expecting one of the
following:
loop
Thanks

Answer 1

>
How do I get the o_transactions to be inserted into a GTT?
>
Easy - DON'T DO THAT!
Why do you want to put the data into a GTT when all you do is then create a cursor on the data.
Just return the data in o_transactions directly the the caller.
Post the DDL for the objects you are using.
Here is a simple example you can try in the SCOTT schema. It uses a VARRAY and just queries it as a table.
CREATE OR REPLACE TYPE enamelist as VARRAY(20) of VARCHAR2(20)
CREATE OR REPLACE FUNCTION ename_fn
RETURN enamelist
AS
v_cursor_main enamelist := enamelist ();
BEGIN
SELECT ename
BULK COLLECT
INTO v_cursor_main
FROM emp;
RETURN v_cursor_main;
EXCEPTION
WHEN OTHERS
THEN
RETURN v_cursor_main;
END;
select * from table(ename_fn());
COLUMN_VALUE
SMITH
ALLEN
WARD
JONES
MARTIN
BLAKE
CLARK
SCOTT
KING
TURNER
ADAMS
JAMES
FORD
MILLERFor your use case you have
o_transactions OUT TXN_SUMMARY_INFO_ARRAY_testIf that 'ARRAY' is a VARRAY then you would just open the cursor on 'o_transactions'
OPEN p_ref_cursor
FOR SELECT * FROM TABLE(o_transactions);Get rid of the GTT.
CREATE OR REPLACE PROCEDURE get_control_ref_cursor( p_ref_cursor OUT SYS_REFCURSOR )
AS
l_base_proc_ref_cursor SYS_REFCURSOR;
v_cursor_main enamelist := enamelist ();
BEGIN
SELECT ename
BULK COLLECT
INTO v_cursor_main
FROM emp;
OPEN p_ref_cursor
FOR SELECT * FROM TABLE(v_cursor_main);
END;
SQL> var emp_dtls refcursor
SQL> execute get_control_ref_cursor(:emp_dtls);
PL/SQL procedure successfully completed.
SQL> print emp_dtls;
COLUMN_VALUE
SMITH
ALLEN
WARD
JONES
MARTIN
BLAKE
CLARK
SCOTT
KING
TURNER
ADAMS
COLUMN_VALUE
JAMES
FORD
MILLER
14 rows selected.
SQL>