All Z' modified PROD server code merge 09/10/2025
This commit is contained in:
24
JCL/ReproGCKS.jcl
Normal file
24
JCL/ReproGCKS.jcl
Normal file
@ -0,0 +1,24 @@
|
||||
//IMPMF04 JOB
|
||||
//*
|
||||
//*STEP002 EXEC PGM=IEFBR14
|
||||
//*SYSPRINT DD SYSOUT=*
|
||||
//*SYSOUT DD SYSOUT=*
|
||||
//*DD1001 DD DSN=TMP0199,
|
||||
//* DISP=(,PASS,DELETE),
|
||||
//* DISP=DHR,
|
||||
//* DCB=(LRECL=512,RECFM=FB),
|
||||
//* PATH=('E:\FLAT_FILES\DOESTAX.CONV.TDEC.ESSP.MISSING.WAGES',
|
||||
//* COPY)
|
||||
//*
|
||||
//STEP004 EXEC PGM=IDCAMS
|
||||
//SYSPRINT DD SYSOUT=*
|
||||
//SORTIN DD DSN=DOESTAX.PROD.BD400.BTC.BACKUP.G0004V00,DISP=SHR
|
||||
//SORTOUT DD DSN=DOESTAX.PROD.BTC(+1),
|
||||
// DISP=(,CATLG,DELETE),
|
||||
// UNIT=SYSDA,
|
||||
// SPACE=(CYL,(20,10),RLSE),
|
||||
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8182)
|
||||
//SYSIN DD *
|
||||
REPRO IFILE(SORTIN) OFILE(SORTOUT)
|
||||
/*
|
||||
//
|
||||
Reference in New Issue
Block a user