Re: Programa de borrado de trabajos....

[Guillermo Andrades, CPI Software]

hace tiempo tuvimos un problema parecido y se resolvio mejor con un cl del que se hacia schedule cada hora, tu lopuedes hacer incluso cada x minutos con un simple DLYJOB y tener el pgm arrancado siempre.
Lo unico que requiere es que los terminales admitan que los dispositivos tengan un prefijo (que comiencen por algo)
esto es muy simple, ya lo podras mejorar.
usamos una cosa parecida para los terminales que cascan en remoto por vpn etc cuando el telnet-exit para los terminales etc.



              DCLF       FILE(QADSPOBJ)
              DSPOBJD    OBJ(RAD*) OBJTYPE(*DEVD) OUTPUT(*OUTFILE) +
                           OUTFILE(QTEMP/QADSPOBJ) OUTMBR(DEVRADIOF)  
              OVRDBF     FILE(QADSPOBJ) TOFILE(QTEMP/QADSPOBJ) +    
                           MBR(DEVRADIOF)                             
 LEE:                                                               
              RCVF                                                  
              MONMSG     CPF0864 EXEC(GOTO FIN)                     
              VRYCFG     CFGOBJ(&ODOBNM) CFGTYPE(*DEV) STATUS(*ON)  
              MONMSG     CPF0000 EXEC(GOTO LEE)                     
              GoTo       Lee
Fin:
              DLTOVR     FILE(*ALL)

--

Saludos/Regards,
Guillermo Andrades (cuenta en GMail)
CPI Software
http://www.CpiS.es
http://www.RpgForWeb.com
Web Familiar:  http://www.Andrades.info