¿Cómo devolver filas desde un bloque de declarar/comenzar/finalizar en Oracle?

Question

Quiero devolver filas desde una declaración de selección dentro de un bloque declare/begin/end. Puedo hacer esto en T-SQL, pero me gustaría saber cómo hacerlo en PL/SQL.

El código es un poco como la siguiente:

declare 
    blah number := 42; 
begin 
    select * 
    from x 
    where x.value = blah; 
end; 

Answer 1

Un bloque PL/SQL anónimos, como el que se ha mostrado, no puede "volver" nada. Sin embargo, puede interactuar con la persona que llama por medio de variables de vinculación.

Así que el método que utilizaría en este caso sería declarar una referencia de cursor, abrirla en el bloque PL/SQL para la consulta deseada, y dejar que la aplicación que llama extraiga las filas de ella. En SQLPlus esto se vería así:

variable rc refcursor 

declare 
    blah number := 42; 
begin 
    open :rc for 
    select * 
    from x 
    where x.value = blah; 
end; 
/

print x 

Si modifica su PL/SQL como una función almacenada, entonces podría devolver valores. En este caso lo que es posible que desee hacer es crear un tipo de colección, recupera todas las filas en una variable de ese tipo, y devolverlo:

CREATE TYPE number_table AS TABLE OF NUMBER; 

CREATE FUNCTION get_blah_from_x (blah INTEGER) 
    RETURN number_table 
    IS 
    values number_table; 
    BEGIN 
    SELECT id 
     BULK COLLECT INTO values 
     FROM x 
     WHERE x.value = blah; 
    RETURN values; 
    END; 
/

Answer 2

Bueno, esto depende en gran medida de la biblioteca de acceso a datos.

Puede devolver cualquier tipo compatible con SQL como parámetro. Esto incluye tipos de SQL complejos y tipos de colección. Pero la mayoría de las bibliotecas simplemente no son capaces de manejar los tipos de objetos de Oracle.

De cualquier manera, mis ejemplos utilizarán estos tipos de objetos:

create type SomeType as object(Field1 VarChar(50)); 

create type SomeTypeList as table of SomeType; 

Cuando su biblioteca de acceso puede manejar los tipos de objetos, sólo podían devolver una lista de objetos PL/SQL:

begin 
    :list := SomeTypeList(SomeType('a'),SomeType('b'),SomeType('c')); 
end; 

Si no, puede hackearlo forzando esta lista en una selección y devolver su resultado como un cursor:

declare 
    list SomeTypeList; 
begin 
    list := SomeTypeList(SomeType('a'),SomeType('b'),SomeType('c')); 
    open :yourCursor for 
    SELECT A 
    FROM table(list); 
end;