Para Jose Andres Tobaruela
Ponte en contacto conmigo puede que tenga una colaboración para ti. 
Mi correo [email protected]
Un saludo
 

________________________________

De: [email protected] en nombre de JOSE ANDRES TOBARUELA
Enviado el: mié 09/12/2009 17:33
Para: [email protected]
Asunto: Re: Resumen de Forum.help400, Vol 38, Envío 16


hola a todos.
 
Estoy sin curro, acabo de acabar un curso de WDSC en eEL CENTRO DE FORMACION 
TIC DE MADRID SUR,impartido pot IBM vivo en madrid y llevo trabajando en 400 
desde hace unos 12 años principalmente en COBOL400 aunque no le hago feos a RPG 
(CONOZCO FREE RPG) ni a desarrollos ILE, si sabeis de algun trabajo o de alguna 
colaboración en freelance os lo agradecería, tengo una bebe de 3 meses y me 
quedan 6 meses de paro.
 
Un saludo a todos
 


 
El 9 de diciembre de 2009 16:52, <[email protected]> 
escribió:


        Envíe los mensajes para la lista Forum.help400 a
               [email protected]
        
        Para subscribirse o anular su subscripción a través de la WEB
               http://listas.combios.es/cgi-bin/mailman/listinfo/forum.help400
        
        O por correo electrónico, enviando un mensaje con el texto "help" en
        el asunto (subject) o en el cuerpo a:
               [email protected]
        
        Puede contactar con el responsable de la lista escribiendo a:
               [email protected]
        
        Si responde a algún contenido de este mensaje, por favor, edite la
        linea del asunto (subject) para que el texto sea mas especifico que:
        "Re: Contents of Forum.help400 digest...". Además, por favor, incluya
        en la respuesta sólo aquellas partes del mensaje a las que está
        respondiendo.
        
        
        Asuntos del día:
        
          1. RE:  ( González Torrejón, Javier )
          2. RE: Ejemplo básico de un programa de trigger en rpg.
             (Bernabé Estrada)
          3. RE: Ejemplo básico de un programa de trigger en rpg.
             (Pedro Molina)
          4. RE: Ejemplo básico de un programa de trigger en rpg.
             (Juan Carlos Paredes)
        
        
        ----------------------------------------------------------------------
        
        Message: 1
        Date: Wed, 9 Dec 2009 16:07:48 +0100
        From: " González Torrejón, Javier "     <[email protected]>
        Subject: RE:
        To: "'forum.help400'" <[email protected]>
        Message-ID:
               
<e7b089dbe01ffd4e94bf291d88641fb8175a917...@agrmail.agroseguro.com>
        Content-Type: text/plain; charset="iso-8859-1"
        
        mira si asi te vale
        
        A          R REG001
        A            IHPAR          3  0       EDTCDE(1)
        A                                      POSITION(&FILA &COLUM)
        A                                      FONT(5707 (*POINTSIZE 10))
        A            INPAR          3  0       EDTCDE(1)
        A                                      POSITION(&FILA &COLUM)
        A                                      FONT(5707 (*POINTSIZE 10))
        A            FILA           5S 3P
        A            COLUM          5S 3P
        
        ________________________________
        De: [email protected] 
[mailto:[email protected]] En nombre de Juan Gutierrez 
Ruiz
        Enviado el: miércoles, 09 de diciembre de 2009 15:13
        Asunto:
        
        
        Buenos dias forum
        se me ha presentado un requerimeinto de impresion  de facturas
        les cuento, tengo el formato de impresion de facturas en un archivo 
PRTF para todas las sucursales que manejamos
        por error del impresor las nuevas facturas las enviaron diferentes  en 
su formato a cada sucursal
        
        el problema que tengo es hacer un archivo PRTF para cada sucursal con 
las caidas deacuerdo al formato que les enviaron.
        
        
        la pregunta es:
        se puede hacer un archivo PRTF con las posiciones Variables, es decir 
que se les pueda cambiar la posicion dependiendo de la sucursal
        
        he estado investigando y ha llegado a la conclucion de meter la DDS en 
un arreglo dentro del RPG e ir moviendoles los valores que me tecleen en la 
pantalla y generar cada linea de la matriz en un archivo QDDSSRC, para hacer el 
puente ya con las posiciones y mandarlo a compilar
        
        alguna sugerencia o alguna ayuda
        gracias de antemano
        
        
        
        Saludos
        Juan Gutierrez Ruiz
        
        
        
        ________________________________
        Windows Live y Samsung equipan tu casa. Participa y 
