zOs/JCL/TO
//A5407691 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG job 1 first member 1 QR35001
//* check RTS Prozedur für checkRTS ix und TS nach alt
//* und generiertes File in Library kopieren
//* zur Benutzung aus checkRJ3
//DOIT PROC MBR=MBRVERGESSEN,SUBSYS=SUBSYSVERGESSEN,LIST=VERGESSEN
//TSCHECK EXEC PGM=IKJEFT01,PARM='%CHECKRTS &SUBSYS TS',
// DYNAMNBR=20
//SYSEXEC DD DISP=SHR,DSN=TSO.RZ1.P0.USER.EXEC
//DDIN1 DD DISP=SHR,DSN=A540769.CHECKRTS.SYSPRINT(&MBR)
//DDIN2 DD DISP=SHR,DSN=&LIST.(&MBR.1)
//DDOUT1 DD DSN=A540769.CHECKRTX.&MBR..TSOLD,
// DISP=(MOD,CATLG,CATLG),
// MGMTCLAS=COM#E005,
// RECFM=FB,LRECL=80
//SYSTSIN DD DUMMY
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD DISP=SHR,DSN=A540769.CHECKRTS.OPRTSOLD(&MBR)
//SYSUDUMP DD SYSOUT=*
//PLIDUMP DD SYSOUT=*
//SCOPY EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSUT1 DD DISP=SHR,DSN=A540769.CHECKRTX.&MBR..TSOLD
//SYSUT2 DD DISP=SHR,DSN=A540769.CHECKRTS.OLITSOLD(&MBR)
//IXCHECK EXEC PGM=IKJEFT01,PARM='%CHECKRTS &SUBSYS IX',
// DYNAMNBR=20
//SYSEXEC DD DISP=SHR,DSN=TSO.RZ1.P0.USER.EXEC
//DDIN1 DD DISP=SHR,DSN=A540769.CHECKRTS.SYSPRINT(&MBR)
//DDIN2 DD DISP=SHR,DSN=&LIST.(&MBR.1)
//DDOUT1 DD DSN=A540769.CHECKRTX.&MBR..IXOLD,
// DISP=(MOD,CATLG,CATLG),
// MGMTCLAS=COM#E005,
// RECFM=FB,LRECL=80
//SYSTSIN DD DUMMY
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD DISP=SHR,DSN=A540769.CHECKRTS.OPRIXOLD(&MBR)
//SYSUDUMP DD SYSOUT=*
//PLIDUMP DD SYSOUT=*
//SCOPY EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSUT1 DD DISP=SHR,DSN=A540769.CHECKRTX.&MBR..IXOLD
//SYSUT2 DD DISP=SHR,DSN=A540769.CHECKRTS.OLIIXOLD(&MBR)
// PEND
//P1 EXEC PROC=DOIT,MBR=QR35001,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P2 EXEC PROC=DOIT,MBR=QR35002,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P3 EXEC PROC=DOIT,MBR=QR35003,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P4 EXEC PROC=DOIT,MBR=QR35006,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P5 EXEC PROC=DOIT,MBR=QR35007,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P6 EXEC PROC=DOIT,MBR=QR35008,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P7 EXEC PROC=DOIT,MBR=QR35009,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P8 EXEC PROC=DOIT,MBR=QR35010,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P9 EXEC PROC=DOIT,MBR=QR35011,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P10 EXEC PROC=DOIT,MBR=QR35012,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P11 EXEC PROC=DOIT,MBR=QR35013,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P12 EXEC PROC=DOIT,MBR=QR35014,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P13 EXEC PROC=DOIT,MBR=QR35015,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P14 EXEC PROC=DOIT,MBR=QR35016,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P15 EXEC PROC=DOIT,MBR=QR37801,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P16 EXEC PROC=DOIT,MBR=QR38501,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P17 EXEC PROC=DOIT,MBR=QR57101,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P18 EXEC PROC=DOIT,MBR=QR57102,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P19 EXEC PROC=DOIT,MBR=QR57103,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P20 EXEC PROC=DOIT,MBR=QR57104,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P21 EXEC PROC=DOIT,MBR=QR57105,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P22 EXEC PROC=DOIT,MBR=QR57106,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF
//P23 EXEC PROC=DOIT,MBR=QR57107,SUBSYS=DVTB,
// LIST=DVTB.DBAA.LISTDEF