36 lines
1.3 KiB
Plaintext
36 lines
1.3 KiB
Plaintext
//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
|
|
//*
|