Files
DUTAS/JCL/DTSRBTCH.jcl
2025-07-21 11:20:11 -04:00

106 lines
3.3 KiB
Plaintext

//DTSRBTCH JOB (UI,4300,3400,T),PRODBTC.COPYFILE,CLASS=A,
// MSGCLASS=X,
// USER=#DOADTS,
// NOTIFY=ECNTZL1,
//**** TYPRUN=SCAN,
// REGION=0M
//**********************************************************************
//*** COPY PROD BTC FILES TO HDVL FOR NEW BATCH NO TESTING ZL1
//**********************************************************************
//PROCLIB JCLLIB ORDER=DOESTAX.DEVL.PROCLIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//*
//COPY1Z EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.XN420.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.XN420.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY1H EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.XZ420.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.XZ420.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY1A EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X418.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X418.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY1B EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X420.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X420.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
/*
//COPY1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X421.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X421.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY2 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X424.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X424.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY3 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X427.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X427.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY5 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.TDEC.X429.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X429.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY6 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X430.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X430.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY7 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X435.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X435.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY8 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X436.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X436.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY9 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X451.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X451.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//COPY7 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X426.BTC,DISP=SHR
//INDD02 DD DSN=DOESTAX.CONV.PRODESSP.X426.BTC,DISP=SHR
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//*