--创建过程，参数为sys_refcursor，为out型

create or replace procedure aabbsys_refcursor(o out sys_refcursor) is

begin

  open o for select * from basplumain;

end;

---

--测试过程，使用aabbsys_refcursor传出的值

create or replace procedure aabb_test_sys_refcursor(return out int)is

type t_basplumain is table of basplumain%rowtype;

t_plu t_basplumain;

v sys_refcursor;

begin

  aabbsys_refcursor(v);

  fetch v bulk collect into t_plu;

  for i in 1..t_plu.count loop

    dbms_output.put_line(t_plu(i).pluname);

  end loop;

end;

---

--sqlplus测试脚本

--set serveroutput on

declare

v_return int default 0;

begin

  aabb_test_sys_refcursor(v_return);

end;

type type_refcur is ref cursor;

cur_refcur type_refcur; ---自定义的ref cursor

cur_sysref   sys_refcursor; --- 使用系统预定义的sys_refcursor

v_sql varchar(4000) :动态拼接一个查询sql: ;

开启游标: open cur_xxx  for v_sql 时, cur_sysref 即 sys_refcursor可以, 而cur_refcur  即 ref cursor 不可以;