Difference between revisions of "Information Systems:EODDAILY"
Jump to navigation
Jump to search
(Created page with " →send email that daily overnight process is starting: CHGVA...") |
m |
||
| (6 intermediate revisions by 2 users not shown) | |||
| Line 1: | Line 1: | ||
| + | This is called by the scheduler (job name ENDOFDAY) every day except 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 daily overnight process is starting */ |
/* send email that daily overnight process is starting */ |
||
| Line 10: | Line 12: | ||
/* the ASW jobs cannot run if any other jobs are using their files. */ |
/* the ASW jobs cannot run if any other jobs are using their files. */ |
||
| − | CALL PGM([[ |
+ | CALL PGM([[EODEND2]]) |
/* run End of Day processing */ |
/* run End of Day processing */ |
||
| − | CALL PGM([[ |
+ | CALL PGM([[EOD]]) |
/* send email that daily overnight process ended normally */ |
/* send email that daily overnight process ended normally */ |
||
| Line 25: | Line 27: | ||
full backup cancelled this job.') |
full backup cancelled this job.') |
||
CALL PGM(OPMSGSEND) PARM(&SMSG &LMSG) |
CALL PGM(OPMSGSEND) PARM(&SMSG &LMSG) |
||
| + | |||
| + | [[Category: Overnight Processing]] |
||
Latest revision as of 09:52, 20 July 2016
This is called by the scheduler (job name ENDOFDAY) every day except 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 daily overnight process is starting */
CHGVAR VAR(&SMSG) VALUE('EOD starting (2:15 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)
/* send email that daily overnight process ended normally */
CHGVAR VAR(&SMSG) VALUE('Daily 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)