//DTSRQ530 JOB (UI,4300,3400,T),PROD.BE530.NO-UPDT,CLASS=P,             00000010
//       MSGCLASS=X,                                                    00000010
//       NOTIFY=ECNTJP2,
//****   USER=#DOADTS,
//****   TYPRUN=SCAN,
//       REGION=0M
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****
//    SET LVLNODE='PROD'
//    SET   LHOLD='YES'
//****
//*         RPT530R1  = ETA-205 REPORT   (PARM CCYR = 1ST OF 3 YEARS)
//****        AVGE EMPLYR TAX RATES            (USUALLY CURRENT YEAR)
//*                                        NO BKP NEEDED FOR THIS RPT
//****
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//****
//STEP0100 EXEC DTSUEXT,                    BD400 EXTRACT
//          RUNTYPE='OR',
//          PREBACK='N'
//STEP0100.EXTPARM  DD  *
/*
//**                                       SORT REPORT RECORDS
//STEP0200 EXEC DTSRSORT
//**                                       REPORT GENERATION
//STEP0300 EXEC DTSRQRPT
//**                                       SPECIFIC OVERRIDES
//STEP0100.RPT530R1 DD  SYSOUT=Z,COPIES=2,
//             DEST=&LDEST.,
//             HOLD=&LHOLD.
//STEP0100.RPT980R1 DD HOLD=YES
//DOESLBLP.DOESLBL1 DD DUMMY                      LABELS                00631000
//*                                                                     00640000
//*