Oracle PLSQL Demo - 18.02.管道function[查询零散的字段组成list管道返回] [字段必须对上]

--PACKAGE

CREATE OR REPLACE PACKAGE test_141215 is

    TYPE type_ref IS record(

        ENAME VARCHAR2(20),

        SAL NUMBER(10));

    TYPE t_type_ref IS TABLE OF type_ref;

    

    FUNCTION retrieve(v_name varchar2) RETURN t_type_ref

        PIPELINED;

END test_141215;





-- PACKAGE BODY

CREATE OR REPLACE PACKAGE BODY test_141215 IS

    FUNCTION retrieve(v_name varchar2) RETURN t_type_ref

        PIPELINED IS

        cur_type_ref type_ref;

        

        Type ref_cur_variable IS REF cursor;

        cur_variable ref_cur_variable;

        --rec_emp type_ref%RowType;

        v_sql varchar2(100) := 'select t.ename, t.sal/*, t.empno*/ from scott.emp t';

    BEGIN

      

        Open cur_variable For v_sql;

    

        Loop

            fetch cur_variable

                InTo cur_type_ref;

            Exit When cur_variable%NotFound;

            

            dbms_output.put_line(cur_variable%rowcount || ' -> ' || cur_type_ref.ename || '   ' || cur_type_ref.sal);

            PIPE ROW(cur_type_ref);

        End Loop;

        Close cur_variable;

    

        RETURN;

    END;

END test_141215;



--Test retrieve

select * from table(test_141215.retrieve('asd'));