181 lines
14 KiB
Plaintext
181 lines
14 KiB
Plaintext
//***** 00010000
|
|
//* 11/11/99 MODIFIED FOR Y2K/390 ENV. ZL1 00020000
|
|
//* 00021000
|
|
//* 05/29/01 MODIFIED FOR TAPE TRACKING FILES. GD 00022000
|
|
//* 06/18/2002 ADDED MSTH FILE (PRESENTLY COMMENTS ONLY) 00022100
|
|
//* 06/18/2002 ADDED WTC & WGH JHP 00022200
|
|
//* 00023000
|
|
//* UI TAX VSAM FILE RESTORE. 00030000
|
|
//* 00040000
|
|
//***** 00050000
|
|
//DTSURVSM PROC LVLNODE='PROD', 00060000
|
|
// BKPINODE='BACKUP', 00070001
|
|
// BKPINGEN='(+0)' 00080001
|
|
//********************************************************************* 00090000
|
|
//****************************************************************** 00220000
|
|
//STEP0310 EXEC PGM=SORT, MSTA RESTORE 00480000
|
|
// COND=(0,LT) 00490000
|
|
//SYSOUT DD SYSOUT=* 00500000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..MSTA&BKPINGEN., 00510001
|
|
// 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..&BKPINODE..MSTB&BKPINGEN., 00600001
|
|
// 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..&BKPINODE..MSTC&BKPINGEN., 00690001
|
|
// 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..&BKPINODE..MSTD&BKPINGEN., 00780001
|
|
// 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..&BKPINODE..AIX&BKPINGEN., 00870001
|
|
// 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..&BKPINODE..ATC&BKPINGEN., 00960001
|
|
// 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..&BKPINODE..OLA&BKPINGEN., 01050001
|
|
// 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..&BKPINODE..REF&BKPINGEN., 01140001
|
|
// 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..&BKPINODE..WRK&BKPINGEN., 01230001
|
|
// 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..&BKPINODE..MSTE&BKPINGEN., 01275001
|
|
// 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..&BKPINODE..MSTF&BKPINGEN., 01279601
|
|
// 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..&BKPINODE..MSTG&BKPINGEN., 01286001
|
|
// 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..&BKPINODE..MSTH&BKPINGEN., 01340001
|
|
//** DISP=SHR, 01350000
|
|
//** VOLUME=(,RETAIN,REF=*.STEP0420.SORTIN), 01360000
|
|
//** LABEL=(13,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
|
|
//****************************************************************** 01410000
|
|
//STEP0440 EXEC PGM=SORT, WTC RESTORE 01420000
|
|
// COND=(0,LT) 01430000
|
|
//SYSOUT DD SYSOUT=* 01440000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..WTC&BKPINGEN., 01450001
|
|
// DISP=SHR, 01460000
|
|
// VOLUME=(,RETAIN), 01470000
|
|
// LABEL=(1,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
|
|
//STEP0450 EXEC PGM=SORT, WGH RESTORE 01530000
|
|
// COND=(0,LT) 01540000
|
|
//SYSOUT DD SYSOUT=* 01550000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPINODE..WGH&BKPINGEN., 01560001
|
|
// DISP=SHR, 01570000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0440.SORTIN), 01580000
|
|
// LABEL=(2,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
|