Difference between revisions of "Information Systems:Overnight ENDOFDAY"
| Line 11: | Line 11: | ||
- Sends the first email message - 'EOD starting (2:15 3:00 5:00 6:30)'. |
- Sends the first email message - 'EOD starting (2:15 3:00 5:00 6:30)'. |
||
| − | - Calls EODEND2, which will end all processes that can use either ASW or extension files. This does not end Domino, so that I.T. staff will receive the emails being sent. |
+ | - Calls '''EODEND2''', which will end all processes that can use either ASW or extension files. This does not end Domino, so that I.T. staff will receive the emails being sent. |
| − | /* End EDI |
+ | /* End EDI monitors for SPS Commerce and EDI Gateway */ |
EDIENDMON |
EDIENDMON |
||
EDIENDEDIG |
EDIENDEDIG |
||
| + | |||
| − | |||
| − | /* |
+ | /* End subsystems that run user jobs */ |
ENDSBS SBS(QINTER) OPTION(*IMMED) |
ENDSBS SBS(QINTER) OPTION(*IMMED) |
||
| Line 28: | Line 28: | ||
ENDSBS SBS(MONITOR2) OPTION(*IMMED) |
ENDSBS SBS(MONITOR2) OPTION(*IMMED) |
||
| − | /* |
+ | /* End IMS, IMP, IOP, OMS, and EMA */ |
CHGDTAARA DTAARA(IMSWITCH) VALUE('STOP ') |
CHGDTAARA DTAARA(IMSWITCH) VALUE('STOP ') |
||
| − | CHGDTAARA DTAARA( |
+ | CHGDTAARA DTAARA(IMPSWITCH) VALUE('STOP ') |
| ⚫ | |||
CHGDTAARA DTAARA(IOPSWITCH) VALUE('STOP ') |
CHGDTAARA DTAARA(IOPSWITCH) VALUE('STOP ') |
||
| ⚫ | |||
CHGDTAARA DTAARA(EMASWITCH) VALUE('STOP ') |
CHGDTAARA DTAARA(EMASWITCH) VALUE('STOP ') |
||
| + | |||
ENDIMSJOB |
ENDIMSJOB |
||
| − | + | ENDIMPJOB |
|
| ⚫ | |||
ENDIOPJOB |
ENDIOPJOB |
||
| ⚫ | |||
ENDEMAJOBS |
ENDEMAJOBS |
||
| + | |||
ENDIMSSUB OPTION(*IMMED) |
ENDIMSSUB OPTION(*IMMED) |
||
| ⚫ | |||
ENDIMPSUB OPTION(*IMMED) |
ENDIMPSUB OPTION(*IMMED) |
||
ENDIOPSUB OPTION(*IMMED) |
ENDIOPSUB OPTION(*IMMED) |
||
| ⚫ | |||
ENDEMASUB OPTION(*IMMED) |
ENDEMASUB OPTION(*IMMED) |
||
| − | /* END WEB JOBS |
+ | /* END WEB JOBS, pause for one minute, then end subsystem */ |
ENDTCPSVR SERVER(*HTTP) HTTPSVR(WEBSMART) |
ENDTCPSVR SERVER(*HTTP) HTTPSVR(WEBSMART) |
||
| Line 54: | Line 56: | ||
ENDSBS SBS(QHTTPSVR) DELAY(60) |
ENDSBS SBS(QHTTPSVR) DELAY(60) |
||
| + | /* Explicity end Telnet server with a 5 minute delay - otherwise */ |
||
| − | /* EXPLICITLY END TELNET SERVER WITH A 5 MINUTE DELAY (PER RF GUNS) */ |
||
| + | /* there could be a problem with the RF guns */ |
||
| − | /* MUST END BEFORE QSYSWRK SUBSYSTEM ENDS */ |
||
| − | + | ||
ENDTCPSVR SERVER(*TELNET) |
ENDTCPSVR SERVER(*TELNET) |
||
DLYJOB DLY(300) |
DLYJOB DLY(300) |
||
Revision as of 11:46, 4 January 2016
The scheduler starts this job at 1:00AM; every morning except Sunday - when the End of Week is called. This job will -
- End all programs that use ASW or extension files, and end subsystems so users cannot sign on.
- Do a 'temporary' backup of data libraries only. This uses tape '999999', which has a retention period of one day so that it can be over written every night. It can be used if something happens during the overnight processing, to quickly restore a file the next day if needed (without having to call the tape from off site storage), and to rebuild the test environment.
- Run updates, reports, and housekeeping (clear work files and out queues, and delete unnecessary spool files).
The program is EODDAILY in library UNIPHARMIT.
- Sends the first email message - 'EOD starting (2:15 3:00 5:00 6:30)'.
- Calls EODEND2, which will end all processes that can use either ASW or extension files. This does not end Domino, so that I.T. staff will receive the emails being sent.
/* End EDI monitors for SPS Commerce and EDI Gateway */
EDIENDMON
EDIENDEDIG
/* End subsystems that run user jobs */
ENDSBS SBS(QINTER) OPTION(*IMMED)
ENDSBS SBS(QBATCH) OPTION(*IMMED)
ENDSBS SBS(DCRF) OPTION(*IMMED)
ENDSBS SBS(UP1480BS) OPTION(*IMMED)
ENDSBS SBS(TLABARCODE) OPTION(*IMMED)
ENDSBS SBS(BC400SERVR) OPTION(*IMMED)
ENDSBS SBS(MONITOR2) OPTION(*IMMED)
/* End IMS, IMP, IOP, OMS, and EMA */
CHGDTAARA DTAARA(IMSWITCH) VALUE('STOP ')
CHGDTAARA DTAARA(IMPSWITCH) VALUE('STOP ')
CHGDTAARA DTAARA(IOPSWITCH) VALUE('STOP ')
CHGDTAARA DTAARA(OMSWITCH) VALUE('STOP ')
CHGDTAARA DTAARA(EMASWITCH) VALUE('STOP ')
ENDIMSJOB
ENDIMPJOB
ENDIOPJOB
ENDOMSJOB
ENDEMAJOBS
ENDIMSSUB OPTION(*IMMED)
ENDIMPSUB OPTION(*IMMED)
ENDIOPSUB OPTION(*IMMED)
ENDOMSSUB OPTION(*IMMED)
ENDEMASUB OPTION(*IMMED)
/* END WEB JOBS, pause for one minute, then end subsystem */
ENDTCPSVR SERVER(*HTTP) HTTPSVR(WEBSMART)
ENDTCPSVR SERVER(*HTTP) HTTPSVR(WEBTEST)
ENDTCPSVR SERVER(*HTTP) HTTPSVR(WEBINTER)
DLYJOB DLY(60)
ENDSBS SBS(QHTTPSVR) DELAY(60)
/* Explicity end Telnet server with a 5 minute delay - otherwise */
/* there could be a problem with the RF guns */
ENDTCPSVR SERVER(*TELNET)
DLYJOB DLY(300)
- Calls EOD
- Sends the second email message - 'Daily overnite processing ended normally' - at about 2:15AM.
- Resets the submit time for this job on the scheduler to 1:00AM. This is in case a warehouse supervisor has delayed it.