1.存储过程
CREATE OR REPLACE PROCEDURE TEST_PC(CUR_RESULT OUT SYS_REFCURSOR) IS
BEGIN
OPEN CUR_RESULT FOR
SELECT LEVEL + SYSDATE THEDAY FROM DUAL CONNECT BY LEVEL < 6;
END TEST_PC;
2.测试代码
DECLARE
CUR_CALLING SYS_REFCURSOR;
THEDAY DATE;
BEGIN
TEST_PC(CUR_CALLING);
LOOP
FETCH CUR_CALLING
INTO THEDAY;
EXIT WHEN CUR_CALLING%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(THEDAY);
END LOOP;
END;