zOs/JCL/POVDOC

//A540769U JOB (WAK47392,0000,,3653),'TAG-PARSER      ',MSGCLASS=T
//*
//*MAIN CLASS=BATCH
//*
//JOBLIB    DD DSN=CMN.DIV.P0.IRA0.#000001.LLB,DISP=SHR
//*         DD DSN=CMN.U0000.P0.RZ1AKT.BASE000.@008.LLB,DISP=SHR
//*         DD DSN=CMN.U0000.P0.RZ1AKT.BASE000.@008.LLG,DISP=SHR
//*
//        SET  RZ=RZ2
//DISP    PROC YM=YMVERGESSEN
//E00     EXEC PGM=IEFBR14
//DOCOUT    DD DISP=(MOD,DELETE),
//             DSN=OMS.DIV.P0.STAT.&RZ..&YM..DISP
//*-------------------------------------------------------------------
//* APPEND DISPLAY TIMESTAMPS TO RECORDS
//*-------------------------------------------------------------------
//E01     EXEC PGM=TS5260,PARM='TRAP(ON)/ T,3'
//SYSUDUMP  DD SYSOUT=*
//PLIDUMP   DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//DDMSG     DD SYSOUT=*
//DDUUID    DD SYSOUT=*
//DDTRACE   DD SYSOUT=*
//DOCIN     DD DISP=SHR,DSN=OMS.DIV.P0.STAT.&RZ..&YM
//*DOCOUT    DD DISP=(NEW,CATLG),MGMTCLAS=S005N000,
//*             DSN=OMS.DIV.P0.STAT.&RZ..&YM..DISP,
//*             LIKE=OMS.DIV.P0.STAT.&RZ..&YM
//*DOCOUT    DD DUMMY,RECFM=VB,LRECL=9072
//*DOCOUT    DD DISP=(NEW,CATLG),MGMTCLAS=S005N000,
//*             DSN=A540769.TEST.P0.STAT.&RZ..&YM..DISP,
//*             LIKE=OMS.DIV.P0.STAT.&RZ..&YM
//DOCOUT    DD DISP=OLD,
//             DSN=A540769.TEST.P0.STAT.&RZ..&YM..DISP
//        PEND
//S02     EXEC PROC=DISP,YM=Y05M04
//
//S01     EXEC PROC=DISP,YM=Y04M01
//S02     EXEC PROC=DISP,YM=Y04M02
//S03     EXEC PROC=DISP,YM=Y04M03
//S04     EXEC PROC=DISP,YM=Y04M04
//S05     EXEC PROC=DISP,YM=Y04M05
//S06     EXEC PROC=DISP,YM=Y04M06
//
//S07     EXEC PROC=DISP,YM=Y04M07
//S08     EXEC PROC=DISP,YM=Y04M08
//S09     EXEC PROC=DISP,YM=Y04M09
//S10     EXEC PROC=DISP,YM=Y04M10
//S11     EXEC PROC=DISP,YM=Y04M11
//S12     EXEC PROC=DISP,YM=Y04M12