SYSCMDUSNO

From MidrangeWiki
Revision as of 05:13, 26 May 2005 by Al Mac (talk | contribs) (How do I get ENDPGM in with PGM colorization?)
Jump to: navigation, search


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