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;
ENDMON:
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.