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

96 lines
7.5 KiB
Plaintext

//***** 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