gana!<http://www.equipatucasa.com.mx <http://www.equipatucasa.com.mx/> >
        ------------ próxima parte ------------
        Se ha borrado un adjunto en formato HTML...
        URL: 
<http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20091209/738c7a82/attachment-0001.htm>
        
        ------------------------------
        
        Message: 2
        Date: Wed, 9 Dec 2009 09:11:13 -0600
        From: Bernabé Estrada <[email protected]>
        Subject: RE: Ejemplo básico de un programa de trigger en rpg.
        To: "'forum.help400'" <[email protected]>
        Message-ID: <[email protected]>
        Content-Type: text/plain; charset="iso-8859-1"
        
        La respuesta es SI, un solo programa se puede adicionar varias veces 
como
        trigger, de hecho, hasta se puede poner mas de una ves por evento si no 
se
        le da el parámetro RPLTRG(*YES)  ( lo cual me paso a mi por error y me
        duplico los saldos, jeje).
        
        
        
        Saludos.
        
        
        
        
        
         _____
        
        From: [email protected]
        [mailto:[email protected]] On Behalf Of Pedro 
Molina
        Sent: Miércoles, 09 de Diciembre de 2009 08:14 a.m.
        To: [email protected]
        Subject: RE: Ejemplo básico de un programa de trigger en rpg.
        
        
        
        Gracias Jesús.
        
        Plantearé la pregunta de otra forma, ya que en sí como le decía a 
Víctor,
        pude codificar un programa de trigger sencillo de acuerdo a un ejemplo y
        funcionó.
        
        Ahi va...
        
        La pregunta es que si un programa de Trigger te puede controlar los 3 o 
4
        eventos que se puedan suscitar con una determinada tabla, ya que al 
crear el
        el desencadenante asociado a la tabla con el mandato ADDPFTRG, solo te
        permite definir un evento (*INSERT, *DELETE, *UPDATE, *READ).
        
        Para ser un poco más claro, es necesario crear un programa Trigger 
diferente
        para cada evento que se quiera controlar?
        
        Saludos!!
        
        
         _____
        
        Date: Wed, 9 Dec 2009 08:37:40 +0100
        From: [email protected]
        To: [email protected]
        Subject: Re: Ejemplo básico de un programa de trigger en rpg.
        
        ¿qué es eso ""básico" que quieres hacer?
        ¿Modificar la misma tabla que dispara el trigger, o algún otro tipo de
        operación?
        
        Te envío un par de programas de ejemplo, uno de cada estilo, que, como 
ves,
        tienen bastante en común. El código de la mayor parte de los mismos ha 
sido
        sacado de la documentación.
        
        El programa t...@extrz hacía un cambio en el mismo registro del archivo 
del
        trigger (se usaba para el cambio al euro, para mantener automáticamente
        sincronizado el campo de valor en euros con el de pesetas) . El otro
        programa utiliza el trigger para preparar un envío de los datos del 
registro
        a un sistema externo.
        
        Hay que tener en cuenta que si se quiere poder modificar el mismo 
registro
        del archivo que llama al trigger, el mandato para asignar el trigger se 
hace
        con la opción "permitir cambio repetido" en *YES, o el cambio no se 
permite.
        
        Saludos
        
        
        
        
        
        Pedro Molina escribió:
        
        Saludos Foreros!!
        
        Esta vez quisiera saber si alguien me pudiera mandar un ejemplo de lo 
más
        básico de un programa de Trigger en RPGIV.
        
        Quiero entrarle a esta onda y pues quiero ver como es la cosa.
        
        Gracias anticipadas por su ayuda.
        
        Saludos!!
        
         _____
        
        Discover the new Windows Vista Learn
        <http://search.msn.com/results.aspx?q=windows+vista&mkt=en-US&form=QBRE>
        more!
        
        
        
        
        
        
         _____
        
        
        
        
        ____________________________________________________
        © Publicaciones Help400, S.L. - Todos los
        derechos reservados http://www.help400.es <http://www.help400.es/>  
<http://www.help400.es/>
        ----------------------------------------------------
        Para darte de baja visita la siguente URL:
        http://listas.combios.es/mailman/listinfo/forum.help400
        
        
        
        --
        
        Jesús Busquets
        
        GRESPANIA, S.A.
        
        Este mensaje se dirige exclusivamente a su destinatario y puede contener
        información privilegiada o confidencial. Si no es Vd. el destinatario
        indicado, queda notificado de que la utilización, divulgación y/o copia 
