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

141 lines
11 KiB
Plaintext

//***** 00010000
//* UI TAX VSAM FILE TAPE BACKUP - SPECIAL VERSION (03.27.02) 00030001
//***** 00050000
//DTSUXVSM PROC LVLNODE='PROD', 00060001
// BCKNODE='BACKUP', 00061000
// BKUPGEN='(+1)' 00070000
//********************************************************************* 00100000
//**STEP0110 EXEC PGM=SORT, MSTA BACKUP 00240102
//** COND=(0,LT) 00240202
//**SYSOUT DD SYSOUT=* 00240302
//**SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTA,DISP=SHR, 00240402
//** AMP=('BUFNI=5,BUFND=30') 00240502
//**SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTA&BKUPGEN., 00240602
//** DISP=(,CATLG,DELETE), 00240702
//** UNIT=CART, 00240802
//** VOLUME=(,RETAIN), 00240902
//** LABEL=(1,SL), 00241002
//** DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00241102
//**SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00241202
//********************************************************************* 00241300
//STEP0120 EXEC PGM=SORT, MSTB BACKUP 00241400
// COND=(0,LT) 00242000
//SYSOUT DD SYSOUT=* 00243000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTB.G1428V00, 00243102
// DISP=SHR, 00243202
// VOLUME=(,RETAIN), 00243302
// LABEL=(2,SL) 00243402
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTB&BKUPGEN., 00246000
// DISP=(,CATLG,DELETE), 00247000
// UNIT=CART, 00248000
// VOLUME=(,RETAIN), 00248104
// LABEL=(1,SL), 00248202
// 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..&BCKNODE..MSTC.G1428V00, 00249602
// DISP=SHR, 00249702
// VOLUME=(,RETAIN), 00249802
// LABEL=(3,SL) 00249902
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTC&BKUPGEN., 00250200
// DISP=(,CATLG,DELETE), 00250300
// UNIT=CART, 00251000
// VOLUME=(,RETAIN,REF=*.STEP0120.SORTOUT), 00260000
// LABEL=(2,SL), 00270002
// 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..&BCKNODE..MSTD.G1428V00, 00331002
// DISP=SHR, 00332002
// VOLUME=(,RETAIN), 00333002
// LABEL=(4,SL) 00334002
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTD&BKUPGEN., 00360000
// DISP=(,CATLG,DELETE), 00370000
// UNIT=CART, 00380000
// VOLUME=(,RETAIN,REF=*.STEP0130.SORTOUT), 00390000
// LABEL=(3,SL), 00400002
// 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..&BCKNODE..AIX.G1428V00, 00433102
// DISP=SHR, 00433202
// VOLUME=(,RETAIN), 00433302
// LABEL=(5,SL) 00433402
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..AIX&BKUPGEN., 00436000
// DISP=(,CATLG,DELETE), 00437000
// UNIT=CART, 00438000
// VOLUME=(,RETAIN,REF=*.STEP0140.SORTOUT), 00439000
// LABEL=(4,SL), 00439102
// 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..&BCKNODE..ATC.G1428V00, 00461002
// DISP=SHR, 00462002
// VOLUME=(,RETAIN), 00463002
// LABEL=(6,SL) 00464002
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..ATC&BKUPGEN., 00490000
// DISP=(,CATLG,DELETE), 00500000
// UNIT=CART, 00510000
// VOLUME=(,RETAIN,REF=*.STEP0150.SORTOUT), 00520000
// LABEL=(5,SL), 00530002
// 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..&BCKNODE..OLA.G1428V00, 00591002
// DISP=SHR, 00592002
// VOLUME=(,RETAIN), 00593002
// LABEL=(7,SL) 00594002
//OUTDD01 DD DSN=DOESTAX.&LVLNODE..&BCKNODE..OLA&BKUPGEN., 00620000
// DISP=(,CATLG,DELETE), 00630000
// UNIT=CART, 00640000
// VOLUME=(,RETAIN,REF=*.STEP0160.SORTOUT), 00650000
// LABEL=(6,SL), 00660002
// 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..&BCKNODE..REF.G1428V00, 00721002
// DISP=SHR, 00722002
// VOLUME=(,RETAIN), 00723002
// LABEL=(8,SL) 00724002
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..REF&BKUPGEN., 00750000
// DISP=(,CATLG,DELETE), 00760000
// UNIT=CART, 00770000
// VOLUME=(,RETAIN,REF=*.STEP0170.OUTDD01), 00780000
// LABEL=(7,SL), 00790002
// 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..&BCKNODE..WRK.G1428V00, 00851002
// DISP=SHR, 00852002
// VOLUME=(,RETAIN), 00853002
// LABEL=(9,SL) 00854003
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WRK&BKUPGEN., 00880000
// DISP=(,CATLG,DELETE), 00890000
// UNIT=CART, 00900000
// VOLUME=(,RETAIN,REF=*.STEP0180.SORTOUT), 00910000
// LABEL=(8,SL), 00920003
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00930000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00940000
//********************************************************************* 01340000