sql >> Databáze >  >> RDS >> Oracle

Jak získám hodnoty z vnořené procedury Oracle?

Zdá se, že chcete sloučit neznámé číslo SYS_REFCURSOR výsledek se soustředí do jednoho velkého. Pokud znáte strukturu kurzoru vráceného z spSelect_Inv_Search můžete to udělat pomocí mezilehlé zřetězené funkce.

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;
/

Typy lze definovat zde, nemusí být na úrovni SQL, protože na ně nikdy nebudete muset odkazovat mimo balíček.

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;
/

Poté spusťte, což můžete provést mimo balíček navzdory typům použitým pro přechodnou fázi, můžete to udělat pro testování v SQL*Plus nebo SQL Developer:

var rc refcursor;
exec p.proc3(:rc);
print rc;

Pro moji databázi to dává:

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     

To je samozřejmě velmi vymyšlené, protože byste to udělali jako jeden dotaz, ale předpokládám, že váš vnitřní postup musí udělat něco složitějšího.



  1. Použití funkce COALESCE k oddělení hodnot čárkami

  2. Spojení tabulek InnoDB s tabulkami MyISAM

  3. Jak nastavím parametry ORDER BY pomocí připraveného příkazu PDO?

  4. Spouštěč MySQL před kontrolou vložení hodnoty