//DTSCHGQ1 JOB (UI,4300,3400,T),CHGQTR,CLASS=P,MSGCLASS=X, 00010017 //** TYPRUN=SCAN, 00011017 //*** USER=#DOADTS, 00012018 // NOTIFY=ECNTSUP,REGION=0M 00014021 /*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE //**** 00040000 //**** 00042026 // SET PRGNODE='PROD' /* CHK '<--' LINES BELOW FOR A RERUN 00050017 // SET LVLNODE='PROD' 00060017 // SET UINODE='PROD' 00060124 // SET MSTNODE='PROD' /* QUARTERLY RUN FOR RATED EMPLOYERS 00061032 // SET CHGNODE='PROD' 00070017 // SET CHGMNBR='CHGM002' 00071004 // SET CHGMSSN='CHGM030' 00072014 // SET QTRLY='QTR054' <<<<<<<<< CHANGE PARM <<<<<<<<<<<<<<< 00080038 // SET LDEST=U@PRT65 00090000 // SET LVDHOLD='YES' 00100027 // SET LHOLD='YES' 00101027 //***** 00110000 //PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCS.BATCH.LIB 00130000 //LOADLIBS INCLUDE MEMBER=DTSIJLIB 00140009 //**** 00150000 //* QUARTERLYCHARGE REPORTING PROCESS FOR RATED EMPLOYERS 00160032 //**** 00480000 //**** 00504000 //STEP0300 EXEC DTSCHGQ1 00510031 //STEP0100.RPC110R1 DD DUMMY /* SI REPORTS PRODUCED IN Q2 00511030 //STEP0100.RPC110R2 DD DUMMY 00511130 //STEP0100.TPSCHRG DD DUMMY 00511130 //STEP0100.RPC100R2 DD DUMMY 00511130 //**** 00520000 //* 00530025 //**** 00580025