216 lines
17 KiB
Plaintext
216 lines
17 KiB
Plaintext
//***** 00010000
|
|
//* 00020000
|
|
//* UI TAX EXTERNAL FILES BACKUP 00030000
|
|
//* 00040000
|
|
//* 05/15/2009 CREATE BACKUP PROC ZL1 00043200
|
|
//* 00044000
|
|
//***** 00050000
|
|
//DTSBKEXT PROC BKUPGEN='(+1)', 00060000
|
|
// BCKNODE='BACKUP' 00060100
|
|
//* 00061000
|
|
//********************************************************************* 00100000
|
|
//STEP0110 EXEC PGM=SORT, CONV.BTC BACKUP 00240100
|
|
// COND=(0,LT) 00240200
|
|
//SYSOUT DD SYSOUT=* 00240300
|
|
//SORTIN DD DSN=DOESTAX.&EXTNODE..BTC,DISP=SHR 00240400
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..BTC&BKUPGEN., 00240600
|
|
// DISP=(,CATLG,DELETE), 00240700
|
|
// UNIT=CART, 00240800
|
|
// VOLUME=(,RETAIN), 00240900
|
|
// LABEL=(1,SL,,,EXPDT=99000), 00241000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8182) 00241100
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00241200
|
|
//********************************************************************* 00241300
|
|
//STEP0120 EXEC PGM=SORT, WAGE.BTC BACKUP 00241400
|
|
// COND=(0,LT) 00242000
|
|
//SYSOUT DD SYSOUT=* 00243000
|
|
//SORTIN DD DSN=DOESTAX.&EXTNODE..WAGE.BTC,DISP=SHR 00243100
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..WAGE.BTC&BKUPGEN., 00246000
|
|
// DISP=(,CATLG,DELETE), 00247000
|
|
// UNIT=CART, 00248000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0110.SORTOUT), 00248100
|
|
// LABEL=(2,SL,,,EXPDT=99000), 00248300
|
|
// 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, BACKUP SUBMITTER FILE 00249300
|
|
// COND=(0,LT) 00249400
|
|
//SYSOUT DD SYSOUT=* 00249500
|
|
//SORTIN DD DSN=DOESTAX.&FTPNODE..FTP.BX210,DISP=SHR 00249601
|
|
//SORTOUT DD DSN=DOESTAX.&FTPNODE..&BCKNODE..FTP.BX210&BKUPGEN., 00249801
|
|
// DISP=(,CATLG,DELETE), 00249900
|
|
// UNIT=CART, 00250000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0120.SORTOUT), 00260000
|
|
// LABEL=(3,SL,,,EXPDT=99000), 00271000
|
|
// 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, BACKUP EMPLOYER FILE 00310000
|
|
// COND=(0,LT) 00320000
|
|
//SYSOUT DD SYSOUT=* 00330000
|
|
//SORTIN DD DSN=DOESTAX.&EXTNODE..FTP.BX212,DISP=SHR 00340000
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..FTP.BX212&BKUPGEN., 00360000
|
|
// DISP=(,CATLG,DELETE), 00370000
|
|
// UNIT=CART, 00380000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0130.SORTOUT), 00390000
|
|
// LABEL=(4,SL,,,EXPDT=99000), 00401000
|
|
// 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, BACKUP MESSAGES FILE 00431000
|
|
// COND=(0,LT) 00432000
|
|
//SYSOUT DD SYSOUT=* 00433000
|
|
//SORTIN DD DSN=DOESTAX.&EXTNODE..FTP.BX216,DISP=SHR 00434000
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..FTP.BX216&BKUPGEN., 00436000
|
|
// DISP=(,CATLG,DELETE), 00437000
|
|
// UNIT=CART, 00438000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0140.SORTOUT), 00439000
|
|
// LABEL=(5,SL,,,EXPDT=99000), 00439200
|
|
// 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, BACKUP R202 RECS 01430000
|
|
// COND=(0,LT) 01440000
|
|
//SYSOUT DD SYSOUT=* 01450000
|
|
//SORTIN DD DSN=DOESTAX.&EXTNODE..RPT.R202,DISP=SHR 01460000
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..RPT.R202&BKUPGEN., 01470000
|
|
// DISP=(,CATLG,DELETE), 01480000
|
|
// UNIT=CART, 01490000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0150.SORTOUT), 01500000
|
|
// LABEL=(6,SL,,,EXPDT=99000), 01510000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01520000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01530000
|
|
//********************************************************************* 01531000
|
|
//STEP0170 EXEC PGM=SORT, EMPLOYER ON WEB DB 01540000
|
|
// COND=(0,LT) 01550000
|
|
//SYSOUT DD SYSOUT=* 01560000
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X101,DISP=SHR 01570000
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X101&BKUPGEN., 01580000
|
|
// DISP=(,CATLG,DELETE), 01590000
|
|
// UNIT=CART, 01600000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0160.SORTOUT), 01610000
|
|
// LABEL=(7,SL,,,EXPDT=99000), 01620000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01630000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01640000
|
|
//****************************************************************** 01650000
|
|
//STEP0180 EXEC PGM=SORT, REGISTRATION PROFILE 01660000
|
|
// COND=(0,LT) 01670000
|
|
//SYSOUT DD SYSOUT=* 01680000
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X102,DISP=SHR 01690000
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X102&BKUPGEN., 01700000
|
|
// DISP=(,CATLG,DELETE), 01710000
|
|
// UNIT=CART, 01720000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0170.SORTOUT), 01730000
|
|
// LABEL=(8,SL,,,EXPDT=99000), 01740000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01750000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01760000
|
|
//****************************************************************** 01770000
|
|
//STEP0190 EXEC PGM=SORT, REGISTRATION DETERMINATIONS 01780000
|
|
// COND=(0,LT) 01790000
|
|
//SYSOUT DD SYSOUT=* 01800000
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X104,DISP=SHR 01810000
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X104&BKUPGEN., 01820000
|
|
// DISP=(,CATLG,DELETE), 01830000
|
|
// UNIT=CART, 01840000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0180.SORTOUT), 01850000
|
|
// LABEL=(9,SL,,,EXPDT=99000), 01860000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01870000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01880000
|
|
//****************************************************************** 01881000
|
|
//STEP0200 EXEC PGM=SORT, REGISTRATION EMP NAME 01882000
|
|
// COND=(0,LT) 01883000
|
|
//SYSOUT DD SYSOUT=* 01884000
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X106,DISP=SHR 01885000
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X106&BKUPGEN., 01886000
|
|
// DISP=(,CATLG,DELETE), 01887000
|
|
// UNIT=CART, 01888000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0190.SORTOUT), 01889000
|
|
// LABEL=(10,SL,,,EXPDT=99000), 01889100
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01889200
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01889300
|
|
//****************************************************************** 01889400
|
|
//STEP0210 EXEC PGM=SORT, REGISTRATION RATES 01889500
|
|
// COND=(0,LT) 01889600
|
|
//SYSOUT DD SYSOUT=* 01889700
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X108,DISP=SHR 01889800
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X108&BKUPGEN., 01889900
|
|
// DISP=(,CATLG,DELETE), 01890000
|
|
// UNIT=CART, 01891000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0200.SORTOUT), 01892000
|
|
// LABEL=(11,SL,,,EXPDT=99000), 01893000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01894000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01895000
|
|
//****************************************************************** 01896000
|
|
//STEP0220 EXEC PGM=SORT, REGISTRATION EMP ADDRESS 01897000
|
|
// COND=(0,LT) 01898000
|
|
//SYSOUT DD SYSOUT=* 01899000
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X110,DISP=SHR 01899100
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X110&BKUPGEN., 01899200
|
|
// DISP=(,CATLG,DELETE), 01899300
|
|
// UNIT=CART, 01899400
|
|
// VOLUME=(,RETAIN,REF=*.STEP0210.SORTOUT), 01899500
|
|
// LABEL=(12,SL,,,EXPDT=99000), 01899600
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01899700
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01899800
|
|
//****************************************************************** 01899900
|
|
//STEP0230 EXEC PGM=SORT, REGISTRATION OPO 01900000
|
|
// COND=(0,LT) 01901000
|
|
//SYSOUT DD SYSOUT=* 01902000
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X120,DISP=SHR 01903000
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X120&BKUPGEN., 01904000
|
|
// DISP=(,CATLG,DELETE), 01905000
|
|
// UNIT=CART, 01906000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0220.SORTOUT), 01907000
|
|
// LABEL=(13,SL,,,EXPDT=99000), 01908000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01909000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01909100
|
|
//****************************************************************** 01909200
|
|
//STEP0240 EXEC PGM=SORT, REPORTS 01909300
|
|
// COND=(0,LT) 01909400
|
|
//SYSOUT DD SYSOUT=* 01909500
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X140,DISP=SHR 01909600
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X140&BKUPGEN., 01909700
|
|
// DISP=(,CATLG,DELETE), 01909800
|
|
// UNIT=CART, 01909900
|
|
// VOLUME=(,RETAIN,REF=*.STEP0230.SORTOUT), 01910000
|
|
// LABEL=(14,SL,,,EXPDT=99000), 01911000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01912000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01913000
|
|
//****************************************************************** 01914000
|
|
//STEP0250 EXEC PGM=SORT, WAGES 01915000
|
|
// COND=(0,LT) 01916000
|
|
//SYSOUT DD SYSOUT=* 01917000
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X144,DISP=SHR 01918000
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X144&BKUPGEN., 01919000
|
|
// DISP=(,CATLG,DELETE), 01919100
|
|
// UNIT=CART, 01919200
|
|
// VOLUME=(,RETAIN,REF=*.STEP0240.SORTOUT), 01919300
|
|
// LABEL=(15,SL,,,EXPDT=99000), 01919400
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01919500
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01919600
|
|
//****************************************************************** 01919700
|
|
//STEP0260 EXEC PGM=SORT, PAYMENTS 01919800
|
|
// COND=(0,LT) 01919900
|
|
//SYSOUT DD SYSOUT=* 01920000
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X145,DISP=SHR 01921000
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X145&BKUPGEN., 01922000
|
|
// DISP=(,CATLG,DELETE), 01923000
|
|
// UNIT=CART, 01924000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0250.SORTOUT), 01925000
|
|
// LABEL=(16,SL,,,EXPDT=99000), 01926000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01927000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01928000
|
|
//****************************************************************** 01929000
|
|
//STEP0270 EXEC PGM=SORT, BATCH HEADERS 01929100
|
|
// COND=(0,LT) 01929200
|
|
//SYSOUT DD SYSOUT=* 01929300
|
|
//SORTIN DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X149,DISP=SHR 01929400
|
|
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..X149&BKUPGEN., 01929500
|
|
// DISP=(,CATLG,DELETE), 01929600
|
|
// UNIT=CART, 01929700
|
|
// VOLUME=(,RETAIN,REF=*.STEP0260.SORTOUT), 01929800
|
|
// LABEL=(17,SL,,,EXPDT=99000), 01929900
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01930000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01931000
|
|
//****************************************************************** 01940000
|