Ahi voy de metiche...
De esta forma es como se invoca un Store Procedure desde RPG.
/FREE
Chain P1 TABDAT01 ;
IF Not %Found() ;
Exsr @Insert ;
Endif ;
Return ;
/END-FREE
C @Insert Begsr
C/Exec sql
C+ Call Proc001
C+ (:P1, :P2, :P3, :P4, :P5)
C/End-Exec
C Endsr
Saludos!!
From: [email protected]
To: [email protected]
Date: Wed, 13 Jan 2010 15:17:09 -0500
Subject: RE: Store procedure desde RPG
Victor, si no mucha molestia puedes indicarme con un ejemplo como hago para
proveerle el control al programa para recibir n fileas.
Gracias,
hv
De: [email protected]
[mailto:[email protected]] En nombre de Víctor Bolaños
Enviado el: Miércoles, 13 de Enero de 2010 02:36 p.m.
Para: forum.help400
Asunto: Re: Store procedure desde RPG
Debes considerar que el store procedure, es un programa comun y corriente, como
lo es un programa RPG al cual le pasas una variable llave de un archivo y el
programa que invocas te devuelve los valores.
Para el caso de un store procedure que te devuelve varios filas, tu debes de
proveerle al programa el control para que reciba 1 o n RESPUESTAS del
procedimiento invocado.
Para invocar un procedimiento almacenado creado en SQL desde RPG, éste tiene
que ser un SQLRPGLE y lo ejecutas con un comando "CALL" desde una instruccion
SQL.
Podes probar con hacer un CALL al procedimiento desde la sesion de SQL
interactiva STRSQL.
De esta misma manera se ejecuta la invocacion de un procedimiento almacenado
desde una apliaccion Cliente-servidor.
STRSQL Enter>
CALL <F4>
From: Hector Vera G. <[email protected]>
To: forum.help400 <[email protected]>
Sent: Wed, January 13, 2010 7:14:10 AM
Subject: Store procedure desde RPG
Hola amigos,
Alguien me puede dar un ejemplo de como invocar un store procedure (hecho con
SQL) desde un programa RPG, considerando que el store devuelve varias filas
de datos.
Gracias y saludos.
Este mensaje se transmite exclusivamente para el uso del destinatario previsto
y puede contener información que es PRIVILEGIADA y/o CONFIDENCIAL. Dicha
información no expresa la posición de la compañía. Si usted no es el
destinatario previsto, se le notifica por este medio, que cualquier uso,
difusión, acceso o copia de esta comunicación está prohibida terminantemente.
Si usted ha recibido esta comunicación por error, destruya por favor todas las
copias de este mensaje y sus adjuntos y notifíquenos inmediatamente.
This message is sent exclusively for the use of the intended recipient and may
contain information that is PRIVILEGED and/or CONFIDENTIAL. This information do
not express the position of the company. If you are not the intended recipient,
you are hereby notified that any use, dissemination, disclosure or copying of
this communication is strictly prohibited. If you have received this
communication by mistake, please destroy all copies of this message and its
attachments and notify us immediately
"Bienvenido a la Vida, Bienvenido a InVita"
Este mensaje se transmite exclusivamente para el uso del destinatario previsto
y puede contener información que es PRIVILEGIADA y/o CONFIDENCIAL. Dicha
información no expresa la posición de la compañía. Si usted no es el
destinatario previsto, se le notifica por este medio, que cualquier uso,
difusión, acceso o copia de esta comunicación está prohibida terminantemente.
Si usted ha recibido esta comunicación por error, destruya por favor todas las
copias de este mensaje y sus adjuntos y notifíquenos inmediatamente.
This message is sent exclusively for the use of the intended recipient and may
contain information that is PRIVILEGED and/or CONFIDENTIAL. This information do
not express the position of the company. If you are not the intended recipient,
you are hereby notified that any use, dissemination, disclosure or copying of
this communication is strictly prohibited. If you have received this
communication by mistake, please destroy all copies of this message and its
attachments and notify us immediately
"Bienvenido a la Vida, Bienvenido a InVita"
_________________________________________________________________
News, entertainment and everything you care about at Live.com. Get it now!
http://www.live.com/getstarted.aspx____________________________________________________
© 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
