Files
DUTAS/JCL/RUNAU144.jcl

26 lines
1.3 KiB
Plaintext

//RUNAU144 JOB (UI,4300,3400,T),RUNBZ365,CLASS=S,MSGCLASS=X, 00000010
// NOTIFY=ECNTSUP
//* 00001700
// SET LVLNODE='PROD' 00001700
// SET MSTNODE='PROD' 00001700
//* 00001700
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB 00001600
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600
//* 00001700
//*******************************************************************
//*** COPY AUDIT PACKAGE X144 FILES TO BBACKUP FILE.
//**
//*******************************************************************
//**
//COPYX144 EXEC PGM=IDCAMS,COND=(0,LT)
//INDD01 DD DSN=ECNTSUP.DOESTAX.PROD.AUDIT.X144,DISP=SHR
//**
//OUTDD01 DD DSN=DOESTAX.CONV.BACKUP.AUDTX144(+1),
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(15,5),RLSE),
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=256,BLKSIZE=2560)
//SYSPRINT DD SYSOUT=(*)
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR
//**
//*********************************************************************