测试环境:oracle9i
存储过程:
create or replace procedure getEmpByDept(
out_curEmp out SYS_REFCURSOR
)
is
begin
open out_curEmp for
SELECT * FROM aa01;
exception
when others then
RAISE_APPLICATION_ERROR(-20101,'Error in getEmpByDept' || SQLCODE );
end getEmpByDept;
打印
SQL> var result refcursor
SQL> begin
2 getEmpByDept(:result);
3 end;
4 /
PL/SQL 过程已成功完成。
SQL> print :result;
注意:在sqlplus下用没问题,在PL/SQL下申明var result refcursor是会报错。