//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