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

26
JCL/DTSBX405.jcl
View File

@ -26,7 +26,7 @@
//SYSABEND DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//*
//*DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//*
//DTSFVRI1 DD DSN=DOESTAX.PROD.PER.RPT(+0),
// DISP=SHR
@ -34,10 +34,28 @@
//DTSLN405 DD DSN=DOESTAX.CONV.LEIN405.RECORD,
//* DISP=(NEW,CATLG,DELETE),
// DISP=SHR
//* UNIT=SYSDA,
//* SPACE=(CYL,(10,10),RLSE),
//* DCB=(RECFM=FB,LRECL=323,BLKSIZE=0)
// UNIT=SYSDA,
// SPACE=(CYL,(10,10),RLSE),
// CODEPAGE=1252,AUTOENCODE=YES,
// DCB=(RECFM=LSEQ,LRECL=323,BLKSIZE=0)
//*
//DTSLN403 DD DUMMY
//*
//*********************************************************************
//* // CODEPAGE=1252,AUTOENCODE=YES,
//*
//**
//STEP0200 EXEC PGM=FTP,PARM='(EXIT'
//INPUT DD *
10.57.110.147 21
dutasrc
Today728rc!
cd //Dutasrc/intranet/Outbound_intranet
ascii
put 'DOESTAX.CONV.LEIN405.RECORD' DOESTAX.CONV.LEIN405.RECORD
QUIT
//SYSPRINT DD SYSOUT=*
//OUTOUT DD SYSOUT=*
//SYSPUT DD SYSOUT=*,DCB=BLKSIZE=133
//SYSGET DD *,DCB=BLKSIZE=80
//