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

190 lines
15 KiB
Plaintext

//***** 00010000
//* SPECIAL TAPE2TAPE COPY OF THE UI TAX MASTER BACKUP FILES 00020001
//* IN ORDER TO KEEP AN "INTERESTING" FILE SITUATION. 00030001
//* 00040000
//* UI TAX VSAM FILE BACKUP TAPE-2-TAPE 00050001
//* 00060000
//***** 00070000
//DTSUTVST PROC 00080003
//**** 00110000
//STEP0110 EXEC PGM=SORT,REGION=0K, MSTA BACKUP 00120000
// COND=(0,LT) 00130000
//SYSOUT DD SYSOUT=* 00140000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..MSTA&BKPINGEN., 00161002
// DISP=SHR, 00162002
// VOLUME=(,RETAIN), 00163002
// LABEL=(1,SL) 00164002
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..MSTA, 00170003
// DISP=(,CATLG,DELETE), 00180000
// UNIT=CART, 00190000
// VOLUME=(,RETAIN), 00200000
// LABEL=(1,SL), 00210000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00220000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00230000
//**** 00240000
//STEP0120 EXEC PGM=SORT,REGION=0K, MSTB BACKUP 00250000
// COND=(0,LT) 00260000
//SYSOUT DD SYSOUT=* 00270000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..MSTB&BKPINGEN., 00291004
// DISP=SHR, 00292004
// VOLUME=(,RETAIN,REF=*.STEP0110.SORTIN), 00293004
// LABEL=(2,SL) 00294004
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..MSTB, 00300003
// DISP=(,CATLG,DELETE), 00310000
// UNIT=CART, 00320000
// VOLUME=(,RETAIN,REF=*.STEP0110.SORTOUT), 00330000
// LABEL=(2,SL), 00340000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00350000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00360000
//**** 00370000
//STEP0130 EXEC PGM=SORT,REGION=0K, MSTC BACKUP 00380000
// COND=(0,LT) 00390000
//SYSOUT DD SYSOUT=* 00400000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..MSTC&BKPINGEN., 00421005
// DISP=SHR, 00422005
// VOLUME=(,RETAIN,REF=*.STEP0120.SORTIN), 00423005
// LABEL=(3,SL) 00424005
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..MSTC, 00430003
// DISP=(,CATLG,DELETE), 00440000
// UNIT=CART, 00450000
// VOLUME=(,RETAIN,REF=*.STEP0120.SORTOUT), 00460000
// LABEL=(3,SL), 00470000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00480000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00490000
//**** 00500000
//STEP0140 EXEC PGM=SORT,REGION=0K, MSTD BACKUP 00510000
// COND=(0,LT) 00520000
//SYSOUT DD SYSOUT=* 00530000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..MSTD&BKPINGEN., 00551005
// DISP=SHR, 00552005
// VOLUME=(,RETAIN,REF=*.STEP0130.SORTIN), 00553005
// LABEL=(4,SL) 00554005
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..MSTD, 00560003
// DISP=(,CATLG,DELETE), 00570000
// UNIT=CART, 00580000
// VOLUME=(,RETAIN,REF=*.STEP0130.SORTOUT), 00590000
// LABEL=(4,SL), 00600000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00610000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00620000
//**** 00630000
//STEP0150 EXEC PGM=SORT,REGION=0K, AIX BACKUP 00640000
// COND=(0,LT) 00650000
//SYSOUT DD SYSOUT=* 00660000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..AIX&BKPINGEN., 00681005
// DISP=SHR, 00682005
// VOLUME=(,RETAIN,REF=*.STEP0140.SORTIN), 00683005
// LABEL=(5,SL) 00684005
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..AIX, 00690003
// DISP=(,CATLG,DELETE), 00700000
// UNIT=CART, 00710000
// VOLUME=(,RETAIN,REF=*.STEP0140.SORTOUT), 00720000
// LABEL=(5,SL), 00730000
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=64,BLKSIZE=8192) 00740000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00750000
//**** 00760000
//STEP0160 EXEC PGM=SORT,REGION=0K, ATC BACKUP 00770000
// COND=(0,LT) 00780000
//SYSOUT DD SYSOUT=* 00790000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..ATC&BKPINGEN., 00811005
// DISP=SHR, 00812005
// VOLUME=(,RETAIN,REF=*.STEP0150.SORTIN), 00813005
// LABEL=(6,SL) 00814005
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..ATC, 00820003
// DISP=(,CATLG,DELETE), 00830000
// UNIT=CART, 00840000
// VOLUME=(,RETAIN,REF=*.STEP0150.SORTOUT), 00850000
// LABEL=(6,SL), 00860000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00870000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00880000
//**** 00890000
//STEP0170 EXEC PGM=IDCAMS, OLA BACKUP 00900000
// COND=(0,LT) 00910000
//SYSPRINT DD SYSOUT=* 00920000
//INDD01 DD DSN=DOESTAX.&LVLNODE..&BKPINODE..OLA&BKPINGEN., 00941005
// DISP=SHR, 00942005
// VOLUME=(,RETAIN,REF=*.STEP0160.SORTIN), 00943005
// LABEL=(7,SL) 00944005
//OUTDD01 DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..OLA, 00950003
// DISP=(,CATLG,DELETE), 00960000
// UNIT=CART, 00970000
// VOLUME=(,RETAIN,REF=*.STEP0160.SORTOUT), 00980000
// LABEL=(7,SL), 00990000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01000000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 01010000
//**** 01020000
//STEP0180 EXEC PGM=SORT,REGION=0K, REF BACKUP 01030000
// COND=(0,LT) 01040000
//SYSOUT DD SYSOUT=* 01050000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..REF&BKPINGEN., 01071005
// DISP=SHR, 01072005
// VOLUME=(,RETAIN,REF=*.STEP0170.INDD01), 01073005
// LABEL=(8,SL) 01074005
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..REF, 01080003
// DISP=(,CATLG,DELETE), 01090000
// UNIT=CART, 01100000
// VOLUME=(,RETAIN,REF=*.STEP0170.OUTDD01), 01110000
// LABEL=(8,SL), 01120000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01130000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01140000
//**** 01150000
//STEP0190 EXEC PGM=SORT,REGION=0K, WRK BACKUP 01160000
// COND=(0,LT) 01170000
//SYSOUT DD SYSOUT=* 01180000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..WRK&BKPINGEN., 01201005
// DISP=SHR, 01202005
// VOLUME=(,RETAIN,REF=*.STEP0180.SORTIN), 01203005
// LABEL=(9,SL) 01204005
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..WRK, 01210003
// DISP=(,CATLG,DELETE), 01220000
// UNIT=CART, 01230000
// VOLUME=(,RETAIN,REF=*.STEP0180.SORTOUT), 01240000
// LABEL=(9,SL), 01250000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01260000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01270000
//**** 01280000
//STEP0200 EXEC PGM=SORT,REGION=0K, ELECTRONIC MSTE BACKUP 01290000
// COND=(0,LT) 01300000
//SYSOUT DD SYSOUT=* 01310000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..MSTE&BKPINGEN., 01331005
// DISP=SHR, 01332005
// VOLUME=(,RETAIN,REF=*.STEP0190.SORTIN), 01333005
// LABEL=(10,SL) 01334005
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..MSTE, 01340003
// DISP=(,CATLG,DELETE), 01350000
// UNIT=CART, 01360000
// VOLUME=(,RETAIN,REF=*.STEP0190.SORTOUT), 01370000
// LABEL=(10,SL), 01380000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01390000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01400000
//**** 01410000
//STEP0210 EXEC PGM=SORT,REGION=0K, ELECTRONIC MSTF BACKUP 01420000
// COND=(0,LT) 01430000
//SYSOUT DD SYSOUT=* 01440000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..MSTF&BKPINGEN., 01461006
// DISP=SHR, 01462005
// VOLUME=(,RETAIN,REF=*.STEP0200.SORTIN), 01463005
// LABEL=(11,SL) 01464006
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..MSTF, 01470003
// DISP=(,CATLG,DELETE), 01480000
// UNIT=CART, 01490000
// VOLUME=(,RETAIN,REF=*.STEP0200.SORTOUT), 01500000
// LABEL=(11,SL), 01510000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01520000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01530000
//**** 01540000
//STEP0220 EXEC PGM=SORT,REGION=0K, ELECTRONIC MSTG BACKUP 01550000
// COND=(0,LT) 01560000
//SYSOUT DD SYSOUT=* 01570000
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..MSTG&BKPINGEN., 01591005
// DISP=SHR, 01592005
// VOLUME=(,RETAIN,REF=*.STEP0210.SORTIN), 01593005
// LABEL=(12,SL) 01594005
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BKPOUTND..MSTG, 01600003
// DISP=(,CATLG,DELETE), 01610000
// UNIT=CART, 01620000
// VOLUME=(,RETAIN,REF=*.STEP0210.SORTOUT), 01630000
// LABEL=(12,SL), 01640000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 01650000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01660000
//**** 01670000