--创建带游标输出参数的存储过程示例 create or replace procedure prc_test( cur out sys_refcursor ) is begin open cur for select 1 from dual union all select 2 from dual; end;--执行存储过程并展示结果 declare cur sys_refcursor; AID integer; begin prc_test(cur); while (cur%found) loop fetch cur into AID; dbms_output.put_line(AID); end loop; close cur; end;
create or replace procedure prc_test(
cur out sys_refcursor
)
is
begin
open cur for
select 1 from dual union all
select 2 from dual;
end;--执行存储过程并展示结果
declare
cur sys_refcursor;
AID integer;
begin
prc_test(cur);
while (cur%found) loop
fetch cur into AID;
dbms_output.put_line(AID);
end loop;
close cur;
end;