Re: Exit Program ( programa de salida de usuario)

[Jesus Busquets]

Title: Exit Program ( programa de salida de usuario)

Machado Nicolás Guillermo escribió: Buenas Tardes, En la pantalla de iSeries Navigator, en la parte de backup, aparece una opcion avanzada para indicar un programa de salida. El tema es que en ningun lugar dice si recibe o no parametros. Y tampoco puedo jugar mucho con la opcion porque es el backup del sistema de produccion. Si alguien tiene alguna data, sera bienvenida. Te mando la lista de parámetros que utilizo en mi CL de atención de dicho programa: PGM PARM(&trabajo &cuando &tipo_bckup &disposit &juego &msg)  DCL &trabajo    *CHAR 10       DCL &cuando     *CHAR  7      /* Antes o despues del backup*/  DCL &tipo_bckup *CHAR  8        DCL &disposit   *CHAR 10       DCL &juego      *CHAR  4      /* Juego de cintas */  DCL &msg        *CHAR  7      /* Mensaje de terminacion (para saber si acabó bien)*/ Te indico  que el programa se llama dos veces, una antes del backup, y otra después. Para saber dentro del programa en qué momento estoy, se usa la variable &cuando, de la siguiente manera IF (&cuando = '*BEFORE')  THEN(DO)  Else Endif.... Espero que te sirva Saludos Jesus Busquets Grespania, SA