Files
DUTAS/JCL/DTSBZ084.jcl

38 lines
1.8 KiB
Plaintext

//DTSBZ084 JOB (UI,4300,3400,T),PROD.BZ084,CLASS=P,MSGCLASS=X, 00000010
// USER=#DOADTS,
//*** NOTIFY=ECNTSUP
// NOTIFY=ECNTJP2
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
//* 00001700
// SET PRGNODE='DEVL' 00001700
// SET MSTNODE='PROD' 00001700
//* 00001700
//PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCS.BATCH.LIB 00001600
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600
//* 00001700
//STEP0100 EXEC PGM=DTSBZ084, /* T031 ADJUSTMENT FOR HOUSEHOLD
// COND=(0,LT), /* EMPS DELINQUENT IN 2002/1
// REGION=4096K
//SYSOUT DD SYSOUT=*
//SYSABOUT DD SYSOUT=*
//SYSABEND DD SYSOUT=*
//CAIMRPTS DD SYSOUT=*
//DTSFMSTA DD DSN=DOESTAX.&MSTNODE..VSAM.MSTA,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//DTSFMSTB DD DSN=DOESTAX.&MSTNODE..VSAM.MSTB,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//DTSFMSTC DD DSN=DOESTAX.&MSTNODE..VSAM.MSTC,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//DTSFMSTD DD DSN=DOESTAX.&MSTNODE..VSAM.MSTD,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//DTSFAIX DD DSN=DOESTAX.&MSTNODE..VSAM.AIX,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//DTSFREF DD DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//DTSFBTCO DD DSN=DOESTAX.&MSTNODE..BTC(+1),
// DISP=(,CATLG,DELETE),
// SPACE=(8192,(1000,1000),RLSE),
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)
/*
//****