¿Has probado a ejecutarlo desde iSeries Navigator, ejecutandolo como un
script de sql?

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
>
____________________________________________________
© 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