sin
        autorización está prohibida en virtud de la legislación vigente. Si ha
        recibido este mensaje por error, le rogamos que nos lo comunique
        inmediatamente por esta misma vía y proceda a su destrucción.
        
        
        
        
        
         _____
        
        Explore the seven wonders of the world Learn more!
        
<http://search.msn.com/results.aspx?q=7+wonders+world&mkt=en-US&form=QBRE>
        
        ------------ próxima parte ------------
        Se ha borrado un adjunto en formato HTML...
        URL: 
<http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20091209/0ab4440e/attachment-0001.htm>
        
        ------------------------------
        
        Message: 3
        Date: Wed, 9 Dec 2009 15:39:50 +0000
        From: Pedro Molina <[email protected]>
        Subject: RE: Ejemplo básico de un programa de trigger en rpg.
        To: <[email protected]>
        Message-ID: <[email protected]>
        Content-Type: text/plain; charset="iso-8859-1"
        
        
        Gracias Bernabe.
        
        
        
        Me puedes dar un ejemplo? (no de el programa) sino del comando, si no 
es mucha molestia.
        
        
        
        Digamos que primero hago lo siguiente:
        
        
        
         ===> ADDPFTRG FILE(SICODAT/TABSUBOP) TRGTIME(*BEFORE) 
TRGEVENT(*UPDATE) PGM(SIC
        OPGM/TRIGGERMOD) TRG(ACTUALIZAR) ALWREPCHG(*YES)
        
        
        
        con esto ya se enlaza el programa trigger a esta tabla y si hago 
cualquier cambio en ésta, se dispara el trigger.
        
        
        
        Ahora, si elimino un registro de la misma tabla el trigger no se 
dispara.
        
        
        
        Que o como tengo que hacer para controlar estos 2 eventos?
        
        
        
        Saludos!!
        
        
        
        From: [email protected]
        To: [email protected]
        Subject: RE: Ejemplo básico de un programa de trigger en rpg.
        Date: Wed, 9 Dec 2009 09:11:13 -0600
        
        
        
        
        
        
        
        
        
        La respuesta es SI, un solo programa se puede adicionar varias veces 
como trigger, de hecho, hasta se puede poner mas de una ves por evento si no se 
le da el parámetro RPLTRG(*YES)  ( lo cual me paso a mi por error y me duplico 
los saldos, jeje).
        
        Saludos.
        
        
        
        
        
        
        From: [email protected] 
[mailto:[email protected]] On Behalf Of Pedro Molina
        Sent: Miércoles, 09 de Diciembre de 2009 08:14 a.m.
        To: [email protected]
        Subject: RE: Ejemplo básico de un programa de trigger en rpg.
        
        Gracias Jesús.
        
        Plantearé la pregunta de otra forma, ya que en sí como le decía a 
Víctor, pude codificar un programa de trigger sencillo de acuerdo a un ejemplo 
y funcionó.
        
        Ahi va...
        
        La pregunta es que si un programa de Trigger te puede controlar los 3 o 
4 eventos que se puedan suscitar con una determinada tabla, ya que al crear el 
el desencadenante asociado a la tabla con el mandato ADDPFTRG, solo te permite 
definir un evento (*INSERT, *DELETE, *UPDATE, *READ).
        
        Para ser un poco más claro, es necesario crear un programa Trigger 
diferente para cada evento que se quiera controlar?
        
        Saludos!!
        
        
        
        
        Date: Wed, 9 Dec 2009 08:37:40 +0100
        From: [email protected]
        To: [email protected]
        Subject: Re: Ejemplo básico de un programa de trigger en rpg.
        
        ¿qué es eso ""básico" que quieres hacer?
        ¿Modificar la misma tabla que dispara el trigger, o algún otro tipo de 
operación?
        
        Te envío un par de programas de ejemplo, uno de cada estilo, que, como 
ves, tienen bastante en común. El código de la mayor parte de los mismos ha 
sido sacado de la documentación.
        
        El programa t...@extrz hacía un cambio en el mismo registro del archivo 
del trigger (se usaba para el cambio al euro, para mantener automáticamente 
sincronizado el campo de valor en euros con el de pesetas) . El otro programa 
utiliza el trigger para preparar un envío de los datos del registro a un 
sistema externo.
        
        Hay que tener en cuenta que si se quiere poder modificar el mismo 
registro del archivo que llama al trigger, el mandato para asignar el trigger 
se hace con la opción "permitir cambio repetido" en *YES, o el cambio no se 
permite.
        
        Saludos
        
        
        
        
        
        Pedro Molina escribió:
        Saludos Foreros!!
        
        Esta vez quisiera saber si alguien me pudiera mandar un ejemplo de lo 
