Hola

    Puedes utilizar, si es un programa RPG, la subrutina de excepción/error
de archivos INFSR(NOMBRE_DE_SUBRUTINA) en la especificación F del fichero
de pantalla, esta subrutina toma el control cuando se produce un CPF y en
ella controlas el error.

Un saludo

El dom., 28 oct. 2018 a las 18:31, Carlos (<[email protected]>)
escribió:

> Hola
>
> No tengo un sistema a mano, pero si no estoy equivocado el CPF4131 no da
> opciones de respuesta, así que será un mensaje de programa el que avisa de
> que te ha dado ese mensaje y te pide una respuesta. Tendrás que
> monitorizar, aparte del CPF4131, el que te saca el mensaje que espera
> respuesta (si el programa es RPG será un RPGxxxx, por ejemplo).
>
> Saludos
>
> Carlos
>
>
> El 28/10/18 a las 12:58, Joaquín Flor López escribió:
>
> Hola Ignacio,
>
>
>
> Gracias por tu respuesta. Sí, puede ser para un fichero de pantalla o un
> fichero de datos (como es mi caso). Pero eso hace que no me entere si tiene
> un nivel diferente y lo que quiero es tener control sobre ello. Tengo
> monitorizado el CPF4131 para sacar una pantalla muy bonita informando del
> problema porque el programa tiene que procesar el fichero sin problema de
> nivelación. Pero sucede una cosa muy curiosa, la pantalla rompe con el
> típico error descontrolado, con las opciones de C, G, I, etc. (lo cual
> queda muy feo) y al contestar ejecuta la instrucción que he monitorizado y
> sale mi pantalla bonita.
>
>
>
> ¿Por qué el CPF4131 tiene ese comportamiento y los demás errores (bueno,
> tampoco he probado todos) se comportan de manera diferente?
>
>
>
> Saludos.
>
>
>
> *De:* [email protected]
> <[email protected]>
> <[email protected]> *En nombre de *Téllez Alvarado,
> Ignacio
> *Enviado el:* sábado, 27 de octubre de 2018 14:54
> *Para:* forum.help400 <[email protected]>
> <[email protected]>
> *Asunto:* RE: CPF4131 Error de nivel
>
>
>
> Joaquin:
>
> NO es recomendable,   pero puedes hacer esto
>
> CHGDSPF FILE(*LIBL/PANTALLA)
>
>         LVLCHK(*NO)
>
>
>
> Atte
>
> Ignacio
>
>
>
> *De:* [email protected] [
> mailto:[email protected]
> <[email protected]>] *En nombre de *Joaquín Flor
> López
> *Enviado el:* sábado, 27 de octubre de 2018 8:34
> *Para:* [email protected]
> *Asunto:* CPF4131 Error de nivel
>
>
>
> Buenos días,
>
>
>
> ¿Alguien sabe cómo se puede manejar el error CPF4131 para que no salga la
> típica pantalla de error del AS/400?
>
>
>
> He probado con el MONMSG CPF4131, incluso con el CPF0000, pero aunque hace
> el EXEC del MONMSG, antes rompe la pantalla como si no se hubiese
> monitorizado.
>
>
>
> Saludos.
>
>
> -----------------------------------------------------------------
> Notice of Confidentiality: The information transmitted is intended only
> for the sender and person or entity to which it is addressed and may
> contain confidential and/or privileged material. Any review,
> e-transmission, dissemination or other use of, or taking of any action in
> reliance upon, this information by persons or entities other than the
> intended recipient is prohibited.
> If you received this in error, please contact the sender immediately by
> return electronic transmission and then immediately delete this
> transmission, including all attachments, without copying, distributing or
> disclosing same.
> ------------------------------------------------------------------
> Aviso de Confidencialidad: Este correo electrónico y/o el material adjunto
> es para uso exclusivo del emisor y la persona o entidad a la que
> expresamente se le ha enviado, y puede contener información confidencial o
> material privilegiado. Si usted no es el destinatario legítimo del mismo,
> por favor repórtelo inmediatamente al remitente del correo y bórrelo.
> Cualquier revisión, retransmisión, difusión o cualquier otro uso de este
> correo, por personas o entidades distintas a las del destinatario legítimo,
> queda expresamente prohibido. Este correo electrónico no pretende ni debe
> ser considerado como constitutivo de ninguna relación legal, contractual o
> de otra índole similar.
>
> ____________________________________________________
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>
> ____________________________________________________
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a