Como dejo el grupo No trabajo mas en AS400
El martes, 2 de octubre de 2018, Javier Mora escribió:
> Si no recuerdo mal, con
>
>
>
> CHGJOB INQMSGRPY(*SYSRPYL)
>
>
>
> Hará uso de la lista de respuestas del sistema.
>
>
>
> *De:* forum.help400-boun...@listas.combios.es [mailto:
> forum.help400-boun...@listas.combios.es] *En nombre de *Juan Gutierrez
> Ruiz
> *Enviado el:* martes, 2 de octubre de 2018 15:27
> *Para:* forum.help400; forum.help400-requ...@listas.combios.es
> *Asunto:* Monitoreo de mensajes
>
>
>
> Buenos días Foro
>
> solicitando nuevamente su ayuda
>
>
>
>
>
> Realice un programa RPGLESQL en donde eliminó algunos campos vacíos de una
> tabla
>
> a través de un ALTER TABLE (comando de SQL) , son varias Campos dependiendo
>
> del valor de la columna
>
> sin embargo cada que ejecuta la instrucción en el rpg me envia un mensaje
> de :
>
>
>
> Cambiar archivo TACUMHEX puede provocar que se pierdan datos. (C I)
>
>
>
> y quiero poner por default la respuesta "I"
>
>
>
> el programa lo tengo dentro de un programa CL
>
> CALL PGM(ADAM/NS4600DEP2)
>
> MONMSG MSGID(CPA32B2)
>
>
>
> monitoreando el mensaje que me emite
>
>
>
> este mensaje lo he puesto en WRKRPYLE en la secuencia 50
>
>
>
>
>
>
>
> Trabajar con Entradas de Lista Respuestas del Sistema
>
>
>
>Número ID
>
> Opc secuencia mensaje Respuesta Valor Compar.
>
>1RNQ0211 *DFT*NONE
>
> 10CPA0700 D *NONE
>
> 20RPG D *NONE
>
> 30CBE D *NONE
>
> 40PLI D *NONE
>
> 50CPD32B2 I *NONE
>
>
>
> sin embargo no me funciona
>
> o no lo toma en cuenta el programa CL
>
>
>
> mi pregunta es como puedo controlar el mensaje para que el usuario no lo
> responda
>
>
>
> mucas gracias de antemano a todos
>
> saludos
>
>
>
>
>
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.