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>
> ------------ 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/>
> ----------------------------------------------------
> 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/>
> ----------------------------------------------------
> 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
> 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
> _____________________________________________________
>
> 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
> *************************************************
>
____________________________________________________
© 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