La culpa fue del spectrum

La culpa fue del spectrum

sábado, 23 de julio de 2016

Uso de MONITOR en un programa RPGLE

Cuando realizamos un programa intentamos controlar todo lo que puede ocurrir con el fin de que el programa realice correctamente su función. Pero en ocasiones necesitamos monitorizar los posibles errores, para eso tenemos MONITOR.

Mi uso de MONITOR es bastante sencillo, yo introduzco MONITOR en un trozo de código donde me interesa poder controlar cualquier error, no lo uso siempre ni en todos los programas. 

El uso de MONITOR es muy simple

Comienza escribiendo MONITOR y se finaliza con ENDMON.

MONITOR;

 bloque de código que se quiere monitorizar 

ENDMON;

Dentro del bloque a monitorizar el error se controla usando ON-ERROR 

ON-ERROR puede controlar cualquier error, un error de programa, un error de fichero, o incluso un código de error específico. Para ello usa *ALL, *PROGRAM, *FILE o el código.

Un ejemplo podría ser este.

MONITOR;

   A=B/C;
   ON-ERROR *PROGRAM;
     A=0;
     DUMP;

END-MON:

En este ejemplo el código ante cualquier error de programa que surgiera en la operación A=B/C, pondría la variable A a 0 y realizaría un vuelco que me permitiera ver con detalle lo ocurrido. 

Conduce entre la niebla

La culpa fue del spectrum