Return rows from pl-sql record type

Question

We have a requirement to create function which returns cursor to java application. This cursor will have data from pl-sql record type.
Tried with pipelined function. I have written code below.
CREATE or replace PACKAGE test_pkg IS
    TYPE tp_rec IS RECORD(tt_id INTEGER,tt_text VARCHAR2(40));
    TYPE obj_tp_recs IS TABLE OF tp_rec;
    TYPE obj_tp_recs1 IS TABLE OF tp_rec;
    FUNCTION test_func RETURN tp_rec;
    function type_out return obj_tp_recs1 PIPELINED;
    PROCEDURE test_type (result out sys_refcursor);
END;
CREATE OR REPLACE PACKAGE BODY OMS.test_pkg IS
    FUNCTION test_func RETURN tp_rec
    AS
       currec tp_rec;
    BEGIN
       currec.tt_id := 1;
       currec.tt_text := 'test1';
    END;
     FUNCTION type_out RETURN obj_tp_recs1 PIPELINED
         AS
       currec1 test_pkg.tp_rec;
      begin
                currec1 := test_pkg.test_func;
                PIPE ROW(currec1);
                dbms_output.put_line(currec1.tt_id);
            end;
    PROCEDURE test_type (result out sys_refcursor)
    AS   
    BEGIN
              OPEN RESULT
              FOR SELECT * FROM TABLE(test_pkg.type_out());
    END;
END;
SQL> VARIABLE x REFCURSOR
SQL> exec test_pkg.test_type(:x);
PL/SQL procedure successfully completed.
SQL> print xThis code returns no data found exeception from function. How to achieve result 1 and test1 from above code?
Thanks in advance

Answer 1

SQL> VARIABLE x REFCURSOR
SQL> exec test_pkg.test_type(:x);
PL/SQL procedure successfully completed.
SQL> print x
ERROR:
ORA-06503: PL/SQL: Function returned without value
ORA-06512: at "SCOTT.TEST_PKG", line 8
ORA-06512: at "SCOTT.TEST_PKG", line 14
no rows selectedIf you look at test_func body it is missing return statement. Now:
SQL> CREATE OR REPLACE PACKAGE BODY test_pkg IS
  2      FUNCTION test_func RETURN tp_rec
  3      AS
  4         currec tp_rec;
  5      BEGIN
  6         currec.tt_id := 1;
  7         currec.tt_text := 'test1';
  8         RETURN currec;
  9      END;
10     
11       FUNCTION type_out RETURN obj_tp_recs1 PIPELINED
12       AS
13         currec1 test_pkg.tp_rec;
14        begin
15          currec1 := test_pkg.test_func;
16          PIPE ROW(currec1);
17          dbms_output.put_line(currec1.tt_id);
18          end;
19  
20      PROCEDURE test_type (result out sys_refcursor)
21      AS   
22      BEGIN
23        OPEN RESULT
24        FOR SELECT * FROM TABLE(test_pkg.type_out());
25       
26      END;
27  END;
28  /
Package body created.
SQL> exec test_pkg.test_type(:x);
PL/SQL procedure successfully completed.
SQL> print x
     TT_ID TT_TEXT
         1 test1
SQL> SY.