Z updated PROCS

This commit is contained in:
2025-11-03 12:09:06 -05:00
parent 6537588163
commit 3972c4a856
3 changed files with 220 additions and 50 deletions

View File

@ -1,6 +1,6 @@
//***** 00010000
//* 00020000
//* UI TAX VSAM FILE TAPE BACKUP FOR PRODUCTION USE ONLY 00030000
//* UI TAX RAIINCODE VSAM FILE BACKUP FOR PRODUCTION USE ONLY 00030000
//* 00040000
//* 05/29/2001 MODIFIED FOR TAPE TRACKNG FILES. GD 00041000
//* 06/18/2002 ADDED WTC & WGH JHP 00041200
@ -32,26 +32,6 @@
//STEP0140 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.MSTD -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 00430000
//STEP0150 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.AIX -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 00439500
//STEP0160 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.ATC -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 00560000
//STEP0170 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.OLA -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 00690000
//STEP0180 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.REF -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 00820000
//STEP0190 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.WRK -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 00950000
//STEP0200 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.MSTE -FREQ &freq'
@ -72,10 +52,43 @@
//STEP0240 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.MSTI -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//*
//STEP0290 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.MSTJ -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 00430000
//STEP0150 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.AIX -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 00439500
//STEP0160 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.ATC -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//*
//STEP0350 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.ATH -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//*
//********************************************************************* 00560000
//STEP0170 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.OLA -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 00690000
//STEP0180 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.REF -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 00820000
//STEP0190 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.WRK -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//********************************************************************* 01341200
//STEP0250 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.WTC -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//*
/STEP0250 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.WG2 -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//******************************************************************* 01348000
//STEP0260 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.WGH -FREQ &freq'
@ -87,15 +100,26 @@
//STEP0280 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.WESQ -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//STEP0290 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.MSTJ -FREQ &freq'
//***
//STEP0320 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.WAGENAME -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//**** 01355000
//STEP0300 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..BTC -FREQ &freq'
//**** 01351100
//STEP0330 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.BTNO -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//****
//STEP0310 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.WG2 -FREQ &freq'
//**** 01351100
//STEP0340 EXEC PGM=backup,
// PARM='-DD DOESTAX.&LVLNODE..VSAM.TAXWGH -FREQ &freq'
//SYSPRINT DD SYSOUT=*
//**** 01440006
//**** 01351100
//STEP0360 EXEC PGM=SORT, BTC FILE BACKUP
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=DOESTAX.PROD.BTC,DISP=SHR
//SORTOUT DD DSN=DOESTAX.PROD.BACKUP.BTC(+1),
// DISP=(,CATLG,DELETE),
// UNIT=SYSDA,
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR
//****