318 lines
25 KiB
Plaintext
318 lines
25 KiB
Plaintext
//***** 00010000
|
|
//* UI TAX DAILY UPDATE. 00030000
|
|
//* 00040000
|
|
//* CHANGED REFERENCES TO DOESTAX.PROD.BD400.BTC TO 00041000
|
|
//* DOESTAX.PROD.BTC 00042000
|
|
//* 00043000
|
|
//* 09/03/1999 CHANGED NAME OF EMPTY BTC GENERATION OUTPUT 00044000
|
|
//* BY STEP0420 FROM *.BD400.BTC TO *.BTC. EHH 00045000
|
|
//* 00046000
|
|
//* 11/16/99 CHANGED FOR Y2K/390 ENV. ZL1 00047000
|
|
//* 04/05/2004 CHANGED DISP ON W4FILE IN STEP0700 FROM MOD 00048000
|
|
//* TO OLD FOR NEW WAGE UPDATE PROCESS GD 00049000
|
|
//* 00049100
|
|
//* 07/08/2008 ADDED CFO REFUND EXPEORT FILE ZL1 00049200
|
|
//* 10/04/2006 ADDED NEW STEP AFTER REPORTING (DTSBD525) ZL1 00049300
|
|
//* 05/11/2009 ADDED NEW STEP TO EMAIL ICESA (DTSBY202) ZL1 00049400
|
|
//* 05/15/2009 ADDED STEP TO INIT ALL EXT FILES(DTSBINIT) ZL1 00049500
|
|
//* 06/29/2009 ADDED STEP TO ARCHIVE REPORTS (DTSACHD1) ZL1 00049600
|
|
//* 11/18/2009 ADDED STEP TO MERGE W4FILES (STEP0790) ZL1 00049700
|
|
//* 09/20/2010 MOD STEPS 480 AND 990 TO INCLUDE FILES FROM 00049800
|
|
//* 09/20/2010 BX415 AND BX420 ZL1 00049900
|
|
//* 08/25/2011 COMMENT OUT 325 REPORT FILE ZL1 00050000
|
|
//* 11/15/2011 ADDED PROD DTSWGE07 - REMOVE DUP SSN ON W4FILE ZL1 00050100
|
|
//* 02/27/2012 ADDED X148 AND X153 FILES FOR WAGES & REPORTS ZL1 00050200
|
|
//* 08/08/2012 ADDED X440 AND X442 FILES FOR LAB TOP AUDITS ZL1 00050300
|
|
//* 00050400
|
|
//***** 00051000
|
|
//DTSUBVSM PROC LVLNODE='PROD', 00060000
|
|
// S0100='+1', 00090000
|
|
// S0200='+1', 00100000
|
|
// S0300='+1', 00110000
|
|
// S0410='+1', 00111000
|
|
// S0490='+1', 00120000
|
|
// S0500='+1', 00130000
|
|
// S0600='+1', 00140000
|
|
// S0700='+1', 00150000
|
|
// S0800='+1', 00160000
|
|
// S0910='+1' 00170000
|
|
//** 00171000
|
|
//** 00172000
|
|
//********************************************************************* 00180000
|
|
//STEP0100 EXEC PGM=DTSBD110, OLA SPLIT 00190000
|
|
// COND=(0,LT) 00200000
|
|
//SYSOUT DD SYSOUT=* 00220000
|
|
//SYSABOUT DD SYSOUT=* 00230000
|
|
//SYSUDUMP DD SYSOUT=* 00240000
|
|
//DTSFOLAI DD DSN=DOESTAX.&LVLNODE..VSAM.OLA,DISP=SHR, 00250000
|
|
// AMP=('BUFND=10') 00260000
|
|
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..BD110.TRN(+1), 00270000
|
|
// DISP=(,CATLG,DELETE), 00280000
|
|
// SPACE=(8192,(100,200),RLSE), 00310000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00320000
|
|
//DTSFVRO2 DD DSN=DOESTAX.&LVLNODE..BD110.RPT(+1), 00330000
|
|
// DISP=(,CATLG,DELETE), 00340000
|
|
// SPACE=(8192,(100,200),RLSE), 00370000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00380000
|
|
//DTSFBTCO DD DSN=DOESTAX.&LVLNODE..BD110.BTC(+1), 00390000
|
|
// DISP=(,CATLG,DELETE), 00400000
|
|
// SPACE=(8192,(100,200),RLSE), 00430000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00440000
|
|
//****************************************************************** 00450000
|
|
//STEP0200 EXEC PGM=DTSBD120, ITDS SCAN 00460000
|
|
// COND=(0,LT), 00470000
|
|
// PARM='05' 00490000
|
|
//SYSOUT DD SYSOUT=* 00500000
|
|
//SYSABOUT DD SYSOUT=* 00510000
|
|
//SYSUDUMP DD SYSOUT=* 00520000
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00530000
|
|
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..BD120.TRN(+1), 00540000
|
|
// DISP=(,CATLG,DELETE), 00550000
|
|
// SPACE=(8192,(100,200),RLSE), 00580000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00590000
|
|
//DTSFVRO2 DD DSN=DOESTAX.&LVLNODE..BD120.RPT(+1), 00600000
|
|
// DISP=(,CATLG,DELETE), 00610000
|
|
// SPACE=(8192,(100,200),RLSE), 00640000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00650000
|
|
//**********************************************************************00660000
|
|
//STEP0300 EXEC PGM=DTSBD130, PROCESS IMPORTS 00670000
|
|
// COND=(0,LT) FROM PC BASED SYSTEMS 00680000
|
|
//SYSOUT DD SYSOUT=* 00700000
|
|
//SYSABOUT DD SYSOUT=* 00710000
|
|
//SYSUDUMP DD SYSOUT=* 00720000
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00730000
|
|
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..BD130.TRN(+1), 00740000
|
|
// DISP=(,CATLG,DELETE), 00750000
|
|
// SPACE=(8192,(100,200),RLSE), 00780000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00790000
|
|
//DTSFVRO2 DD DSN=DOESTAX.&LVLNODE..BD130.RPT(+1), 00800000
|
|
// DISP=(,CATLG,DELETE), 00810000
|
|
// SPACE=(8192,(100,200),RLSE), 00840000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00850000
|
|
//DTSFBTCO DD DSN=DOESTAX.&LVLNODE..BD130.BTC(+1), 00860000
|
|
// DISP=(,CATLG,DELETE), 00870000
|
|
// SPACE=(8192,(100,200),RLSE), 00900000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00910000
|
|
//********************************************************************* 00920000
|
|
//STEP0410 EXEC PGM=IDCAMS, BACKUP BTC GENERATIONS FROM 00921000
|
|
// COND=(0,LT) DTSBD400 00922000
|
|
//SYSPRINT DD SYSOUT=* 00923000
|
|
//INDD01 DD DSN=DOESTAX.&LVLNODE..BTC,DISP=(OLD,DELETE,KEEP) 00923100
|
|
//OUTDD01 DD DSN=DOESTAX.&LVLNODE..BD400.BTC.BACKUP(+1), 00923200
|
|
// DISP=(,CATLG,DELETE), 00923300
|
|
// SPACE=(8192,(100,200),RLSE), 00923600
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00923700
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00924000
|
|
//****************************************************************** 00925000
|
|
//STEP0420 EXEC PGM=IDCAMS, INITIALIZE EMPTY BD400.BTC 00926000
|
|
// COND=(0,LT) GENERATION 00927000
|
|
//SYSPRINT DD SYSOUT=* 00928000
|
|
//INDD01 DD DUMMY 00929000
|
|
//OUTDD01 DD DSN=DOESTAX.&LVLNODE..BTC(+1), 00929100
|
|
// DISP=(,CATLG,DELETE), 00929200
|
|
// SPACE=(8192,(100,200),RLSE), 00929500
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00929600
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00929700
|
|
//****************************************************************** 00929800
|
|
//STEP0480 EXEC PGM=SORT,PARM='VLTEST=0', SORT BTC RECORDS 00930000
|
|
// COND=(0,LT) 00940000
|
|
//SYSOUT DD SYSOUT=* 00960000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..BX415.BTC,DISP=SHR 00970000
|
|
// DD DSN=DOESTAX.&LVLNODE..BX420.BTC,DISP=SHR 00970100
|
|
// DD DSN=DOESTAX.&LVLNODE..BX440.BTC,DISP=SHR 00970200
|
|
// DD DSN=DOESTAX.&LVLNODE..BX442.BTC,DISP=SHR 00970300
|
|
// DD DSN=DOESTAX.&LVLNODE..BD110.BTC(&S0100.),DISP=SHR 00971000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD130.BTC(&S0300.),DISP=SHR 00980000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD400.BTC.BACKUP(&S0410.), 00981000
|
|
// DISP=SHR 00982000
|
|
//SORTOUT DD DSN=&&SRTBTC, 00990000
|
|
// DISP=(,PASS,DELETE), 01000000
|
|
// UNIT=SYSDA, 01010000
|
|
// SPACE=(8192,(100,200),RLSE), 01020000
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 01030000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSRREC),DISP=SHR 01040000
|
|
//********************************************************************* 01050000
|
|
//STEP0490 EXEC PGM=DTSBD140, BTC RECORD PROCESSOR 01060000
|
|
// COND=(0,LT) 01070000
|
|
//SYSOUT DD SYSOUT=* 01090000
|
|
//SYSABOUT DD SYSOUT=* 01100000
|
|
//SYSUDUMP DD SYSOUT=* 01110000
|
|
//DTSFBTCI DD DSN=&&SRTBTC,DISP=(OLD,DELETE,DELETE) 01120000
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 01130000
|
|
//DTSFATC DD DSN=DOESTAX.&LVLNODE..VSAM.ATC,DISP=SHR, 01140000
|
|
// AMP=('BUFNI=5,BUFND=10') 01150000
|
|
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 01151000
|
|
// AMP=('BUFNI=5,BUFND=10') 01152000
|
|
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..BD140.TRN(+1), 01160000
|
|
// DISP=(,CATLG,DELETE), 01170000
|
|
// SPACE=(8192,(100,200),RLSE), 01200000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01210000
|
|
//DTSFVRO2 DD DSN=DOESTAX.&LVLNODE..BD140.RPT(+1), 01220000
|
|
// DISP=(,CATLG,DELETE), 01230000
|
|
// SPACE=(8192,(100,200),RLSE), 01260000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01270000
|
|
//**** 01270100
|
|
//DTSBX214 DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.BX214,DISP=SHR 01271000
|
|
//* DISP=(,CATLG,DELETE), 01272000
|
|
//* SPACE=(30000,(100,200),RLSE), 01273000
|
|
//* DCB=(RECFM=FB,LRECL=30,BLKSIZE=30000) 01274000
|
|
//****************************************************************** 01280000
|
|
//STEP0500 EXEC PGM=DTSBD150, PRE UPDATE ACCOUNTING 01290000
|
|
// COND=(0,LT) TRANSACTION COLLECTION 01300000
|
|
//SYSOUT DD SYSOUT=* 01320000
|
|
//SYSABOUT DD SYSOUT=* 01330000
|
|
//SYSUDUMP DD SYSOUT=* 01340000
|
|
//DTSFATC DD DSN=DOESTAX.&LVLNODE..VSAM.ATC,DISP=SHR, 01350000
|
|
// AMP=('BUFNI=5,BUFND=10') 01360000
|
|
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..BD150.TRN(+1), 01370000
|
|
// DISP=(,CATLG,DELETE), 01380000
|
|
// SPACE=(8192,(100,200),RLSE), 01410000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01420000
|
|
//DTSFVRO2 DD DSN=DOESTAX.&LVLNODE..BD150.RPT(+1), 01430000
|
|
// DISP=(,CATLG,DELETE), 01440000
|
|
// SPACE=(8192,(100,200),RLSE), 01470000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01480000
|
|
//****************************************************************** 01490000
|
|
//STEP0600 EXEC PGM=DTSBD200, TRANSACTION ACCUMULATION 01500000
|
|
// COND=(0,LT) AND SORT 01510000
|
|
//SYSOUT DD SYSOUT=* 01530000
|
|
//SYSABOUT DD SYSOUT=* 01540000
|
|
//SYSUDUMP DD SYSOUT=* 01550000
|
|
//DTSFVRI1 DD DSN=DOESTAX.&LVLNODE..BD110.TRN(&S0100.),DISP=SHR 01560000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD120.TRN(&S0200.),DISP=SHR 01570000
|
|
//** DD DSN=DOESTAX.&LVLNODE..BD130.TRN(&S0300.),DISP=SHR 01580000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD140.TRN(&S0490.),DISP=SHR 01590000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD150.TRN(&S0500.),DISP=SHR 01600000
|
|
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..BD200.TRN(+1), 01610000
|
|
// DISP=(,CATLG,DELETE), 01620000
|
|
// SPACE=(8192,(100,200),RLSE), 01650000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01660000
|
|
//SYSIN DD DUMMY 01661000
|
|
//****************************************************************** 01670000
|
|
//STEP0700 EXEC PGM=DTSBD300, EMPLOYER MASTER 01680000
|
|
// COND=(0,LT), UPDATE 01690000
|
|
// PARM='P,N,&BYPASS1.,&BYPASS2.,&BYPASS3.' 01711000
|
|
//SYSOUT DD SYSOUT=* 01720000
|
|
//SYSABOUT DD SYSOUT=* 01730000
|
|
//SYSUDUMP DD SYSOUT=* 01740000
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 01750000
|
|
//DTSFATC DD DSN=DOESTAX.&LVLNODE..VSAM.ATC,DISP=SHR, 01760000
|
|
// AMP=('BUFNI=5,BUFND=10') 01770000
|
|
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 01780000
|
|
// AMP=('BUFNI=5,BUFND=10') 01790000
|
|
//DTSFWTC DD DSN=DOESTAX.&LVLNODE..VSAM.WTC,DISP=SHR, 01791000
|
|
// AMP=('BUFNI=5,BUFND=10') 01792000
|
|
//DTSFWGH DD DSN=DOESTAX.&LVLNODE..VSAM.WGH,DISP=SHR, 01793000
|
|
// AMP=('BUFNI=5,BUFND=10') 01794000
|
|
//DTSFWTRN DD DSN=DOESTAX.&LVLNODE..DTS.W4FILE, 01795000
|
|
// DISP=(OLD,KEEP,KEEP), /* INITIALIZE FOR 01796100
|
|
// SPACE=(CYL,(20,5)), /* 1ST TIME USE 01797000
|
|
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) 01798000
|
|
//* 01798100
|
|
//** WAGE EXPORT TO SERVER 01798200
|
|
//DTSFW148 DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.X148, 01798300
|
|
//* DISP=(NEW,CATLG,CATLG), 01798400
|
|
// DISP=(OLD,KEEP,KEEP), 01798500
|
|
// SPACE=(CYL,(10,5)), 01798600
|
|
// DCB=(RECFM=FB,LRECL=134,BLKSIZE=13400) 01798700
|
|
//** WAGE EXPORT TO SERVER 01798800
|
|
//DTSFW153 DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.X153, 01798900
|
|
//* DISP=(NEW,CATLG,CATLG), 01799000
|
|
// DISP=(OLD,KEEP,KEEP), 01799100
|
|
// SPACE=(CYL,(10,5)), 01799200
|
|
// DCB=(RECFM=FB,LRECL=93,BLKSIZE=9300) 01799300
|
|
//** CFO REFUND EXPORT FILE 01799400
|
|
//DTSFX306 DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.X306, 01799500
|
|
//** DISP=(NEW,CATLG,CATLG), 01799600
|
|
// DISP=(OLD,KEEP,KEEP), 01799700
|
|
// UNIT=SYSDA, 01799800
|
|
// SPACE=(CYL,(5,5),RLSE), 01799900
|
|
// DCB=(RECFM=FB,LRECL=109,BLKSIZE=10900) 01800000
|
|
//* 01800100
|
|
//DTSFNAME DD DSN=DOESTAX.&LVLNODE..VSAM.WAGE.NAME,DISP=SHR, 01800200
|
|
// AMP=('BUFNI=5,BUFND=10') 01800300
|
|
//DTSFNAIC DD DSN=DOESTAX.&LVLNODE..VSAM.NAIC,DISP=SHR, 01801000
|
|
// AMP=('BUFNI=5,BUFND=10') 01810000
|
|
//DTSFSIC DD DSN=DOESTAX.&LVLNODE..VSAM.SIC,DISP=SHR, 01820000
|
|
// AMP=('BUFNI=5,BUFND=10') 01830000
|
|
//DTSFVRI1 DD DSN=DOESTAX.&LVLNODE..BD200.TRN(&S0600.),DISP=SHR 01840000
|
|
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..BD300.RPT(+1), 01850000
|
|
// DISP=(,CATLG,DELETE), 01860000
|
|
// SPACE=(8192,(100,200),RLSE), 01890000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 01900000
|
|
//****************************************************************** 01910000
|
|
//STEP0800 EXEC PGM=DTSBD180, POST ACCOUNTING UPDATE 01920000
|
|
// COND=(0,LT) ATC FILE SCAN 01930000
|
|
//SYSOUT DD SYSOUT=* 01950000
|
|
//SYSABOUT DD SYSOUT=* 01960000
|
|
//SYSUDUMP DD SYSOUT=* 01970000
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 01980000
|
|
//DTSFATC DD DSN=DOESTAX.&LVLNODE..VSAM.ATC,DISP=SHR, 01990000
|
|
// AMP=('BUFNI=5,BUFND=10') 02000000
|
|
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..BD180.RPT(+1), 02010000
|
|
// DISP=(,CATLG,DELETE), 02020000
|
|
// SPACE=(8192,(100,200),RLSE), 02050000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 02060000
|
|
//DTSFX217 DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.BX217, 02061000
|
|
// DISP=(OLD,KEEP,KEEP), 02062000
|
|
// UNIT=SYSDA, 02063000
|
|
// SPACE=(29600,(1000,1000),RLSE), 02064000
|
|
// DCB=(RECFM=FB,LRECL=148,BLKSIZE=29600) 02065000
|
|
//****************************************************************** 02070000
|
|
//STEP0910 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 02080000
|
|
// COND=(0,LT) 02090000
|
|
//SYSOUT DD SYSOUT=* 02110000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..BD110.RPT(&S0100.),DISP=SHR 02120000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD120.RPT(&S0200.),DISP=SHR 02130000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD130.RPT(&S0300.),DISP=SHR 02140000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD140.RPT(&S0490.),DISP=SHR 02150000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD150.RPT(&S0500.),DISP=SHR 02160000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD300.RPT(&S0700.),DISP=SHR 02170000
|
|
// DD DSN=DOESTAX.&LVLNODE..BD180.RPT(&S0800.),DISP=SHR 02180000
|
|
//* DD DSN=DOESTAX.&LVLNODE..BE325.RPT(+0),DISP=SHR 02181000
|
|
// DD DSN=DOESTAX.&LVLNODE..R309.RPT(+0),DISP=SHR 02182000
|
|
// DD DSN=DOESTAX.&LVLNODE..RPT.R202,DISP=SHR 02183000
|
|
// DD DSN=DOESTAX.&LVLNODE..BX420.RPT,DISP=SHR 02184000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..SRTDAILY.RPT(+1), 02190000
|
|
// DISP=(,CATLG,DELETE), 02200000
|
|
// SPACE=(8192,(100,200),RLSE), 02230000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 02240000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSRREC),DISP=SHR 02250000
|
|
//********************************************************************* 02260000
|
|
//STEP0930 EXEC PGM=IDCAMS, DELETE AND DEFINE OLA FILE 02260100
|
|
// COND=(0,LT) 02260200
|
|
//SYSPRINT DD SYSOUT=* 02260300
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDOLA),DISP=SHR 02260400
|
|
//****************************************************************** 02260500
|
|
//STEP0960 EXEC PGM=DTSBD998, INITIALIZE OLA FILE 02260600
|
|
// COND=(0,LT) 02260700
|
|
//SYSOUT DD SYSOUT=* 02260800
|
|
//SYSABOUT DD SYSOUT=* 02260900
|
|
//SYSABEND DD SYSOUT=* 02261000
|
|
//CAIMRPTS DD SYSOUT=* 02261100
|
|
//DTSFOLA DD DSN=DOESTAX.&LVLNODE..VSAM.OLA,DISP=SHR 02261200
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSIOLA),DISP=SHR 02261300
|
|
//****************************************************************** 02261400
|
|
//** 02261500
|
|
//STEP0970 EXEC PGM=IDCAMS, MERGE WEB AND ICESA W4FILES 02261600
|
|
// COND=(0,LT) 02261700
|
|
//SYSPRINT DD SYSOUT=* 02261800
|
|
//SYSOUT DD SYSOUT=* 02261900
|
|
//SYSABOUT DD SYSOUT=* 02262000
|
|
//SYSABEND DD SYSOUT=* 02262100
|
|
//CAIMRPTS DD SYSOUT=* 02262200
|
|
//INDD01 DD DSN=DOESTAX.&LVLNODE..MAG.W4FILE,DISP=SHR 02262300
|
|
//OUTDD01 DD DSN=DOESTAX.&LVLNODE..DTS.W4FILE,DISP=MOD 02262400
|
|
//**** 02262500
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 02262600
|
|
//**** 02262700
|
|
//** 02262800
|
|
//DTSDRPTS INCLUDE MEMBER=DTSD0A /* OUTPUT GENERATION 02262900
|
|
//** 02263000
|
|
//DTSBD525 INCLUDE MEMBER=DTSUD525 /* UPDATE MEVL RECORDS 02264000
|
|
//** 02264100
|
|
//DTSW4FIL INCLUDE MEMBER=DTSWGE07 /* REMOVE DUPS SSN FROM W4FILE 02265000
|
|
//**** 02544200
|
|
//*TSACHD1 INCLUDE MEMBER=DTSACHD1 /* ARCHIVE SELECTED REPORTS 02544300
|
|
//** 02544400
|