Files
DUTAS/JCL/DTSRR517.jcl
2025-07-21 11:20:11 -04:00

41 lines
3.1 KiB
Plaintext

//DTSRQ517 JOB (UI,4300,3400,T),RERUN.REPORTS, 00000163
// CLASS=P,MSGCLASS=X, 00000261
// NOTIFY=ECNTSUP, 00000363
//**** TYPRUN=SCAN, 00000458
// REGION=0M 00000631
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
//******************************************************************* 00000731
//**** 00000831
//* AFTER YEARLY EXPERIENCE RATING PART 1 (RUNRQ500) 00000931
//* YEARLY EXPERIENCE RATING PART 2 (DTSRQ517) (MST UPDATE) 00001131
//**** 00001431
//********* USE THIS JOB TO RERUN RATE REPORTS ONLY *** 00001531
//**** FOR TRMS YEARLY RATE REPORTS 111217 ZL1 *** 00001631
//******************************************************************* 00001731
//**** 00002331
// SET LOADLIB='PROD' 00002461
// SET LVLNODE='PROD' 00002561
// SET TPSYRQ='YR2018' 00002665
// SET RATEYR='YR2018' 00002765
// SET LDEST=U@PRT65 00002864
// SET LHOLD='YES' 00002964
//**** 00003564
//PROCLIB JCLLIB ORDER=DOESTAX.&LOADLIB..PROCLIB 00003664
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00003764
//**** BACKUP BEFORE THIS RUN 00003800
//STEP0400 EXEC DTSRRRPT 00090000
//** TEXT VERSION OF ETA204 FOR DOWNLOAD 00110024
//STEP0100.RPT517R2 DD DSN=DOESTAX.&LVLNODE..RATE204A.&RATEYR., 00130037
//**** USE DISP=SHR, IF A RERUN ***>>> 00131030
//** DISP=SHR, 00140060
// DISP=(NEW,CATLG,DELETE), 00141060
// UNIT=SYSDA, 00150024
// SPACE=(800,(10,10),RLSE), 00160024
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=80) 00170024
//** 00180061
//**** BACKUP AFTER THIS RUN 00650000
//*TEP0500 EXEC DTSUTVSM, 00660065
//* BKUPGEN='(+1)' /* IF NO BKP IN STEP0100 00670065
//** BKUPGEN='(+2)' /* IF BKP RUN IN STEP0100) 00671031
//** 00680000