Изглежда, че искате да обедините неизвестен брой SYS_REFCURSOR
резултатът се събира в един голям. Ако знаете структурата на курсора, върнат от spSelect_Inv_Search
можете да направите това с междинна конвейерна функция.
create package p as
type tmp_rec_type is record (owner all_objects.owner%type,
object_type all_objects.object_type%type,
objects number);
type tmp_rec_table is table of tmp_rec_type;
procedure proc1(p_owner in varchar2, p_cursor out sys_refcursor);
function func2 return tmp_rec_table pipelined;
procedure proc3(p_cursor out sys_refcursor);
end;
/
Типовете могат да бъдат дефинирани тук, не е необходимо да са на ниво SQL, тъй като никога няма да е необходимо да ги препращате извън пакета.
create package body p as
procedure proc1(p_owner in varchar2, p_cursor out sys_refcursor) as
begin
open p_cursor for select owner, object_type, count(*)
from all_objects
where owner = p_owner
group by owner, object_type;
end;
function func2 return tmp_rec_table pipelined as
cursor c1 is select distinct owner
from all_tables where owner in ('SYS','SYSTEM');
tmp_cursor sys_refcursor;
tmp_rec tmp_rec_type;
begin
for r1 in c1 loop
proc1(r1.owner, tmp_cursor);
loop
fetch tmp_cursor into tmp_rec;
exit when tmp_cursor%notfound;
pipe row(tmp_rec);
end loop;
end loop;
end;
procedure proc3(p_cursor out sys_refcursor) as
begin
open p_cursor for select * from table(func2);
end;
end p;
/
След това, за да изпълните, което можете да направите извън пакета, въпреки типовете, използвани за междинния етап, можете да направите това, за да тествате в SQL*Plus или SQL Developer:
var rc refcursor;
exec p.proc3(:rc);
print rc;
За моята база данни това дава:
OWNER OBJECT_TYPE OBJECTS
------------------------------ ------------------- ----------------------
SYSTEM VIEW 1
SYSTEM TABLE 5
SYS VIEW 1056
SYS CONSUMER GROUP 2
SYS PROCEDURE 11
SYS FUNCTION 56
SYS SEQUENCE 1
SYS OPERATOR 6
SYS EVALUATION CONTEXT 1
SYS TABLE 13
SYS WINDOW GROUP 1
SYS PACKAGE 162
SYS WINDOW 2
SYS TYPE 529
SYS JOB CLASS 1
SYS SCHEDULE 1
Това очевидно е много измислено, тъй като бихте направили това като една заявка, но предполагам, че вашата вътрешна процедура трябва да направи нещо по-сложно.