más básico de un programa de Trigger en RPGIV.
        
        Quiero entrarle a esta onda y pues quiero ver como es la cosa.
        
        Gracias anticipadas por su ayuda.
        
        Saludos!!
        
        
        
        Discover the new Windows Vista Learn more!
        
        
        
         ____________________________________________________© Publicaciones 
Help400, S.L. - Todos losderechos reservados 
http://www.help400.es----------------------------------------------------Para 
<http://www.help400.es----------------------------------------------------para/>
  darte de baja visita la siguente 
URL:http://listas.combios.es/mailman/listinfo/forum.help400
        
        
        --
        Jesús Busquets
        GRESPANIA, S.A.
        Este mensaje se dirige exclusivamente a su destinatario y puede 
contener información privilegiada o confidencial. Si no es Vd. el destinatario 
indicado, queda notificado de que la utilización, divulgación y/o copia sin 
autorización está prohibida en virtud de la legislación vigente. Si ha recibido 
este mensaje por error, le rogamos que nos lo comunique inmediatamente por esta 
misma vía y proceda a su destrucción.
        
        
        
        
        
        Explore the seven wonders of the world Learn more!
        _________________________________________________________________
        Discover the new Windows Vista
        http://search.msn.com/results.aspx?q=windows+vista&mkt=en-US&form=QBRE
        ------------ próxima parte ------------
        Se ha borrado un adjunto en formato HTML...
        URL: 
<http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20091209/4bdaf3f0/attachment-0001.htm>
        
        ------------------------------
        
        Message: 4
        Date: Wed, 9 Dec 2009 16:53:42 +0100
        From: "Juan Carlos Paredes" <[email protected]>
        Subject: RE: Ejemplo básico de un programa de trigger en rpg.
        To: "forum.help400" <[email protected]>
        Message-ID:
               
<78115df822ec5d4db1a4044cad6f0f4b272...@servmail2003.domnt.everest.es>
        Content-Type: text/plain; charset="iso-8859-1"
        
        Haz un nuevo addpftrg al mismo fichero , con TRGEVENT(*DELETE) y 
llamando al mismo programa.
        
        
        
        Saludos.
        
        
        
        Juan Carlos.
        
        
        
        De: Pedro Molina [mailto:[email protected]]
        Enviado el: miércoles, 09 de diciembre de 2009 16:40
        Para: [email protected]
        Asunto: RE: Ejemplo básico de un programa de trigger en rpg.
        
        
        
        Gracias Bernabe.
        
        Me puedes dar un ejemplo? (no de el programa) sino del comando, si no 
es mucha molestia.
        
        Digamos que primero hago lo siguiente:
        
         ===> ADDPFTRG FILE(SICODAT/TABSUBOP) TRGTIME(*BEFORE) 
TRGEVENT(*UPDATE) PGM(SIC
        OPGM/TRIGGERMOD) TRG(ACTUALIZAR) ALWREPCHG(*YES)
        
        con esto ya se enlaza el programa trigger a esta tabla y si hago 
cualquier cambio en ésta, se dispara el trigger.
        
        Ahora, si elimino un registro de la misma tabla el trigger no se 
dispara.
        
        Que o como tengo que hacer para controlar estos 2 eventos?
        
        Saludos!!
        
        
        ________________________________
        
        From: [email protected]
        To: [email protected]
        Subject: RE: Ejemplo básico de un programa de trigger en rpg.
        Date: Wed, 9 Dec 2009 09:11:13 -0600
        
        La respuesta es SI, un solo programa se puede adicionar varias veces 
como trigger, de hecho, hasta se puede poner mas de una ves por evento si no se 
le da el parámetro RPLTRG(*YES)  ( lo cual me paso a mi por error y me duplico 
los saldos, jeje).
        
        
        
        Saludos.
        
        
        
        
        
        ________________________________
        
        From: [email protected] 
[mailto:[email protected]] On Behalf Of Pedro Molina
        Sent: Miércoles, 09 de Diciembre de 2009 08:14 a.m.
        To: [email protected]
        Subject: RE: Ejemplo básico de un programa de trigger en rpg.
        
        
        
        Gracias Jesús.
        
        Plantearé la pregunta de otra forma, ya que en sí como le decía a 
Víctor, pude codificar un programa de trigger sencillo de acuerdo a un ejemplo 
y funcionó.
        
        Ahi va...
        
        La pregunta es que si un programa de Trigger te puede controlar los 3 o 
