Difference between revisions of "SYSCMDUSNO"
From MidrangeWiki
m (Oops ... prior was also minor ... format cleaning up) |
m (How do I get ENDPGM in with PGM colorization?) |
||
Line 17: | Line 17: | ||
/*********************************************************************/ | /*********************************************************************/ | ||
− | + | PGM | |
DSPLOG PERIOD((*AVAIL *BEGIN)) MSGID(CPA1E01 + | DSPLOG PERIOD((*AVAIL *BEGIN)) MSGID(CPA1E01 + | ||
Line 23: | Line 23: | ||
CPF0934 CPF0994 CPF0998 CPF1806 CPF2234 + | CPF0934 CPF0994 CPF0998 CPF1806 CPF2234 + | ||
CPF4058 CPF8192 CPF9E72 CPI1E23 CPI0964 + | CPF4058 CPF8192 CPF9E72 CPI1E23 CPI0964 + | ||
− | + | CPI2203 CPI1479 CPI5970 CPPEA13 MCH1604) | |
ENDPGM | ENDPGM |
Revision as of 05:13, 26 May 2005
Here is the Source Code
/*********************************************************************/
/* */
/* Program SYSCMDUSNO from BPCS Menu */
/* Do DSPLOG vs. CPF2234 & other security oops */
/* and other serious stuff worth checking */
/* */
/*********************************************************************/
PGM DSPLOG PERIOD((*AVAIL *BEGIN)) MSGID(CPA1E01 + CPC1E1D CPS2356 CPC3707 CPD2609 CPD27EF + CPF0934 CPF0994 CPF0998 CPF1806 CPF2234 + CPF4058 CPF8192 CPF9E72 CPI1E23 CPI0964 + CPI2203 CPI1479 CPI5970 CPPEA13 MCH1604)
ENDPGM