| René Nyffenegger's collection of things on the web | |
|
René Nyffenegger on Oracle - Most wanted - Feedback
|
ref cursor from record type [PL/SQL] | ||
create or replace package drop_me_ref_cursor as type rec_t is record (a number, b varchar2(10)); type ref_cur_t is ref cursor return rec_t; procedure do (c in ref_cur_t); end drop_me_ref_cursor; /
create or replace package body drop_me_ref_cursor as
procedure do(c in ref_cur_t) is
r rec_t;
begin
fetch c into r;
loop
exit when c%notfound;
fetch c into r;
end loop;
end do;
end drop_me_ref_cursor;
/
|