Hola Carlos! Gracias por la sugerencia, probare luego y vere que pasa, total
perdido por perdido no pierdo nada con probar…

 

Saludos,

 

  _____  

De: [email protected]
[mailto:[email protected]] En nombre de Carlos de
Diego
Enviado el: Miércoles, 17 de Marzo de 2010 17:36
Para: forum.help400
Asunto: Re: Ayuda, Store Procedure, ya no se para donde disparar.

 

Daria,

Prueba a definir el procedimiento con parametros del tipo INOUT (En el
ejemplo lo pones como IN)

De todas formas, el SQL interactivo no te va a devolver ningún parámetro.

Saludos

El 17 de marzo de 2010 17:06, Dario Heinze <[email protected]>
escribió:

Hola esti...@s

 

Estoy incursionando en el tema de los store procedure.

 

Creo el store..

 

CREATE PROCEDURE BIBLIO.STRPRC ( 

            IN P1 CHAR(2) , 

            IN P2 CHAR(1) , 

            IN P23 NUMERIC(14, 0) ) 

            DYNAMIC RESULT SETS 2 

            LANGUAGE RPGLE 

            NOT DETERMINISTIC 

            EXTERNAL NAME 'BIBLIO/PGMILERPG' 

            PARAMETER STYLE GENERAL ; 

El store tiene 23 parametros, el ILE RPG es asi

 

H DftActGrp(*No) ActGrp(*New)

 

C* Aca con los parámetros genero información para el procedimiento que
resuelve la lógica del negocio

C* Genero la cabecera cuya clave es el campo xt1ntr que luego utilizo para
filtrar lo que debo devolver

 

C/EXEC SQL DECLARE c1 CURSOR FOR

C+ SELECT * FROM xt03fre WHERE xt3ntr = :xt1ntr       

C+    FOR READ ONLY             

C/END-EXEC                      

*                                              

C/EXEC SQL DECLARE c2 CURSOR FOR                

C+ SELECT * FROM xt04frer WHERE xt4ntr = :xt1ntr

C+    FOR READ ONLY                             

C/END-EXEC                                      

*                                     

C/EXEC SQL                             

C+ OPEN c1                             

C/END-EXEC                             

 *                                     

C/EXEC SQL                             

C+ OPEN c2                             

C/END-EXEC                             

 *                                     

C/EXEC SQL                             

C+ SET RESULT SETS CURSOR c1, CURSOR c2

C/END-EXEC                             

*                                                                 

C     Fin           TAG                                            

C                   SETON                                        LR

C                   RETURN                                         

 

 

El store lo ejecuto desde STRSQL con 

CALL STRPRC(P1, P2, …, P23)

 

El mismo se ejecuta, arma las tablas del proceso (las graba en base a los
parametros) se ejecuta y termina sin error, PERO AQUI EL PROBLEMA, no me
devuelve los cursores que debería estar retornando…

 

 

 

 


____________________________________________________
© Publicaciones Help400, S.L. - Todos los
derechos reservados http://www.help400.es
----------------------------------------------------
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400


----------------------------------------------------------------------------
--


Conocés Tan-Gram?


Sistema Integral para la administración de organizaciones
www.tan-gram.com.ar es Buena Gestión 

____________________________________________________
© Publicaciones Help400, S.L. - Todos los
derechos reservados http://www.help400.es
----------------------------------------------------
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400

Responder a