Procedimiento Almacenado Devolver una Select

[[Héctor Randolph]]

Hola granchop!

Aquí tienes un ejemplo de un procedimiento almacenado en FireBird que se comporta como un SELECT

Código SQL [-]
SET TERM !!;

CREATE PROCEDURE prueba( p1 SMALLINT)
RETURNS (
    campo1 SMALLINT,/*En la cláusula RETURNS se especifican las columnas que devolverá la consulta*/
    campo2 NUMERIC(15,2),
    .
    .
    .
    campoN VARCHAR(15))
AS
BEGIN
    FOR SELECT /*La cláusula FOR SELECT permite que el procedimiento se comporte como un SELECT*/
      c1,
      c2,
      .
      .
      .
      cN
    FROM T1
    WHERE c1=1
    INTO /*Coloca los resultados obtenidos con SELECT dentro de las variables declaradas con RETURNS */
      :campo1,
      :campo2,
      .
      .
      .
      :campoN
    DO
        SUSPEND;/*Detiene la ejecución del procedimiento para mostrar el resultado parcial*/
END!!

SET TERM ;!!

Después solamente hay que llamar al procedimiento de la siguiente manera:

Código SQL [-]
  SELECT * FROM prueba(10)

Espero que te sea útil