Files
DUTAS/JCL/LOADCHRG.jcl

17 lines
469 B
Plaintext

//JOBINPUT JOB (INNOVA,DEV,TEAM),MANOJ,CLASS=S,MSGCLASS=X
//STEP001 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE DOESTAX.CONV.UIBSCHRG.DAILY.UPLOAD
SET MAXCC=0
//*
//STEP011 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//DD0011 DD DOESTAX.CONV.UIBSCHRG.DAILY.UPLOAD,
// DISP=(NEW,CATLG,CATLG),
// CODEPAGE=1252,AUTOENCODE=YES,
// DCB=(RECFM=LSEQ,LRECL=200),
// PATH=('E:\flat_files\DOES_Bencharges.txt',
// COPY)