zOs/JCL/PVX0100T

//PVX0100T JOB (PVS47392,0000,,3653),'PVS-MONITOR',MSGCLASS=T,
//             REGION=99364K,PRTY=14
//*
//USEDPROC JCLLIB  ORDER=(PCL.U0000.P0.RZ1AKT.PERM.@007.JVA,
//             PVSP.U0000.T0.JCL)
//JOBLB  INCLUDE MEMBER=JOBLRZ1P
//*
//*MAIN CLASS=PVS
//*MAIN FAILURE=CANCEL
//*
//********************************************************************
//*      REBUILD HW-/NV-TAB
//********************************************************************
//*
//     INCLUDE MEMBER=PVSRHWTB
//*
//********************************************************************
//*      SNAP SSCT AND PVSSSVT IF AVAILABLE (ONLY FOR TEST)
//********************************************************************
//*
// IF (RC EQ 0) THEN
//INTVT01  EXEC PGM=PVSINTVT,PARM='PVST,LIST'
//STEPLIB   DD DSN=PVS.PVSLODV2,DISP=SHR
//SYSPRINT  DD SYSOUT=T
//SYSABEND  DD SYSOUT=T
//SYSUDUMP  DD SYSOUT=T
//PVSSNAP   DD SYSOUT=T
//*
//*********************************************************************
//*      VERIFICATION VSAM-DS
//*********************************************************************
//*
//VER01##  EXEC PGM=IDCAMS
//SYSPRINT  DD SYSOUT=*
//PVSCKPT   DD DSN=PVS.PVTCKPT,DISP=SHR
//PVSKONTO  DD DSN=PVS.PVTKONTO,DISP=SHR
//PVSLOG    DD DSN=PVS.PVTLOG,DISP=SHR
//PECOLL01  DD DSN=PVS.PVTCPE01,DISP=SHR
//PECOLL02  DD DSN=PVS.PVTCPE02,DISP=SHR
//PECOLL03  DD DSN=PVS.PVTCPE03,DISP=SHR
//PECOLL04  DD DSN=PVS.PVTCPE04,DISP=SHR
//PECOLL05  DD DSN=PVS.PVTCPE05,DISP=SHR
//PECOLL06  DD DSN=PVS.PVTCPE06,DISP=SHR
//PECOLL07  DD DSN=PVS.PVTCPE07,DISP=SHR
//PECOLL08  DD DSN=PVS.PVTCPE08,DISP=SHR
//PECOLL09  DD DSN=PVS.PVTCPE09,DISP=SHR
//PECOLL10  DD DSN=PVS.PVTCPE10,DISP=SHR
//SYSIN     DD DSN=PVSP.U0000.T0.JCL(PVX01T01),DISP=SHR
//*
//*********************************************************************
//*      MONITOR
//*
//*      PARM='PARM1,  =  SUBSYSTEM        P - PRODUKTION   T - TEST
//*            PARM2'  =  WORKER START     A - AUTOMATISCH  M - MANUELL
//*********************************************************************
//*
//PVSMON1  EXEC PGM=PVSINIT,PARM='T,A',COND=(0,NE,VER01##)
//STEPLIB   DD DSN=PVS.PVSLODV2,DISP=SHR
//STDIN     DD SYSOUT=*
//STDOUT    DD SYSOUT=*
//STDERR    DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//SYSOUT    DD SYSOUT=*
//SYSUDUMP  DD SYSOUT=*
//SYSABEND  DD SYSOUT=*
//*SNTRACE  DD SYSOUT=*
//SIMPRINT  DD SYSOUT=*
//DDCOUT    DD SYSOUT=*
//COUTSC01  DD SYSOUT=*
//COUTSC02  DD SYSOUT=*
//COUTSC03  DD SYSOUT=*
//COUTSC04  DD SYSOUT=*
//COUTSC05  DD SYSOUT=*
//SPERR01   DD DSN=PVSP.U0000.T0.SPERR.DATA,DISP=OLD
//SYSTERM   DD SYSOUT=*
//CEEDUMP   DD SYSOUT=*
//SNAP00    DD SYSOUT=*
//SNAPSNAP  DD SYSOUT=*
//SNAP      DD SYSOUT=*
//DDSNAP    DD SYSOUT=*
//CMDPSNAP  DD SYSOUT=*
//PVSTRACE  DD SYSOUT=*
//PVSSNAP   DD SYSOUT=*
//*X37TRACE  DD SYSOUT=*
//LOGTAB01  DD DSN=PVSP.U0000.T0.SC01.LOGTAB,DISP=SHR
//LOGTAB02  DD DSN=PVSP.U0000.T0.SC02.LOGTAB,DISP=SHR
//LOGTAB03  DD DSN=PVSP.U0000.T0.SC03.LOGTAB,DISP=SHR
//LOGTAB04  DD DSN=PVSP.U0000.T0.SC04.LOGTAB,DISP=SHR
//LOGTAB05  DD DSN=PVSP.U0000.T0.SC05.LOGTAB,DISP=SHR
//DDPVSCFG  DD DSN=PVSP.U0000.T0.PARM(CONFIG01),DISP=SHR
//GLOBVARS  DD DSN=PVSP.U0000.T0.PARM(GLOBVARS),DISP=SHR
//SYSPRC01  DD SYSOUT=*
//SYSPRC02  DD SYSOUT=*
//SYSPSC01  DD DSN=PVS.PVTSC01.KEYS,DISP=MOD,DCB=DIAGNS=TRACE
//SYSPSC02  DD DSN=PVS.PVTSC02.KEYS,DISP=MOD,DCB=DIAGNS=TRACE
//SYSPSC03  DD DSN=PVS.PVTSC03.KEYS,DISP=MOD,DCB=DIAGNS=TRACE
//SYSPSC04  DD DSN=PVS.PVTSC04.KEYS,DISP=MOD,DCB=DIAGNS=TRACE
//SYSPSC05  DD DSN=PVS.PVTSC05.KEYS,DISP=MOD,DCB=DIAGNS=TRACE
//PVSPARM   DD DSN=PVSP.U0000.T0.PARM,DISP=SHR
//PVSTAB    DD DSN=PVSP.U0000.T0.TAB,DISP=SHR
//PVSBEIL   DD DSN=PVSP.U0000.T0.BEILAGEN.PREFIX,DISP=SHR
//PVSMSG    DD DSN=PVSP.U0000.T0.MSG,DISP=SHR
//PVSCKPT   DD DSN=PVS.PVTCKPT,DISP=SHR
//PVSLOG    DD DSN=PVS.PVTLOG,DISP=SHR
//PVSKONTO  DD DSN=PVS.PVTKONTO,DISP=SHR
//*********************************************************************
//PVSDUMP   DD DSN=PVSP.U0000.T0.PVXDUMP.#DT#,DISP=(,CATLG,CATLG),
//             SPACE=(CYL,(25,25),RLSE),
//             RECFM=FB,LRECL=4104,
//             MGMTCLAS=D005N000
//*SYSMDUMP  DD DSN=PVSP.U0000.T0.DUMP.#DT#,DISP=(,CATLG,CATLG),
//*             SPACE=(CYL,(25,25),RLSE),
//*             RECFM=FB,LRECL=4160,
//*             MGMTCLAS=D005N000
//*********************************************************************
//* RDSN-SUBTASKS-SYSOUT'S
//*********************************************************************
//SYSPRD01  DD SYSOUT=*
//SYSPRD02  DD SYSOUT=*
//SYSPRD03  DD SYSOUT=*
//*********************************************************************
//* PRINT-SUBTASKS-SYSOUT'S
//*********************************************************************
//SYSPPR01  DD SYSOUT=*
//SYSPPR02  DD SYSOUT=*
//SOUTPR01  DD SYSOUT=*
//SOUTPR02  DD SYSOUT=*
//SIMUPR01  DD SYSOUT=*
//SIMUPR02  DD SYSOUT=*
//*********************************************************************
//* POSY
//*********************************************************************
//POSYTEMP  DD DISP=SHR,DSN=POSY.RZ1.T0.AKT.TEMPLATE
//POSYTAB   DD DISP=SHR,DSN=POSY.RZ1.T0.AKT.TAB
//*********************************************************************
//* COLLECTOREN: AU,BD,CH,ER,ES,FA,FG,GB,LW,PI,SP,TS,VI,XP
//*********************************************************************
//COLLAU00  DD DSN=PVS.PVTCAU00,DISP=SHR
//COLLAU01  DD DSN=PVS.PVTCAU01,DISP=SHR
//COLLAU02  DD DSN=PVS.PVTCAU02,DISP=SHR
//COLLAU03  DD DSN=PVS.PVTCAU03,DISP=SHR
//COLLAU04  DD DSN=PVS.PVTCAU04,DISP=SHR
//COLLBD00  DD DSN=PVS.PVTCBD00,DISP=SHR
//COLLBD01  DD DSN=PVS.PVTCBD01,DISP=SHR
//COLLBD02  DD DSN=PVS.PVTCBD02,DISP=SHR
//COLLBD03  DD DSN=PVS.PVTCBD03,DISP=SHR
//COLLBD04  DD DSN=PVS.PVTCBD04,DISP=SHR
//COLLCH00  DD DSN=PVS.PVTCCH00,DISP=SHR
//COLLCH01  DD DSN=PVS.PVTCCH01,DISP=SHR
//COLLCH02  DD DSN=PVS.PVTCCH02,DISP=SHR
//COLLCH03  DD DSN=PVS.PVTCCH03,DISP=SHR
//COLLCH04  DD DSN=PVS.PVTCCH04,DISP=SHR
//COLLER00  DD DSN=PVS.PVTCER00,DISP=SHR
//COLLER01  DD DSN=PVS.PVTCER01,DISP=SHR
//COLLER02  DD DSN=PVS.PVTCER02,DISP=SHR
//COLLER03  DD DSN=PVS.PVTCER03,DISP=SHR
//COLLER04  DD DSN=PVS.PVTCER04,DISP=SHR
//COLLES00  DD DSN=PVS.PVTCES00,DISP=SHR
//COLLES01  DD DSN=PVS.PVTCES01,DISP=SHR
//COLLES02  DD DSN=PVS.PVTCES02,DISP=SHR
//COLLES03  DD DSN=PVS.PVTCES03,DISP=SHR
//COLLES04  DD DSN=PVS.PVTCES04,DISP=SHR
//COLLFA00  DD DSN=PVS.PVTCFA00,DISP=SHR
//COLLFA01  DD DSN=PVS.PVTCFA01,DISP=SHR
//COLLFA02  DD DSN=PVS.PVTCFA02,DISP=SHR
//COLLFA03  DD DSN=PVS.PVTCFA03,DISP=SHR
//COLLFA04  DD DSN=PVS.PVTCFA04,DISP=SHR
//COLLFG00  DD DSN=PVS.PVTCFG00,DISP=SHR
//COLLFG01  DD DSN=PVS.PVTCFG01,DISP=SHR
//COLLFG02  DD DSN=PVS.PVTCFG02,DISP=SHR
//COLLFG03  DD DSN=PVS.PVTCFG03,DISP=SHR
//COLLFG04  DD DSN=PVS.PVTCFG04,DISP=SHR
//COLLGB00  DD DSN=PVS.PVTCGB00,DISP=SHR
//COLLGB01  DD DSN=PVS.PVTCGB01,DISP=SHR
//COLLLW00  DD DSN=PVS.PVTCLW00,DISP=SHR
//COLLLW01  DD DSN=PVS.PVTCLW01,DISP=SHR
//COLLLW02  DD DSN=PVS.PVTCLW02,DISP=SHR
//COLLLW03  DD DSN=PVS.PVTCLW03,DISP=SHR
//COLLLW04  DD DSN=PVS.PVTCLW04,DISP=SHR
//COLLPI00  DD DSN=PVS.PVTCPI00,DISP=SHR
//COLLPI01  DD DSN=PVS.PVTCPI01,DISP=SHR
//COLLPI02  DD DSN=PVS.PVTCPI02,DISP=SHR
//COLLPI03  DD DSN=PVS.PVTCPI03,DISP=SHR
//COLLPI04  DD DSN=PVS.PVTCPI04,DISP=SHR
//COLLSP00  DD DSN=PVS.PVTCSP00,DISP=SHR
//COLLSP01  DD DSN=PVS.PVTCSP01,DISP=SHR
//COLLSP02  DD DSN=PVS.PVTCSP02,DISP=SHR
//COLLSP03  DD DSN=PVS.PVTCSP03,DISP=SHR
//COLLSP04  DD DSN=PVS.PVTCSP04,DISP=SHR
//COLLTS00  DD DSN=PVS.PVTCTS00,DISP=SHR
//COLLTS01  DD DSN=PVS.PVTCTS01,DISP=SHR
//COLLTS02  DD DSN=PVS.PVTCTS02,DISP=SHR
//COLLTS03  DD DSN=PVS.PVTCTS03,DISP=SHR
//COLLTS04  DD DSN=PVS.PVTCTS04,DISP=SHR
//COLLVI00  DD DSN=PVS.PVTCVI00,DISP=SHR
//COLLVI01  DD DSN=PVS.PVTCVI01,DISP=SHR
//COLLVI02  DD DSN=PVS.PVTCVI02,DISP=SHR
//COLLVI03  DD DSN=PVS.PVTCVI03,DISP=SHR
//COLLVI04  DD DSN=PVS.PVTCVI04,DISP=SHR
//COLLXP00  DD DSN=PVS.PVTCXP00,DISP=SHR
//COLLXP01  DD DSN=PVS.PVTCXP01,DISP=SHR
//COLLXP02  DD DSN=PVS.PVTCXP02,DISP=SHR
//COLLXP03  DD DSN=PVS.PVTCXP03,DISP=SHR
//COLLXP04  DD DSN=PVS.PVTCXP04,DISP=SHR
//PECOLL01  DD DSN=PVS.PVTCPE01,DISP=SHR,AMP='BUFNI=5'
//PECOLL02  DD DSN=PVS.PVTCPE02,DISP=SHR,AMP='BUFNI=5'
//PECOLL03  DD DSN=PVS.PVTCPE03,DISP=SHR,AMP='BUFNI=5'
//PECOLL04  DD DSN=PVS.PVTCPE04,DISP=SHR,AMP='BUFNI=5'
//PECOLL05  DD DSN=PVS.PVTCPE05,DISP=SHR,AMP='BUFNI=5'
//PECOLL06  DD DSN=PVS.PVTCPE06,DISP=SHR,AMP='BUFNI=5'
//PECOLL07  DD DSN=PVS.PVTCPE07,DISP=SHR,AMP='BUFNI=5'
//PECOLL08  DD DSN=PVS.PVTCPE08,DISP=SHR,AMP='BUFNI=5'
//PECOLL09  DD DSN=PVS.PVTCPE09,DISP=SHR,AMP='BUFNI=5'
//PECOLL10  DD DSN=PVS.PVTCPE10,DISP=SHR,AMP='BUFNI=5'
//*
//*********************************************************************
//*      SNAP SSCT AND PVSSSVT IF AVAILABLE (ONLY FOR TEST)
//*********************************************************************
//*
//INTVT02  EXEC PGM=PVSINTVT,PARM='PVST,LIST'
//STEPLIB   DD DSN=PVS.PVSLODV2,DISP=SHR
//SYSPRINT  DD SYSOUT=T
//SYSABEND  DD SYSOUT=T
//SYSUDUMP  DD SYSOUT=T
//PVSSNAP   DD SYSOUT=T
//*
//*********************************************************************
//*      FREIGEBEN VON UNGENUTZTEN DUMPSPACE
//*********************************************************************
//*
//RLS01##  EXEC PGM=SY2060,
//             COND=(0,NE,VER01##)
//SYSPRINT  DD SYSOUT=*
//SYSUT2    DD DSN=*.PVSMON1.PVSDUMP,
//             DISP=MOD,
//             SPACE=(TRK,(1,1),RLSE)
//SYSUT1    DD DUMMY,DCB=*.PVSMON1.PVSDUMP
//*
//*********************************************************************
//*      KEYS AUF SYSOUT KOPIEREN
//*********************************************************************
//*
//PVSMON2  EXEC PGM=ICEGENER,COND=((0,NE,VER01##),EVEN)
//SYSPRINT  DD SYSOUT=*
//SYSTERM   DD SYSOUT=*
//SYSABEND  DD SYSOUT=*
//SYSUT2    DD SYSOUT=*
//SYSUT1    DD DSN=PVS.PVTSC01.KEYS,DISP=SHR
//          DD DSN=PVS.PVTSC02.KEYS,DISP=SHR
//          DD DSN=PVS.PVTSC03.KEYS,DISP=SHR
//          DD DSN=PVS.PVTSC04.KEYS,DISP=SHR
//          DD DSN=PVS.PVTSC05.KEYS,DISP=SHR
//SYSIN     DD DUMMY
//*
//*********************************************************************
//*      KEYS AUF SAVE DATASET KOPIEREN
//*********************************************************************
//*
//PVSMON3  EXEC PGM=PV7001,COND=((0,NE,VER01##),EVEN),
//             PARM='SCANLP LPCKSC'
//STEPLIB   DD DSN=PVS.PVSLODV2,DISP=SHR
//DDPVSCFG  DD DSN=PVSP.U0000.T0.PARM(CONFIG01),DISP=SHR
//SYSPRINT  DD SYSOUT=*
//SYSTERM   DD SYSOUT=*
//SYSABEND  DD SYSOUT=*
//*
// ENDIF
//*********************************************************************
//*      MESSAGE TO THE OPERATOR IF MON03 NOT OK
//*********************************************************************
//*
//*VSMON4  EXEC PGM=SY7060,COND=((0,NE,VER01##),(0,EQ,PVSMON3)),
//*            PARM='BITTE PVS-PIKETT BENACHRICHTIGEN, DANKE'
//*            PARM='BITTE STÖME AN PVS-PIKETT, DANKE'
//*            PARM='TEST REPLY, HANDLED BY PVS-PIKETT'
//*