Saludos.

Jesus, te agradezco tu respuesta, esto lo resolvimos un poco antes de
recibir tu mensaje y funciona de maravilla, teniamos la respuesta frente a
nosotros y no la habiamos visto :o{

Fernando, te agradezco tambien, pero lo resolvimos como lo sugiere Jesus,
tal vez valdria la pena que empecemos a programar en RPG IV y con esto nos
podriamos evitar algunos problemas.

Ahora surge otra duda, este archivo se llena desde un sistema remoto
mediante DDMF y cuando en el RPG (llamado por el trigger CL) no se dan
ciertas condiciones, deseamos que la insercion del registro no se efectue,
para ello en el CL enviamos un mensaje de escape con SNDPGMMSG (de acuerdo
a la documentacion que tenemos), pero esto no cancela la operacion del
registro actual sino que envia el escape al programa remoto que esta
haciendo la copia y lo cancela, conocen alguna forma de hacer que la
operacion se cancele solamente para el registro actual y no para todo el
proceso?

El mensaje de escape se envia con el siguiente comando:

SNDPGMMSG  MSGID(CPF9898) MSGF(QCPFMSG) MSGDTA(&MSGERR) MSGTYPE(*ESCAPE)

Como veran, hasta ahora habiamos hecho solamente triggers mas simples que
escribian o borraban registros en otros archivos :-)

Jes�s Humberto Olague Alcal�
L�der de Proyectos
Envases y Tapas Modelo, S.A. de C.V.
e-mail: [EMAIL PROTECTED]
Tel:  (478) 985 4100 Ext. 247
Fax: (478) 985 4100 Ext. 249



                                                                                       
             
                    Jesus                                                              
             
                    Busquets/NOTES/ES             Para:   [EMAIL PROTECTED]            
      
                    <[EMAIL PROTECTED]        cc:                                      
         
                    om>                           Asunto:      Re: Triggers            
             
                    Enviado por:                                                       
             
                    forum.help400-request@                                             
             
                    combios.es                                                         
             
                                                                                       
             
                                                                                       
             
                    01/08/2003 01:51                                                   
             
                    Por favor, responda a                                              
             
                    forum.help400                                                      
             
                                                                                       
             
                                                                                       
             





En la definici�n del trigger del archivo, tienes que especificar un
par�metro para que te acepte modificaciones en la imagen del registro:

Permitir cambio repetido . . . . ALWREPCHG      *YES

Saludos
Jesus Busquets
Grespania, SA




Please respond to [EMAIL PROTECTED]


Sent by:        [EMAIL PROTECTED]


To:        [EMAIL PROTECTED]
cc:

Subject:        Triggers

Saludos amigos foreros no vacacionistas, los pocos que quedan.

Tenemos el siguiente problema y no damos con la solucion, agregamos a un
archivo fisico un trigger para antes de la insercion, el trigger es un CL
(para hacer algunos overrides a archivos) que llama a un RPG (en el se
hacen varios calculos y en base a sus resultados se debe dar un cierto
valor a un campo en el registro nuevo), el RPG regresa al CL modificado el
nuevo valor del PARM1 del trigger, pero el registro se escribe en el
archivo sin las modifcaciones que se hicieron en el trigger. Estamos en
V5R2.

Ya le buscamos por todos lados y no lo logramos, algun idea?

Jes�s Humberto Olague Alcal�
L�der de Proyectos
Envases y Tapas Modelo, S.A. de C.V.
e-mail: [EMAIL PROTECTED]
Tel:  (478) 985 4100 Ext. 247
Fax: (478) 985 4100 Ext. 249




" Este mensaje es confidencial.   Si usted no es el destinatario de este
mensaje, le suplicamos se lo notifique al remitente mediante un correo
electr�nico y que borre el presente mensaje y sus anexos de su computadora
sin retener copia de los mismos.  No debe copiar este mensaje o usarlo para
cualquier prop�sito ni divulgar su contenido.  Muchas gracias.

This e-mail is confidential and may also be privileged. If you are not the
intended recipient please immediately advise the sender by reply e-mail and
delete this message and its attachments from your computer without
retaining a copy. You should not copy it or use it for any purpose nor
disclose its contents to any other person.  Thank you. "



_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]


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



" Este mensaje es confidencial.   Si usted no es el destinatario de este
mensaje, le suplicamos se lo notifique al remitente mediante un correo
electr�nico y que borre el presente mensaje y sus anexos de su computadora
sin retener copia de los mismos.  No debe copiar este mensaje o usarlo para
cualquier prop�sito ni divulgar su contenido.  Muchas gracias.

This e-mail is confidential and may also be privileged. If you are not the
intended recipient please immediately advise the sender by reply e-mail and
delete this message and its attachments from your computer without
retaining a copy. You should not copy it or use it for any purpose nor
disclose its contents to any other person.  Thank you. "





_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]

Responder a