257 lines
20 KiB
Plaintext
257 lines
20 KiB
Plaintext
//***** 00010000
|
|
//* 11/11/99 MODIFIED FOR Y2K/390 ENV. ZL1 00020000
|
|
//* 00021000
|
|
//* 00023000
|
|
//* UI TAX VSAM FILE MONTHLY RESTORE. FOR PRODUCTION USE ONLY 00030001
|
|
//* 00040000
|
|
//***** 00050000
|
|
//DTSURMON PROC LVLNODE='PROD', 00060001
|
|
// BCKNODE='BKP.MONEND', 00070001
|
|
// BKUPGEN='(-1)' 00080002
|
|
//********************************************************************* 00090000
|
|
//STEP0100 EXEC PGM=IDCAMS, DELETE AND DEFINE VSAM FILES 00100000
|
|
// COND=(0,LT) 00110000
|
|
//SYSPRINT DD SYSOUT=* 00120000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSA),DISP=SHR 00130000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSB),DISP=SHR 00140000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSC),DISP=SHR 00150000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSD),DISP=SHR 00160000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDAIX),DISP=SHR 00170000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDATC),DISP=SHR 00180000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDOLA),DISP=SHR 00190000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDREF),DISP=SHR 00200000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWRK),DISP=SHR 00210000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSE),DISP=SHR 00211000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSF),DISP=SHR 00212000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSG),DISP=SHR 00213000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSH),DISP=SHR 00213100
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSI),DISP=SHR 00213200
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWTC),DISP=SHR 00215000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWGH),DISP=SHR 00216000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDNAM),DISP=SHR 00217000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWSQ),DISP=SHR 00217105
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSJ),DISP=SHR 00217205
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWG2),DISP=SHR 00217306
|
|
//****************************************************************** 00220000
|
|
//STEP0310 EXEC PGM=SORT, MSTA RESTORE 00480000
|
|
// COND=(0,LT) 00490000
|
|
//SYSOUT DD SYSOUT=* 00500000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTA&BKUPGEN., 00510000
|
|
// DISP=SHR, 00520000
|
|
// VOLUME=(,RETAIN), 00521000
|
|
// LABEL=(1,SL) 00522000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTA,DISP=SHR, 00530000
|
|
// AMP=('BUFNI=5,BUFND=30') 00540000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00550000
|
|
//****************************************************************** 00560000
|
|
//STEP0320 EXEC PGM=SORT, MSTB RESTORE 00570000
|
|
// COND=(0,LT) 00580000
|
|
//SYSOUT DD SYSOUT=* 00590000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTB&BKUPGEN., 00600000
|
|
// DISP=SHR, 00610000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0310.SORTIN), 00611000
|
|
// LABEL=(2,SL) 00612000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTB,DISP=SHR, 00620000
|
|
// AMP=('BUFNI=5,BUFND=30') 00630000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00640000
|
|
//****************************************************************** 00650000
|
|
//STEP0330 EXEC PGM=SORT, MSTC RESTORE 00660000
|
|
// COND=(0,LT) 00670000
|
|
//SYSOUT DD SYSOUT=* 00680000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTC&BKUPGEN., 00690000
|
|
// DISP=SHR, 00701000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0320.SORTIN), 00702000
|
|
// LABEL=(3,SL) 00703000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTC,DISP=SHR, 00710000
|
|
// AMP=('BUFNI=5,BUFND=30') 00720000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00730000
|
|
//****************************************************************** 00740000
|
|
//STEP0340 EXEC PGM=SORT, MSTD RESTORE 00750000
|
|
// COND=(0,LT) 00760000
|
|
//SYSOUT DD SYSOUT=* 00770000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTD&BKUPGEN., 00780000
|
|
// DISP=SHR, 00791000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0330.SORTIN), 00792000
|
|
// LABEL=(4,SL) 00793000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTD,DISP=SHR, 00800000
|
|
// AMP=('BUFNI=5,BUFND=30') 00810000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00820000
|
|
//****************************************************************** 00830000
|
|
//STEP0350 EXEC PGM=SORT, AIX RESTORE 00840000
|
|
// COND=(0,LT) 00850000
|
|
//SYSOUT DD SYSOUT=* 00860000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..AIX&BKUPGEN., 00870000
|
|
// DISP=SHR, 00881000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0340.SORTIN), 00882000
|
|
// LABEL=(5,SL) 00883000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.AIX,DISP=SHR, 00890000
|
|
// AMP=('BUFNI=5,BUFND=30') 00900000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00910000
|
|
//****************************************************************** 00920000
|
|
//STEP0360 EXEC PGM=SORT, ATC RESTORE 00930000
|
|
// COND=(0,LT) 00940000
|
|
//SYSOUT DD SYSOUT=* 00950000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..ATC&BKUPGEN., 00960000
|
|
// DISP=SHR, 00971000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0350.SORTIN), 00972000
|
|
// LABEL=(6,SL) 00973000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.ATC,DISP=SHR, 00980000
|
|
// AMP=('BUFNI=5,BUFND=30') 00990000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01000000
|
|
//****************************************************************** 01010000
|
|
//STEP0370 EXEC PGM=IDCAMS, OLA RESTORE 01020000
|
|
// COND=(0,LT) 01030000
|
|
//SYSPRINT DD SYSOUT=* 01040000
|
|
//INDD01 DD DSN=DOESTAX.&LVLNODE..&BCKNODE..OLA&BKUPGEN., 01050000
|
|
// DISP=SHR, 01061000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0360.SORTIN), 01062000
|
|
// LABEL=(7,SL) 01063000
|
|
//OUTDD01 DD DSN=DOESTAX.&LVLNODE..VSAM.OLA,DISP=SHR, 01070000
|
|
// AMP=('BUFNI=5,BUFND=30') 01080000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 01090000
|
|
//****************************************************************** 01100000
|
|
//STEP0380 EXEC PGM=SORT, REF RESTORE 01110000
|
|
// COND=(0,LT) 01120000
|
|
//SYSOUT DD SYSOUT=* 01130000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..REF&BKUPGEN., 01140000
|
|
// DISP=SHR, 01151000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0370.INDD01), 01152000
|
|
// LABEL=(8,SL) 01153000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 01160000
|
|
// AMP=('BUFNI=5,BUFND=30') 01170000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01180000
|
|
//****************************************************************** 01190000
|
|
//STEP0390 EXEC PGM=SORT, WRK RESTORE 01200000
|
|
// COND=(0,LT) 01210000
|
|
//SYSOUT DD SYSOUT=* 01220000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WRK&BKUPGEN., 01230000
|
|
// DISP=SHR, 01241000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0380.SORTIN), 01242000
|
|
// LABEL=(9,SL) 01243000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WRK,DISP=SHR, 01250000
|
|
// AMP=('BUFNI=5,BUFND=30') 01260000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01270000
|
|
//****************************************************************** 01271000
|
|
//STEP0400 EXEC PGM=SORT, MSTE RESTORE 01272000
|
|
// COND=(0,LT) 01273000
|
|
//SYSOUT DD SYSOUT=* 01274000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTE&BKUPGEN., 01275000
|
|
// DISP=SHR, 01276000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0390.SORTIN), 01277100
|
|
// LABEL=(10,SL) 01277200
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTE,DISP=SHR, 01278000
|
|
// AMP=('BUFNI=5,BUFND=30') 01279000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01279100
|
|
//****************************************************************** 01279200
|
|
//STEP0410 EXEC PGM=SORT, MSTF RESTORE 01279300
|
|
// COND=(0,LT) 01279400
|
|
//SYSOUT DD SYSOUT=* 01279500
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTF&BKUPGEN., 01279600
|
|
// DISP=SHR, 01279700
|
|
// VOLUME=(,RETAIN,REF=*.STEP0400.SORTIN), 01279900
|
|
// LABEL=(11,SL) 01280000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTF,DISP=SHR, 01280100
|
|
// AMP=('BUFNI=5,BUFND=30') 01280200
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01281000
|
|
//****************************************************************** 01282000
|
|
//STEP0420 EXEC PGM=SORT, MSTG RESTORE 01283000
|
|
// COND=(0,LT) 01284000
|
|
//SYSOUT DD SYSOUT=* 01285000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTG&BKUPGEN., 01286000
|
|
// DISP=SHR, 01287000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0410.SORTIN), 01288100
|
|
// LABEL=(12,SL) 01288200
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTG,DISP=SHR, 01289000
|
|
// AMP=('BUFNI=5,BUFND=30') 01289100
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01289200
|
|
//****************************************************************** 01300000
|
|
//STEP0430 EXEC PGM=SORT, MSTH RESTORE 01310000
|
|
// COND=(0,LT) 01320000
|
|
//SYSOUT DD SYSOUT=* 01330000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTH&BKUPGEN., 01340000
|
|
// DISP=SHR, 01350000
|
|
// VOLUME=(,RETAIN), 01360000
|
|
// LABEL=(1,SL) 01370000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTH,DISP=SHR, 01380000
|
|
// AMP=('BUFNI=5,BUFND=30') 01390000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01400000
|
|
//****************************************************************** 01401000
|
|
//STEP0440 EXEC PGM=SORT, MSTI RESTORE 01402000
|
|
// COND=(0,LT) 01403000
|
|
//SYSOUT DD SYSOUT=* 01404000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTI&BKUPGEN., 01405000
|
|
// DISP=SHR, 01406000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0430.SORTIN), 01407000
|
|
// LABEL=(2,SL) 01408000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTI,DISP=SHR, 01409000
|
|
// AMP=('BUFNI=5,BUFND=30') 01409100
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01409200
|
|
//****************************************************************** 01410000
|
|
//STEP0450 EXEC PGM=SORT, WTC RESTORE 01420000
|
|
// COND=(0,LT) 01430000
|
|
//SYSOUT DD SYSOUT=* 01440000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WTC&BKUPGEN., 01450000
|
|
// DISP=SHR, 01460000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0440.SORTIN), 01471000
|
|
// LABEL=(3,SL) 01480000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WTC,DISP=SHR, 01490000
|
|
// AMP=('BUFNI=5,BUFND=30') 01500000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01510000
|
|
//****************************************************************** 01520000
|
|
//STEP0460 EXEC PGM=SORT, WGH RESTORE 01530000
|
|
// COND=(0,LT) 01540000
|
|
//SYSOUT DD SYSOUT=* 01550000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WGH&BKUPGEN., 01560000
|
|
// DISP=SHR, 01570000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0450.SORTIN), 01580000
|
|
// LABEL=(4,SL) 01590000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WGH,DISP=SHR, 01600000
|
|
// AMP=('BUFNI=5,BUFND=30') 01610000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01620000
|
|
//**** 01630000
|
|
//STEP0470 EXEC PGM=SORT, WAGE NAME RESTORE 01640000
|
|
// COND=(0,LT) 01650000
|
|
//SYSOUT DD SYSOUT=* 01660000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WAGE.NAME&BKUPGEN., 01670000
|
|
// DISP=SHR, 01680000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0460.SORTIN), 01690000
|
|
// LABEL=(5,SL) 01700000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WAGE.NAME,DISP=SHR, 01710000
|
|
// AMP=('BUFNI=5,BUFND=30') 01720000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01730000
|
|
//**** 01731000
|
|
//STEP0480 EXEC PGM=SORT, WESQ RESTORE 01732005
|
|
// COND=(0,LT) 01733003
|
|
//SYSOUT DD SYSOUT=* 01734003
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WESQ&BKUPGEN., 01735005
|
|
// DISP=SHR, 01736003
|
|
// VOLUME=(,RETAIN,REF=*.STEP0470.SORTIN), 01737003
|
|
// LABEL=(6,SL) 01738003
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WESQ,DISP=SHR, 01739005
|
|
// AMP=('BUFNI=5,BUFND=30') 01739103
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01739203
|
|
//**** 01739303
|
|
//STEP0490 EXEC PGM=SORT, MSTJ RESTORE 01739405
|
|
// COND=(0,LT) 01739505
|
|
//SYSOUT DD SYSOUT=* 01739605
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTJ&BKUPGEN., 01739705
|
|
// DISP=SHR, 01739805
|
|
// VOLUME=(,RETAIN,REF=*.STEP0480.SORTIN), 01739905
|
|
// LABEL=(7,SL) 01740005
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTJ,DISP=SHR, 01741005
|
|
// AMP=('BUFNI=5,BUFND=30') 01742005
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01743005
|
|
//**** 01744005
|
|
//STEP0500 EXEC PGM=SORT, WG2 RESTORE 01745006
|
|
// COND=(0,LT) 01746006
|
|
//SYSOUT DD SYSOUT=* 01747006
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WG2&BKUPGEN., 01748006
|
|
// DISP=SHR, 01749006
|
|
// VOLUME=(,RETAIN,REF=*.STEP0490.SORTIN), 01749106
|
|
// LABEL=(8,SL) 01749206
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WG2,DISP=SHR, 01749306
|
|
// AMP=('BUFNI=5,BUFND=30') 01749406
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01749506
|
|
//**** 01749606
|
|
//**** 01750000
|