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

97 lines
7.6 KiB
Plaintext

//***** 00010000
//* 00020000
//* UI TAX CONV ONLY EXTERNAL FILES BACKUP 00030001
//* 00040000
//* 08/09/2012 CREATE BACKUP PROC ZL1 00043201
//* 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.&EXTNODE..FTP.BX210,DISP=SHR 00249600
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..FTP.BX210&BKUPGEN., 00249800
// 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
//********************************************************************* 01550001
//STEP0170 EXEC PGM=SORT, BACKUP AUDIT FILE 01560001
// COND=(0,LT) 01570001
//SYSOUT DD SYSOUT=* 01580001
//SORTIN DD DSN=ECNTSUP.DOESTAX.&EXTNODE..AUDIT.X144,DISP=SHR 01590001
//SORTOUT DD DSN=DOESTAX.&EXTNODE..&BCKNODE..AUDIT.X144&BKUPGEN., 01600001
// DISP=(,CATLG,DELETE), 01610001
// UNIT=CART, 01620001
// VOLUME=(,RETAIN,REF=*.STEP0160.SORTOUT), 01630001
// LABEL=(7,SL,,,EXPDT=99000), 01640001
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=256,BLKSIZE=25600) 01650001
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01660001
//********************************************************************* 01670001
//**********************END PROC - ZL1********************************* 01680001