//ECNTGD11 JOB (UI,4300,3400,T),RUNWNAME,CLASS=A,MSGCLASS=X,            00000010
//**        TYPRUN=SCAN,
//          USER=#DOADTS,
//          NOTIFY=ECNTSUP
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//**
// SET LVLNODE='PROD'
// SET MSTNODE='PROD'
//**
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//**
//STEP0100 EXEC PGM=DTSBZ313,
//             COND=(0,LT),
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//WORKRIN  DD  DSN=DOESTAX.DEVL.NEWHIRE.WORKER,
//             DISP=(OLD,KEEP,KEEP),
//**           DISP=(NEW,CATLG,DELETE),
//             UNIT=SYSDA,
//             SPACE=(30000,(400,200),RLSE),
//             DCB=(RECFM=FB,LRECL=150,BLKSIZE=30000)
//*
//DTSFNAME DD  DSN=DOESTAX.&MSTNODE..VSAM.WAGE.NAME,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//***
//*****