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

Z updated JCL files on PROD Env

Browse Source
This commit is contained in:
Manoj Patel
2025-11-03 12:05:56 -05:00
parent 8fca292a50
commit 6537588163
71 changed files with 3899 additions and 857 deletions
Download Patch File Download Diff File Expand all files Collapse all files

51
JCL/DTSRQ335.jcl
View File

@ -123,7 +123,56 @@
//* 00843099
//* 00844099
//************************************************************** 00845099
// 00850099
//*
//STEP0200 EXEC PGM=FTP,PARM='(EXIT'
//INPUT DD *
10.57.110.147 21
dutasrc
Today728rc!
cd //Dutasrc/intranet/Outbound_intranet
ascii
put 'ECNTSUP.DOESTAX.PROD.FTP.ATHTRN' ECNTSUP.DOESTAX.PROD.FTP.ATHTRN
put 'ECNTSUP.DOESTAX.PROD.FTP.ATHHDR' ECNTSUP.DOESTAX.PROD.FTP.ATHHDR
put 'ECNTSUP.DOESTAX.PROD.FTP.ATHRPT' ECNTSUP.DOESTAX.PROD.FTP.ATHRPT
put 'ECNTSUP.DOESTAX.PROD.FTP.ATHATX' ECNTSUP.DOESTAX.PROD.FTP.ATHATX
put 'ECNTSUP.DOESTAX.PROD.FTP.ATHPAY' ECNTSUP.DOESTAX.PROD.FTP.ATHPAY
put 'ECNTSUP.DOESTAX.PROD.FTP.ATHADJ' ECNTSUP.DOESTAX.PROD.FTP.ATHADJ
put 'ECNTSUP.DOESTAX.PROD.FTP.HEADER' ECNTSUP.DOESTAX.PROD.FTP.HEADER
put 'ECNTSUP.DOESTAX.PROD.FTP.ACCT.INCR' +
ECNTSUP.DOESTAX.PROD.FTP.ACCT.INCR
put 'ECNTSUP.DOESTAX.PROD.FTP.TRAN.INCR' +
ECNTSUP.DOESTAX.PROD.FTP.TRAN.INCR
put 'ECNTSUP.DOESTAX.PROD.FTP.LIEN' ECNTSUP.DOESTAX.PROD.FTP.LIEN
put 'ECNTSUP.DOESTAX.PROD.FTP.LIEN.QTR' +
ECNTSUP.DOESTAX.PROD.FTP.LIEN.QTR
put 'ECNTSUP.DOESTAX.PROD.FTP.DPC' ECNTSUP.DOESTAX.PROD.FTP.DPC
put 'ECNTSUP.DOESTAX.PROD.FTP.DPC.QTR' +
ECNTSUP.DOESTAX.PROD.FTP.DPC.QTR
put 'ECNTSUP.DOESTAX.PROD.FTP.PAYDIST' +
ECNTSUP.DOESTAX.PROD.FTP.PAYDIST
put 'ECNTSUP.DOESTAX.PROD.FTP.QTR' ECNTSUP.DOESTAX.PROD.FTP.QTR
put 'ECNTSUP.DOESTAX.PROD.FTP.RATE' ECNTSUP.DOESTAX.PROD.FTP.RATE
put 'ECNTSUP.DOESTAX.PROD.FTP.QCOLL' ECNTSUP.DOESTAX.PROD.FTP.QCOLL
put 'ECNTSUP.DOESTAX.PROD.FTP.PRF' ECNTSUP.DOESTAX.PROD.FTP.PRF
put 'ECNTSUP.DOESTAX.PROD.FTP.DET' ECNTSUP.DOESTAX.PROD.FTP.DET
put 'ECNTSUP.DOESTAX.PROD.FTP.FSC' ECNTSUP.DOESTAX.PROD.FTP.FSC
put 'ECNTSUP.DOESTAX.PROD.FTP.ADR' ECNTSUP.DOESTAX.PROD.FTP.ADR
put 'ECNTSUP.DOESTAX.PROD.FTP.ERR' ECNTSUP.DOESTAX.PROD.FTP.ERR
put 'ECNTSUP.DOESTAX.PROD.FTP.ERRTRN' +
ECNTSUP.DOESTAX.PROD.FTP.ERRTRN
put 'ECNTSUP.DOESTAX.PROD.FTP.AUDIT' ECNTSUP.DOESTAX.PROD.FTP.AUDIT
put 'ECNTSUP.DOESTAX.PROD.FTP.REL' ECNTSUP.DOESTAX.PROD.FTP.REL
put 'ECNTSUP.DOESTAX.PROD.FTP.EMP.NAME' +
ECNTSUP.DOESTAX.PROD.FTP.EMP.NAME
put 'ECNTSUP.DOESTAX.PROD.FTP.OPO' ECNTSUP.DOESTAX.PROD.FTP.OPO
PUT 'ECNTSUP.DOESTAX.PROD.FTP.BX206' ECNTSUP.DOESTAX.PROD.FTP.BX206
QUIT
//SYSPRINT DD SYSOUT=*
//OUTOUT DD SYSOUT=*
//SYSPUT DD SYSOUT=*,DCB=BLKSIZE=133
//SYSGET DD *,DCB=BLKSIZE=80
//
//**********************************************************
//COPY1 EXEC PGM=IDCAMS 00851099
//SYSPRINT DD SYSOUT=* 00860099
//INDD01 DD DSN=DOESTAX.PROD.ESSP.X420.BTC,DISP=SHR 00870099