create package emp_test is
type t_emp is table of emp%rowtype index by binary_integer;
procedure get_emps(pemp out t_emp);
end;
create package body emp_test is
procedure get_emps(pemp out t_emp)
is
i integer :=0;
begin
for f in (select * from emp) loop
i := i+1;
pemp(i) := f;
end loop;
end;
end;
The above will probably work on 7.3+
For earlier 7 versions you may return a set of simple (one column) tables. Of course you should make a number of asignments.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.