All Z' modified PROD server code merge 09/10/2025

This commit is contained in:
2025-10-10 08:02:01 -04:00
parent 7408a12cc6
commit d3af779d95
145 changed files with 6247 additions and 419 deletions

View File

@ -14,7 +14,7 @@
//* ON REQUEST REPORT DTSBR414 - *
//****
//* 06/30/09 ADDED PROC TO ARCHIVE REPORT RECORDS 414 ZL1
//****
//**** TESTING RC ZL1
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//**
@ -49,17 +49,18 @@
//STEP0100.RPT907R1 DD HOLD=YES
//STEP0100.RPT907R2 DD HOLD=YES
//STEP0100.RPT980R1 DD HOLD=YES
//DOESLBLP.DOESLBL1 DD DUMMY LABELS 00631000
//*DOESLBLP.DOESLBL1 DD DUMMY
//*
//*
//*STEP0400 EXEC PGM=FTP
//*SYSPRINT DD SYSOUT=*
//*OUTOUT DD SYSOUT=*
//*SYSPUT DD SYSOUT=*,DCB=BLKSIZE=133
//*SYSGET DD *,DCB=BLKSIZE=80
//*INPUT DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSFT414),DISP=SHR
//*
//STEP0400 EXEC PGM=FTP
//SYSPRINT DD SYSOUT=*
//OUTOUT DD SYSOUT=*
//SYSPUT DD SYSOUT=*,DCB=BLKSIZE=133
//SYSGET DD *,DCB=BLKSIZE=80
//INPUT DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSFT414),DISP=SHR
/*
//STEP0500 EXEC DTSAR414 /ARCHIVE 414 RECORDS
//**
//STEP0600 EXEC DTSUTVSM,
// BKUPGEN='(+1)'
//*STEP0600 EXEC DTSUTVSM,
//* BKUPGEN='(+1)'
//*