4 eventos que se puedan suscitar con una determinada tabla, ya que al crear el 
el desencadenante asociado a la tabla con el mandato ADDPFTRG, solo te permite 
definir un evento (*INSERT, *DELETE, *UPDATE, *READ).
        
        Para ser un poco más claro, es necesario crear un programa Trigger 
diferente para cada evento que se quiera controlar?
        
        Saludos!!
        
        
        ________________________________
        
        Date: Wed, 9 Dec 2009 08:37:40 +0100
        From: [email protected]
        To: [email protected]
        Subject: Re: Ejemplo básico de un programa de trigger en rpg.
        
        ¿qué es eso ""básico" que quieres hacer?
        ¿Modificar la misma tabla que dispara el trigger, o algún otro tipo de 
operación?
        
        Te envío un par de programas de ejemplo, uno de cada estilo, que, como 
ves, tienen bastante en común. El código de la mayor parte de los mismos ha 
sido sacado de la documentación.
        
        El programa t...@extrz hacía un cambio en el mismo registro del archivo 
del trigger (se usaba para el cambio al euro, para mantener automáticamente 
sincronizado el campo de valor en euros con el de pesetas) . El otro programa 
utiliza el trigger para preparar un envío de los datos del registro a un 
sistema externo.
        
        Hay que tener en cuenta que si se quiere poder modificar el mismo 
registro del archivo que llama al trigger, el mandato para asignar el trigger 
se hace con la opción "permitir cambio repetido" en *YES, o el cambio no se 
permite.
        
        Saludos
        
        
        
        
        
        Pedro Molina escribió:
        
        Saludos Foreros!!
        
        Esta vez quisiera saber si alguien me pudiera mandar un ejemplo de lo 
más básico de un programa de Trigger en RPGIV.
        
        Quiero entrarle a esta onda y pues quiero ver como es la cosa.
        
        Gracias anticipadas por su ayuda.
        
        Saludos!!
        
        ________________________________
        
        Discover the new Windows Vista Learn more! 
<http://search.msn.com/results.aspx?q=windows+vista&mkt=en-US&form=QBRE>
        
        
        
        
        
        ________________________________
        
        
        
        
        
        
        ____________________________________________________
        © Publicaciones Help400, S.L. - Todos los
        derechos reservados http://www.help400.es <http://www.help400.es/>  
<http://www.help400.es/>
        ----------------------------------------------------
        Para darte de baja visita la siguente URL:
        http://listas.combios.es/mailman/listinfo/forum.help400
        
        
        
        --
        
        Jesús Busquets
        
        GRESPANIA, S.A.
        
        Este mensaje se dirige exclusivamente a su destinatario y puede 
contener información privilegiada o confidencial. Si no es Vd. el destinatario 
indicado, queda notificado de que la utilización, divulgación y/o copia sin 
autorización está prohibida en virtud de la legislación vigente. Si ha recibido 
este mensaje por error, le rogamos que nos lo comunique inmediatamente por esta 
misma vía y proceda a su destrucción.
        
        
        
        
        
        ________________________________
        
        Explore the seven wonders of the world Learn more! 
<http://search.msn.com/results.aspx?q=7+wonders+world&mkt=en-US&form=QBRE>
        
        
        
        ________________________________
        
        Discover the new Windows Vista Learn more! 
<http://search.msn.com/results.aspx?q=windows+vista&mkt=en-US&form=QBRE>
        
        Se certificó que el correo entrante no contiene virus.
        Comprobada por AVG - www.avg.es <http://www.avg.es/> 
        Versión: 9.0.709 / Base de datos de virus: 270.14.99/2553 - Fecha de la 
versión: 12/09/09 08:32:00
        
        ------------ próxima parte ------------
        Se ha borrado un adjunto en formato HTML...
        URL: 
<http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20091209/85559d9f/attachment.htm>
        
        ------------------------------
        
        __________________________________________________
        Forum.HELP400 es un servicio m&amp;amp;#225;s de ServerNEWS.
        &amp;amp;#169; Publicaciones Help400, S.L. - Todos los derechos 
reservados
        http://www.help400.es <http://www.help400.es/> 
        _____________________________________________________
        
        Para darte de baja visita la siguente URL:
        http://listas.combios.es/mailman/listinfo/forum.help400
        
        Fin de Resumen de Forum.help400, Vol 38, Envío 16
        *************************************************
        


<<winmail.dat>>

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