编写Oracle包、过程或者函数，返回结果集，并且编写另一个过程或函数接收这个结果集并且输出；谁能提供思

-- 测试表数据。
select * from test_main;

        ID VALUE
---------- --------------------
         1 ONE
         3 THREE
         2 TWO



-- 返回结果集的函数.
CREATE OR REPLACE FUNCTION Get_Test_Main_All
RETURN SYS_REFCURSOR
IS
  return_cursor SYS_REFCURSOR;
BEGIN
  OPEN return_cursor FOR 'SELECT * FROM test_main';
  RETURN return_cursor;
END;
/



-- 普通的查询，来查看结果.
SELECT Get_Test_Main_All() FROM dual;

GET_TEST_MAIN_ALL()
--------------------
CURSOR STATEMENT : 1

CURSOR STATEMENT : 1

        ID VALUE
---------- --------------------
         1 ONE
         3 THREE
         2 TWO


-- 存储过程调用， 来获取结果.
DECLARE 
  -- 调用函数的返回值.
  testCursor SYS_REFCURSOR;
  -- 存储单行数据.
  testRec  test_main%ROWTYPE;
BEGIN
  -- 调用返回结果集的函数.
  testCursor := Get_Test_Main_All();
  -- 循环，遍历结果.
  LOOP
    -- 游标向前.
    FETCH testCursor INTO testRec;
    -- 无数据的情况下，退出循环.
	EXIT WHEN testCursor%NOTFOUND;
    -- 输出调试信息.
    dbms_output.put_line( TO_CHAR(testRec.id) || ' ' || testRec.value);
  END LOOP;
END;
/

1 ONE
3 THREE
2 TWO

PL/SQL 过程已成功完成。

先编写一个函数返回结果集，再另外编写一个过程调用此函数并返回就好了。

如果要返回多个值,可考虑用存储过程实现