//DTSSR001 JOB (UI,4300,3400,T),ADDR.RUN,CLASS=P,MSGCLASS=X,            00000010
//          NOTIFY=ECNTSUP,
//          USER=#DOADTS
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//**
//PROCLIB JCLLIB ORDER=DOESTAX.PROD.PROCS.BATCH.LIB
//**
//JOBLIB DD DSN=DOESTAX.DEVL.BATCH.LOADLIB,DISP=SHR
//       DD DSN=DOESTAX.PROD.BATCH.LOADLIB,DISP=SHR
//**                                                                    00001700
//STEP0100 EXEC PGM=DTSSR001,     /* PRINT EMPLOYERS NAME & ADDRESS
//             COND=(0,LT),             TELEPHON NO.
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//CAIMRPTS DD  SYSOUT=*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//**
//DTSFREF  DD  DSN=DOESTAX.PROD.VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//**
//OUTZ055  DD  DSN=DOESTAX.PROD.UITAX.DHS.EXTRACT(+1),                  00004503
//             DISP=(NEW,CATLG,DELETE),                                 00004600
//             LABEL=RETPD=005,
//             UNIT=CART,                                               00004700
//****         UNIT=SYSDA,                                              00004700
//****         SPACE=(CYL,(10,5),RLSE),                                 00004800
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=213,BLKSIZE=2130)         00004900
//****