Files
DUTAS/Procs/DTSUTVSZ
2025-07-21 11:20:11 -04:00

236 lines
19 KiB
Plaintext

//***** 00010000
//* 00020000
//* UI TAX VSAM FILE TAPE 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
//* 00042000
//* 11/18/2004 ADDED MSTH/MSTI FIESL ZL1 00043000
//* 00044000
//***** 00050000
//DTSUTVSM PROC LVLNODE='PROD', 00060000
// BCKNODE='BACKUP', 00061000
// BKUPGEN='(+1)' 00070000
//********************************************************************* 00100000
//STEP0110 EXEC PGM=SORT, MSTA BACKUP 00240100
// COND=(0,LT) 00240200
//SYSOUT DD SYSOUT=* 00240300
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTA,DISP=SHR, 00240400
// AMP=('BUFNI=5,BUFND=30') 00240500
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTA&BKUPGEN., 00240600
// DISP=(,CATLG,DELETE), 00240700
// UNIT=CART, 00240800
// VOL=SER=(400608,401180,RETAIN), 00240901
// LABEL=(1,SL), 00241000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00241100
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00241200
//********************************************************************* 00241300
//STEP0120 EXEC PGM=SORT, MSTB BACKUP 00241400
// COND=(0,LT) 00242000
//SYSOUT DD SYSOUT=* 00243000
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTB,DISP=SHR, 00243100
// AMP=('BUFNI=5,BUFND=30') 00243200
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTB&BKUPGEN., 00246000
// DISP=(,CATLG,DELETE), 00247000
// UNIT=CART, 00248000
// VOLUME=(,RETAIN,REF=*.STEP0110.SORTOUT), 00248100
// LABEL=(2,SL), 00248200
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00249000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00249100
//********************************************************************* 00249200
//STEP0130 EXEC PGM=SORT, MSTC BACKUP 00249300
// COND=(0,LT) 00249400
//SYSOUT DD SYSOUT=* 00249500
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTC,DISP=SHR, 00249600
// AMP=('BUFNI=5,BUFND=30') 00249700
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTC&BKUPGEN., 00249800
// DISP=(,CATLG,DELETE), 00249900
// UNIT=CART, 00250000
// VOLUME=(,RETAIN,REF=*.STEP0120.SORTOUT), 00260000
// LABEL=(3,SL), 00270000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00280000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00290000
//********************************************************************* 00300000
//STEP0140 EXEC PGM=SORT, MSTD BACKUP 00310000
// COND=(0,LT) 00320000
//SYSOUT DD SYSOUT=* 00330000
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTD,DISP=SHR, 00340000
// AMP=('BUFNI=5,BUFND=30') 00350000
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTD&BKUPGEN., 00360000
// DISP=(,CATLG,DELETE), 00370000
// UNIT=CART, 00380000
// VOLUME=(,RETAIN,REF=*.STEP0130.SORTOUT), 00390000
// LABEL=(4,SL), 00400000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00410000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00420000
//********************************************************************* 00430000
//STEP0150 EXEC PGM=SORT, AIX BACKUP 00431000
// COND=(0,LT) 00432000
//SYSOUT DD SYSOUT=* 00433000
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.AIX,DISP=SHR, 00434000
// AMP=('BUFNI=5,BUFND=30') 00435000
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..AIX&BKUPGEN., 00436000
// DISP=(,CATLG,DELETE), 00437000
// UNIT=CART, 00438000
// VOLUME=(,RETAIN,REF=*.STEP0140.SORTOUT), 00439000
// LABEL=(5,SL), 00439100
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=64,BLKSIZE=8192) 00439200
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00439300
//********************************************************************* 00439400
//STEP0160 EXEC PGM=SORT, ATC BACKUP 00440000
// COND=(0,LT) 00450000
//SYSOUT DD SYSOUT=* 00460000
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.ATC,DISP=SHR, 00470000
// AMP=('BUFNI=5,BUFND=30') 00480000
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..ATC&BKUPGEN., 00490000
// DISP=(,CATLG,DELETE), 00500000
// UNIT=CART, 00510000
// VOLUME=(,RETAIN,REF=*.STEP0150.SORTOUT), 00520000
// LABEL=(6,SL), 00530000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00540000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00550000
//********************************************************************* 00560000
//STEP0170 EXEC PGM=IDCAMS, OLA BACKUP 00570000
// COND=(0,LT) 00580000
//SYSPRINT DD SYSOUT=* 00590000
//INDD01 DD DSN=DOESTAX.&LVLNODE..VSAM.OLA,DISP=SHR, 00600000
// AMP=('BUFNI=5,BUFND=30') 00610000
//OUTDD01 DD DSN=DOESTAX.&LVLNODE..&BCKNODE..OLA&BKUPGEN., 00620000
// DISP=(,CATLG,DELETE), 00630000
// UNIT=CART, 00640000
// VOLUME=(,RETAIN,REF=*.STEP0160.SORTOUT), 00650000
// LABEL=(7,SL), 00660000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00670000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00680000
//********************************************************************* 00690000
//STEP0180 EXEC PGM=SORT, REF BACKUP 00700000
// COND=(0,LT) 00710000
//SYSOUT DD SYSOUT=* 00720000
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00730000
// AMP=('BUFNI=5,BUFND=30') 00740000
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..REF&BKUPGEN., 00750000
// DISP=(,CATLG,DELETE), 00760000
// UNIT=CART, 00770000
// VOLUME=(,RETAIN,REF=*.STEP0170.OUTDD01), 00780000
// LABEL=(8,SL), 00790000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00800000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00810000
//********************************************************************* 00820000
//STEP0190 EXEC PGM=SORT, WRK BACKUP 00830000
// COND=(0,LT) 00840000
//SYSOUT DD SYSOUT=* 00850000
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.WRK,DISP=SHR, 00860000
// AMP=('BUFNI=5,BUFND=30') 00870000
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WRK&BKUPGEN., 00880000
// DISP=(,CATLG,DELETE), 00890000
// UNIT=CART, 00900000
// VOLUME=(,RETAIN,REF=*.STEP0180.SORTOUT), 00910000
// LABEL=(9,SL), 00920000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00930000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00940000
//********************************************************************* 00950000
//STEP0200 EXEC PGM=SORT,REGION=0K, ELECTRONIC MSTE BACKUP 00960000
// COND=(0,LT) 00970000
//SYSOUT DD SYSOUT=* 00980000
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTE,DISP=SHR, 00990000
// AMP=('BUFNI=5,BUFND=30') 01000000
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTE&BKUPGEN., 01010000
// DISP=(,CATLG,DELETE), 01020000
// UNIT=CART, 01030000
// VOLUME=(,RETAIN,REF=*.STEP0190.SORTOUT), 01040000
// LABEL=(10,SL), 01050000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01060000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01070000
//********************************************************************* 01080000
//STEP0210 EXEC PGM=SORT,REGION=0K, ELECTRONIC MSTF BACKUP 01090000
// COND=(0,LT) 01100000
//SYSOUT DD SYSOUT=* 01110000
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTF,DISP=SHR, 01120000
// AMP=('BUFNI=5,BUFND=30') 01130000
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTF&BKUPGEN., 01140000
// DISP=(,CATLG,DELETE), 01150000
// UNIT=CART, 01160000
// VOLUME=(,RETAIN,REF=*.STEP0200.SORTOUT), 01170000
// LABEL=(11,SL), 01180000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01190000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01200000
//********************************************************************* 01210000
//STEP0220 EXEC PGM=SORT,REGION=0K, ELECTRONIC MSTG BACKUP 01220000
// COND=(0,LT) 01230000
//SYSOUT DD SYSOUT=* 01240000
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTG,DISP=SHR, 01250000
// AMP=('BUFNI=5,BUFND=30') 01260000
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTG&BKUPGEN., 01270000
// DISP=(,CATLG,DELETE), 01280000
// UNIT=CART, 01290000
// VOLUME=(,RETAIN,REF=*.STEP0210.SORTOUT), 01300000
// LABEL=(12,SL), 01310000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01320000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01330000
//********************************************************************* 01331000
//STEP0230 EXEC PGM=SORT, MSTH BACKUP 01332000
// COND=(0,LT) 01333000
//SYSOUT DD SYSOUT=* 01334000
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTH,DISP=SHR, 01335000
// AMP=('BUFNI=5,BUFND=30') 01336000
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTH&BKUPGEN., 01337000
// DISP=(,CATLG,DELETE), 01338000
// UNIT=CART, 01339000
// VOLUME=(,RETAIN), 01339300
// LABEL=(1,SL), 01339400
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01339600
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01339700
//********************************************************************* 01339800
//STEP0240 EXEC PGM=SORT, MSTI BACKUP 01339900
// COND=(0,LT) 01340000
//SYSOUT DD SYSOUT=* 01340100
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTI,DISP=SHR, 01340200
// AMP=('BUFNI=5,BUFND=30') 01340300
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTI&BKUPGEN., 01340400
// DISP=(,CATLG,DELETE), 01340500
// UNIT=CART, 01340600
// VOLUME=(,RETAIN,REF=*.STEP0230.SORTOUT), 01340700
// LABEL=(2,SL), 01340800
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01340900
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01341000
//********************************************************************* 01341100
//STEP0250 EXEC PGM=SORT, WTC BACKUP 01341200
// COND=(0,LT) 01341300
//SYSOUT DD SYSOUT=* 01341400
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.WTC,DISP=SHR, 01341500
// AMP=('BUFNI=5,BUFND=30') 01341600
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WTC&BKUPGEN., 01341700
// DISP=(,CATLG,DELETE), 01342000
// UNIT=CART, 01343000
// VOLUME=(,RETAIN,REF=*.STEP0240.SORTOUT), 01343100
// LABEL=(3,SL), 01345000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01346000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01347000
//******************************************************************* 01348000
//STEP0260 EXEC PGM=SORT, WGH BACKUP 01349000
// COND=(0,LT) 01349100
//SYSOUT DD SYSOUT=* 01349200
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.WGH,DISP=SHR, 01349300
// AMP=('BUFNI=5,BUFND=30') 01349400
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WGH&BKUPGEN., 01349500
// DISP=(,CATLG,DELETE), 01349600
// UNIT=CART, 01349700
// VOLUME=(,RETAIN,REF=*.STEP0250.SORTOUT), 01349800
// LABEL=(4,SL), 01349900
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=18,BLKSIZE=18000) 01350000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01351000
//**** 01351100
//STEP0270 EXEC PGM=SORT, WAGE NAME BACKUP 01351200
// COND=(0,LT) 01351300
//SYSOUT DD SYSOUT=* 01351400
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.WAGE.NAME,DISP=SHR, 01351500
// AMP=('BUFNI=5,BUFND=30') 01351600
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WAGE.NAME&BKUPGEN., 01351700
// DISP=(,CATLG,DELETE), 01351800
// UNIT=CART, 01351900
// VOLUME=(,RETAIN,REF=*.STEP0260.SORTOUT), 01352000
// LABEL=(5,SL), 01352100
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=51,BLKSIZE=5100) 01352200
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01352300
//**** 01353000