//*****                                                                 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    E       (PRESENTLY COMMENTS ONLY)      00022100
//*    06/18/2002  ADDED WTC & WGH                   JHP                00022200
//*                                                                     00022300
//*    11/16/2004  ADDED MSTH/MSTI/WAGE NAME FILES   ZL1                00022400
//*                                                                     00023000
//*    UI TAX VSAM FILE RESTORE. FOR PRODUCTION USE ONLY                00030000
//*                                                                     00040000
//*****                                                                 00050000
//DTSURVSM PROC LVLNODE='PROD',                                         00060000
//             BCKNODE='BACKUP'                                         00070000
//*            BKUPGEN='(+0)'                                           00080000
//********************************************************************* 00090000
//STEP0430 EXEC PGM=SORT,                       MSTH RESTORE            01310000
//             COND=(0,LT)                                              01320000
//SYSOUT   DD  SYSOUT=*                                                 01330000
//SORTIN   DD  DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTH.G0880V00,           01340000
//             DISP=SHR,                                                01350000
//             VOLUME=SER=(401180,RETAIN),                              01361000
//             LABEL=(1,SL),UNIT=CART                                   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.G0879V00,           01405000
//             DISP=SHR,                                                01406000
//             VOLUME=(,RETAIN,REF=*.STEP0430.SORTIN),                  01407000
//             LABEL=(2,SL),UNIT=CART                                   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.G4403V00,            01450000
//             DISP=SHR,                                                01460000
//             VOLUME=(,RETAIN,REF=*.STEP0440.SORTIN),                  01471000
//             LABEL=(3,SL),UNIT=CART                                   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.G4398V00,            01560000
//             DISP=SHR,                                                01570000
//             VOLUME=(,RETAIN,REF=*.STEP0450.SORTIN),                  01580000
//             LABEL=(4,SL),UNIT=CART                                   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.G0877V00,      01670000
//             DISP=SHR,                                                01680000
//             VOLUME=(,RETAIN,REF=*.STEP0460.SORTIN),                  01690000
//             LABEL=(5,SL),UNIT=CART                                   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
//****                                                                  01740000