Files
DUTAS/JCL/DTSSR001.jcl

31 lines
1.3 KiB
Plaintext

//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
//****