//***** 00010000 //* 00020000 //* UI TAX EXTERNAL FILES RESTORE 00030001 //* 00040000 //* 05/15/2009 CREATE RESTORE PROC ZL1 00043201 //* 00044000 //***** 00050000 //DTSREEXT PROC BKUPGEN='(+0)', 00060003 // BCKNODE='BACKUP' 00060100 //* 00061000 //********************************************************************* 00100000 //STEP0110 EXEC PGM=SORT, CONV.BTC RESTORE 00240101 // COND=(0,LT) 00240200 //SYSOUT DD SYSOUT=* 00240300 //SORTIN DD DSN=DOESTAX.&EXTNODE..&BCKNODE..BTC&BKUPGEN., 00240601 // DISP=SHR, 00240702 // VOLUME=(,RETAIN), 00240902 // LABEL=(1,SL) 00241002 //SORTOUT DD DSN=DOESTAX.&EXTNODE..BTC(+1), 00241102 //* DISP=(OLD,KEEP,KEEP), 00241209 // DISP=(,CATLG,DELETE), 00241309 // SPACE=(8192,(100,200),RLSE), 00241406 // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00241507 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00241606 //********************************************************************* 00241706 //STEP0120 EXEC PGM=SORT, WAGE.BTC RESTORE 00241806 // COND=(0,LT) 00242000 //SYSOUT DD SYSOUT=* 00243000 //SORTIN DD DSN=DOESTAX.&EXTNODE..&BCKNODE..WAGE.BTC&BKUPGEN., 00243101 // DISP=SHR, 00243302 // VOLUME=(,RETAIN,REF=*.STEP0110.SORTIN), 00243502 // LABEL=(2,SL) 00243602 //SORTOUT DD DSN=DOESTAX.&EXTNODE..WAGE.BTC(+1), 00243701 //* DISP=(OLD,KEEP,KEEP), 00243809 // DISP=(,CATLG,DELETE), 00247009 // SPACE=(25600,(100,300),RLSE), 00248004 // DCB=(SYS3.MODEL,RECFM=FB,LRECL=128,BLKSIZE=25600) 00249000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00249100 //********************************************************************* 00249200 //STEP0130 EXEC PGM=SORT, RESTORE SUBMITTER FILE 00249303 // COND=(0,LT) 00249400 //SYSOUT DD SYSOUT=* 00249500 //SORTIN DD DSN=DOESTAX.&EXTNODE..&BCKNODE..FTP.BX210&BKUPGEN., 00249602 // DISP=SHR, 00249802 // VOLUME=(,RETAIN,REF=*.STEP0120.SORTIN), 00249902 // LABEL=(3,SL) 00250002 //SORTOUT DD DSN=DOESTAX.&EXTNODE..FTP.BX210(+1), 00250105 //* DISP=(OLD,KEEP,KEEP), 00250209 // DISP=(,CATLG,DELETE), 00250309 // SPACE=(2310,(200,200),RLSE), 00250404 // DCB=(SYS3.MODEL,RECFM=FB,LRECL=231,BLKSIZE=2310) 00280000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00290000 //********************************************************************* 00300000 //STEP0140 EXEC PGM=SORT, RESTORE EMPLOYER FILE 00310003 // COND=(0,LT) 00320000 //SYSOUT DD SYSOUT=* 00330000 //SORTIN DD DSN=DOESTAX.&EXTNODE..&BCKNODE..FTP.BX212&BKUPGEN., 00331002 // DISP=SHR, 00331104 // VOLUME=(,RETAIN,REF=*.STEP0130.SORTIN), 00332003 // LABEL=(4,SL) 00333004 //SORTOUT DD DSN=DOESTAX.&EXTNODE..FTP.BX212(+1), 00340005 //* DISP=(OLD,KEEP,KEEP), 00350009 // DISP=(,CATLG,DELETE), 00370009 // SPACE=(31800,(200,200),RLSE), 00380004 // DCB=(SYS3.MODEL,RECFM=FB,LRECL=106,BLKSIZE=31800) 00410000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00420000 //********************************************************************* 00430000 //STEP0150 EXEC PGM=SORT, RESTORE MESSAGES FILE 00431003 // COND=(0,LT) 00432000 //SYSOUT DD SYSOUT=* 00433000 //SORTIN DD DSN=DOESTAX.&EXTNODE..&BCKNODE..FTP.BX216&BKUPGEN., 00434103 // DISP=SHR, 00434204 // VOLUME=(,RETAIN,REF=*.STEP0140.SORTIN), 00435008 // LABEL=(5,SL) 00435103 //SORTOUT DD DSN=DOESTAX.&EXTNODE..FTP.BX216(+1), 00435205 //* DISP=(OLD,KEEP,KEEP), 00435409 // DISP=(,CATLG,DELETE), 00437009 // SPACE=(31800,(200,200),RLSE), 00438006 // DCB=(SYS3.MODEL,RECFM=FB,LRECL=318,BLKSIZE=31800) 00439300 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00439400 //********************************************************************* 00439500 //STEP0160 EXEC PGM=SORT, RESTORE R202 RECS 00440003 // COND=(0,LT) 00450000 //SYSOUT DD SYSOUT=* 00460000 //SORTIN DD DSN=DOESTAX.&EXTNODE..&BCKNODE..RPT.R202&BKUPGEN., 00461003 // DISP=SHR, 00461104 // VOLUME=(,RETAIN,REF=*.STEP0150.SORTIN), 00462008 // LABEL=(6,SL) 00463003 //SORTOUT DD DSN=DOESTAX.&EXTNODE..RPT.R202(+1), 00470005 //* DISP=(OLD,KEEP,KEEP), 00480009 // DISP=(,CATLG,DELETE), 00500009 // SPACE=(16394,(900,900),RLSE), 00510004 // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00540000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00550000 //****************************************************************** 01410000