Buenas tardes:
Una forma sería montar una CL que ejecute los trabajos que te interesan y al
final de la misma colocar un DLYJOB().
Por ejemplo:
PGM
DCL VAR(&HORA) TYPE(*DEC) LEN(6)
DCL VAR(&TIME) TYPE(*CHAR) LEN(6)
OTRO:
/* LLAMADA A TUS PROGRAMAS */
CALL ....................................
CALL.....................................
/* RETENGO EL TRABAJO DURANTE 5 MINUTOS */
DLYJOB DLY(300)
RTVSYSVAL SYSVAL(QTIME) RTNVAR(&TIME)
CHGVAR VAR(&HORA) VALUE(&TIME)
/* SALGO DEL TRABAJO A UNA HORA DETERMINADA*/
IF COND((&HORA *GT 011500) *AND (&HORA *LT +
013000)) THEN(GOTO CMDLBL(FIN))
GOTO CMDLBL(OTRO)
FIN: ENDPGM
La CL anterior sería la que planificaría los días y a la hora deseada. Por
ejemplo, todos los días a las 02:00h. Si te fijas, antes de las 02:00h
finalizo el programa para que cuando llege la hora de planificación
automática no entre en ejecución otra copia del programa. La ventana de la
hora de salida del programa ha de ser como mínimo del tiempo máximo de
ejecución de los trabajos de la CL + el tiempo que se retiene la aplicación,
para asegurarse que cuando se evalua la condición se va ha estar dentro de
ella una vez al día.
Espero haberte ayudado y que te sirva.
Saludos
Salva.
----- Original Message -----
From: "Metalkris, s.a." <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Thursday, September 29, 2005 1:16 PM
Subject: Planificador de trabajos multiples horas
> Estimados foreros:
>
> Estoy realizando una serie de cambios en el iSeries y me interesa ejecutar
> un trabajo por cola en multiples ocasiones a lo largo del día.
>
> Se me ocurrió utilizar el "Planificador de Trabajos" creando una nueva
> tarea, pero no veo la forma de indicarle que se ejecute, por ejemplo, cada
> hora. Puedo indicarle un día determinado, o múltiples días, pero no veo
como
> indicarle múltiples horas, o intervalos de x minutos.
>
> ¿Alguien tiene algo similar, o conoce como poder planificarlo?
>
> Por cierto estamos en versión 5.3
>
> Un saludo
>
> Fernando Sánchez Piña
> Proceso de Datos
>
>
>
> 916448013 (ext.127)
> 916449357
> [EMAIL PROTECTED]
> http://www.metalkris.com
>
> __________________________________________________
> Forum.HELP400 es un servicio más de NEWS/400.
> © Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>
> Para darte de baja visita la siguente URL:
> http://coyote.combios.es/mailman/listinfo/forum.help400
>
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400
