Difference between revisions of "Information Systems:EODWEEKLY"
Jump to navigation
Jump to search
m |
m |
||
| Line 1: | Line 1: | ||
| − | This is called by the scheduler (job name ENDOFWEEK) every Sunday, at 1:00AM. It puts the computer into an [[Information Systems:IBM i restricted state | application restricted state]]. If it fails, it will be cancelled by the backup; which starts at 3:00AM. |
+ | This is called by the scheduler (job name ENDOFWEEK) every Sunday, at 1:00AM. It puts the computer into an [[Information Systems:IBM i restricted state#Application restricted state | application restricted state]]. If it fails, it will be cancelled by the backup; which starts at 3:00AM. |
/* send email that weekly overnight process is starting */ |
/* send email that weekly overnight process is starting */ |
||
Latest revision as of 14:43, 8 December 2016
This is called by the scheduler (job name ENDOFWEEK) every Sunday, at 1:00AM. It puts the computer into an application restricted state. If it fails, it will be cancelled by the backup; which starts at 3:00AM.
/* send email that weekly overnight process is starting */
CHGVAR VAR(&SMSG) VALUE('EOW starting (2:30 3:00 +
5:00 6:30)')
CHGVAR VAR(&LMSG) VALUE(&SMSG)
CALL PGM(OPMSGSEND) PARM(&SMSG &LMSG)
/* End all processes that use either ASW or extension files. This is */
/* so that the temporary backup can save all files, and because some of */
/* the ASW jobs cannot run if any other jobs are using their files. */
CALL PGM(EODEND2)
/* run End of Day processing */
CALL PGM(EOD)
/* run weekly jobs */
CALL PGM(EODUPDW)
CALL PGM(EODRPTW)
/* send email that weekly overnight process ended normally */
CHGVAR VAR(&SMSG) VALUE('Weekly overnite processing +
ended Normally')
CHGVAR VAR(&LMSG) VALUE('This message means there +
were no errors that halted processing. If +
this message is not sent, it means the +
full backup cancelled this job.')
CALL PGM(OPMSGSEND) PARM(&SMSG &LMSG)