giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DUTAS re-platformed to Raincode - Initial Source Code

Browse Source
This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

105
JCL/DTSRBTCH.jcl Normal file
View File

@ -0,0 +1,105 @@
//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)
/*
//*