Oracle10g调用out为游标参数的存储过程

1、创建存储过程

 --OUT输出存放所有部门信息的游标
CREATE OR REPLACE PROCEDURE PRO_FINDALLDEPT( CURSOR_DEPT OUT SYS_REFCURSOR )
    AS
BEGIN
    OPEN CURSOR_DEPT FOR SELECT DEPARTMENT_NAME FROM DEPARTMENTS;
END;

2、调用存储过程

DECLARE
        CURSOR_VAR SYS_REFCURSOR;
        NAME DEPARTMENTS.DEPARTMENT_NAME%TYPE;
BEGIN
        PRO_FINDALLDEPT(CURSOR_VAR);
        LOOP
        	FETCH CURSOR_VAR INTO NAME;
	       	EXIT WHEN CURSOR_VAR%NOTFOUND;
        	DBMS_OUTPUT.PUT_LINE(NAME);
        END LOOP;
END;