//ECNT800Z JOB (UI,4300,3400,T),'CHGBD100',CLASS=A,MSGCLASS=X, 00000199 // NOTIFY=ECNTZL1,REGION=0M 00000299 //* 00000499 // SET LVLNODE='DEVL' 00000599 // SET MSTNODE='PROD' 00000699 // SET LVDHOLD='YES' /* VIEW DIRECT JOBS // SET LDEST='LOCAL' // SET PGMNODE='DEVL' 00000799 //PROCLIB JCLLIB ORDER=ECNTZL1.DOESTAX.DEVL.PROCS.BATCH.LIB 00001399 //*ROCLIB JCLLIB ORDER=DOESTAX.PROD.PROCS.BATCH.LIB 00001399 //* 00001400 //*OADLIBS INCLUDE MEMBER=DTSIZLIB 00001599 //*OADLIBS INCLUDE MEMBER=DTSIRLIB 00001599 //LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001599 //*OADLIBS INCLUDE MEMBER=DTSIPJLB 00001599 //* 00001600 //**** GENERATE A DUMMY RECORD FOR THE LABELS FILE 00001799 //* 00004499 //********************************************************************* 00004549 //STEP0100 EXEC PGM=SORT, 00004600 // COND=(0,LT) 00004700 //SYSOUT DD SYSOUT=* 00004800 //SORTIN DD DSN=DOESTAX.PROD.SRTDAILY.RPT.DD080925,DISP=SHR 00005099 //*ORTIN DD DSN=DOESTAX.PROD.SRTMONTH.RPT(-2),DISP=SHR 00005099 //*ORTIN DD DSN=DOESTAX.PROD.SRTDAILY.RPT(-6),DISP=SHR 00005099 //*ORTIN DD DSN=DOESTAX.TEST.SI414TPS.Q22023,DISP=SHR 00005099 //*ORTIN DD DSN=DOESTAX.PROD.BE320.RPT(+0),DISP=SHR 00005099 //*ORTIN DD DSN=DOESTAX.PROD.BE417.RPT(+0),DISP=SHR 00005099 //*ORTIN DD DSN=DOESTAX.PROD.BE417.RPT.G0038V00,DISP=SHR 00005099 //*ORTIN DD DSN=DOESTAX.PROD.CHG.BD220.RPT.QTR082,DISP=SHR 00005099 //*ORTIN DD DSN=DOESTAX.PROD.PER.RPT(-1),DISP=SHR 00005099 //*ORTIN DD DSN=DOESTAX.DEVL.PER.RPT(-1),DISP=SHR //*ORTIN DD DSN=DOESTAX.DEVL.PER.RPT.G7699V00,DISP=SHR //*ORTIN DD DSN=DOESTAX.DEVL.RATE518.RPT.AN2019,DISP=SHR //*ORTIN DD DSN=DOESTAX.TEST.FUTA704.RPT.CY2022,DISP=SHR //* 00006399 //SORTOUT DD DSN=&&SRTRPT, 00006899 // DISP=(,PASS,DELETE), 00006999 // UNIT=SYSDA, 00007099 // SPACE=(8192,(1000,1000),RLSE), 00007199 // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00007299 //SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSSRREC),DISP=SHR 00007399 //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(150,10),RLSE) 00007499 //SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(150,10),RLSE) 00008099 //SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(150,10),RLSE) 00009099 //SORTWK04 DD UNIT=SYSDA,SPACE=(CYL,(150,10),RLSE) 00010099 //SORTWK05 DD UNIT=SYSDA,SPACE=(CYL,(150,10),RLSE) 00011099 //* 00018000 //STEP0200 EXEC PGM=DTSBD800, OUTPUT GENERATION 00018100 //** TIME=(0,20), 00018299 // COND=(0,LT) 00018300 //SYSOUT DD SYSOUT=* 00018400 //SYSABOUT DD SYSOUT=* 00018500 //SYSUDUMP DD SYSOUT=* 00018600 //*BD800,INC,102,103,105,108,109.112.115.117.127.319 00018799 //PARMIN DD * 00018899 DTSBD800,INC,503 00019199 /* 00019599 //** 00019699 //ATLSTIN DD * 00020000 DTSBD800, 00030000 /* 00031000 //** 117 W CLASS 00040099 //DTSFVRI1 DD DSN=&&SRTRPT,DISP=(OLD,DELETE,DELETE) 00050099 //**** NEED FOR 604 ONLY***** 00051099 //** 00060000 //DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00070099 //DTSFREF DD DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR, 00071099 // AMP=('BUFNI=5,BUFND=10') 00080000 //DTSFWGH DD DSN=DOESTAX.&MSTNODE..VSAM.WGH,DISP=SHR, 00071099 // AMP=('BUFNI=5,BUFND=10') 00080000 //DTSFNAME DD DSN=DOESTAX.&MSTNODE..VSAM.WAGE.NAME,DISP=SHR, 00071099 // AMP=('BUFNI=5,BUFND=10') 00080000 //* 00090099 //*DOESVRO1 DD DSN=&&LABELS,DISP=(OLD,PASS,DELETE) 00100099 //* 00100199 //RPT503R1 DD SYSOUT=X 00100299 //RPT503R2 DD SYSOUT=X 00100299 //RPT325R1 DD SYSOUT=X 00100299 //RPT405R1 DD SYSOUT=* 00100299 //RPT405R2 DD SYSOUT=* 00100299 //RPT412R1 DD SYSOUT=* 00100299 //RPT412R2 DD SYSOUT=* 00100299 //RPT412R3 DD SYSOUT=* 00100299 //RPT530R1 DD SYSOUT=* 00100299 //RPT909R8 DD SYSOUT=* 00100299 //RPT909R9 DD SYSOUT=* 00100299 //RPT907R1 DD SYSOUT=* 00100299 //RPT907R2 DD SYSOUT=* 00100299 //RPT316R1 DD SYSOUT=* 00100299 //RPT316R2 DD SYSOUT=* 00100299 //RPT439R1 DD SYSOUT=* 00100299 //RPT439R2 DD SYSOUT=* 00100299 //RPT320R1 DD SYSOUT=* 00100299 //RPT320R2 DD SYSOUT=* 00100299 //RPT320R3 DD SYSOUT=* 00100299 //RPT320R4 DD SYSOUT=* 00100299 //RPT321R1 DD SYSOUT=* 00100299 //RPT321R2 DD SYSOUT=* 00100299 //RPT321R3 DD SYSOUT=* 00100299 //RPT321R4 DD SYSOUT=* 00100299 //RPT332R1 DD SYSOUT=* 00100299 //RPT332R2 DD SYSOUT=* 00100299 //RPT332R3 DD SYSOUT=* 00100299 //RPT305R1 DD SYSOUT=* 00100299 //RPT305R2 DD SYSOUT=* 00100299 //RPT305R3 DD SYSOUT=* 00100299 //RPT306R1 DD SYSOUT=* 00100299 //RPT306R2 DD SYSOUT=* 00100299 //RPT306R3 DD SYSOUT=* 00100299 //RPT713R1 DD SYSOUT=* 00100299 //RPT713R2 DD SYSOUT=* 00100299 //RPT704R1 DD SYSOUT=* 00100299 //RPT704R2 DD SYSOUT=* 00100299 //RPT705R1 DD SYSOUT=* 00100299 //RPT705R2 DD SYSOUT=* 00100299 //RPT102R1 DD SYSOUT=* 00100299 //RPT102R2 DD SYSOUT=* 00100399 //RPT102R3 DD SYSOUT=* 00100499 //RPT108R1 DD SYSOUT=* 00100299 //RPT108R2 DD SYSOUT=* 00100399 //RPT108R3 DD SYSOUT=* 00100499 //RPC110R1 DD SYSOUT=* 00100699 //RPC110R2 DD SYSOUT=* 00100799 //RPT131R1 DD SYSOUT=* 00100699 //RPT131R2 DD SYSOUT=* 00100799 //RPT119R1 DD SYSOUT=* 00100699 //RPT319R1 DD SYSOUT=* 00100699 //RPT319R2 DD SYSOUT=* 00100799 //RPT316R1 DD SYSOUT=* 00100699 //RPT316R2 DD SYSOUT=* 00100799 //RPT112R1 DD SYSOUT=* 00100699 //RPT112R2 DD SYSOUT=* 00100799 //RPT115R1 DD SYSOUT=* 00100699 //RPT115R2 DD SYSOUT=* 00100799 //RPT117R1 DD SYSOUT=* 00100899 //RPT117R2 DD SYSOUT=* 00100899 //RPT403R1 DD SYSOUT=* 00100899 //RPT403R2 DD SYSOUT=* 00100899 //RPT405R1 DD SYSOUT=* 00100899 //RPT405R2 DD SYSOUT=* 00100899 //RPT461R1 DD SYSOUT=* 00100899 //RPT461R2 DD SYSOUT=* 00100899 //RPT461R3 DD SYSOUT=* 00100899 //RPT451R1 DD SYSOUT=* 00100899 //RPT451R2 DD SYSOUT=* 00100899 //RPT417R1 DD SYSOUT=* 00100899 //RPT417R2 DD SYSOUT=* 00100899 //RPT452R1 DD SYSOUT=* 00100899 //RPT452R2 DD SYSOUT=* 00100899 //RPT455R1 DD SYSOUT=* 00100899 //RPT455R2 DD SYSOUT=* 00100899 //RPC120R1 DD SYSOUT=* 00100899 //RPC130R1 DD SYSOUT=* 00100999 //RPT602R1 DD SYSOUT=* 00100999 //RPT602R2 DD SYSOUT=* 00100999 //RPT602R3 DD SYSOUT=* 00100999 //RPT604R1 DD SYSOUT=* 00100999 //RPT604R2 DD SYSOUT=* 00100999 //RPT615R1 DD SYSOUT=* 00100999 //RPT602F3 DD DUMMY 00100999 //RPT726R1 DD SYSOUT=* 00100899 //RPT726R2 DD SYSOUT=* 00100999 //RPT909R1 DD SYSOUT=* 00100899 //RPT909R2 DD SYSOUT=* 00100999 //RPT909R3 DD SYSOUT=* 00100999 //RPT909R4 DD SYSOUT=* 00100999 //RPT909R5 DD SYSOUT=* 00100999 //RPT909R6 DD SYSOUT=* 00100999 //RPT980R1 DD SYSOUT=* 00100999 // // //RPT309R1 DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=134,BLKSIZE=134) 00100999 //RPT309R2 DD SYSOUT=* 00100999 //RPT319R1 DD SYSOUT=* 00100999 //RPT319R2 DD SYSOUT=* 00100999 //** ADMIN ASSESSMENT BILL //RPT325R1 DD SYSOUT=W,HOLD=&LVDHOLD., // DEST=&LDEST. //** //RPT403R1 DD SYSOUT=* 00100999 //RPT403R2 DD SYSOUT=* 00100999 //RPT405R1 DD SYSOUT=* 00100999 //RPT405R2 DD SYSOUT=* 00100999 //RPT405R3 DD SYSOUT=* 00100999 //RPT451R1 DD SYSOUT=* 00100999 //RPT451R2 DD SYSOUT=* 00100999 //RPT414R1 DD SYSOUT=* 00100999 //RPT412R2 DD SYSOUT=* 00100999 //RPT412R1 DD SYSOUT=* 00100999 //RPT414R2 DD SYSOUT=* 00100999 //RPT421R1 DD SYSOUT=* 00100999 //RPT421R2 DD SYSOUT=* 00100999 //RPT301R1 DD DSN=DOESTAX.DEVL.REPORT.R301,DISP=SHR 00100999 //RPT302R1 DD DSN=DOESTAX.DEVL.REPORT.R302,DISP=SHR 00100999 //RPT414R3 DD SYSOUT=* 00100999 //**T414R4 DD DSN=DOESTAX.DEVL.R414.EXCL.RPT2,DISP=SHR 00100999 //RPT414R4 DD SYSOUT=* 00100999 //RPT414R5 DD SYSOUT=* 00100999 //RPT414R6 DD SYSOUT=* 00100999 //RPT415R1 DD SYSOUT=* 00100999 //RPT415R2 DD SYSOUT=* 00100999 //RPT433R1 DD SYSOUT=I //RPT433R2 DD SYSOUT=* 00100999 //RPT506R1 DD SYSOUT=* 00100999 //*PT506R1 DD DSN=DOESTAX.&LVLNODE..RPT506R1.EXP, //** DISP=(NEW,CATLG,CATLG), //* DISP=(OLD,KEEP,KEEP), //* UNIT=SYSDA, //* SPACE=(CYL,(10,5),RLSE), //* DCB=(RECFM=FB,LRECL=134,BLKSIZE=26800) //* //RPT506R2 DD SYSOUT=* 00100999 //RPT507R1 DD SYSOUT=* 00100999 //*PT507R1 DD DSN=DOESTAX.&LVLNODE..RPT507R1.EXP, //** DISP=(NEW,CATLG,CATLG), //* DISP=(OLD,KEEP,KEEP), //* UNIT=SYSDA, //* SPACE=(CYL,(10,5),RLSE), //* DCB=(RECFM=FB,LRECL=134,BLKSIZE=26800) //* //RPT507R2 DD SYSOUT=* 00100999 //RPT515R1 DD SYSOUT=* 00100999 //RPT515R1 DD DSN=DOESTAX.&LVLNODE..RPT515R1.EXP, //* DISP=(NEW,CATLG,CATLG), // DISP=(OLD,KEEP,KEEP), // UNIT=SYSDA, // SPACE=(CYL,(10,5),RLSE), // DCB=(RECFM=FB,LRECL=134,BLKSIZE=26800) //* //RPT515R2 DD SYSOUT=* 00100999 //RPT515R3 DD SYSOUT=* 00100999 //** ETA204 REPORT //*PT517R1 DD SYSOUT=* //* DEST=&LDEST., //* HOLD=&LVDHOLD //RPT517R1 DD DSN=DOESTAX.&LVLNODE..RPT517R1.EXP, //** DISP=(NEW,CATLG,CATLG), // DISP=(OLD,KEEP,KEEP), // UNIT=SYSDA, // SPACE=(CYL,(10,5),RLSE), // DCB=(RECFM=FB,LRECL=134,BLKSIZE=26800) //* //RPT517R2 DD SYSOUT=* 00100999 //RPT520R1 DD DSN=DOESTAX.&LVLNODE..RPT520R1.EXP, //** DISP=(NEW,CATLG,CATLG), // DISP=(OLD,KEEP,KEEP), // UNIT=SYSDA, // SPACE=(CYL,(10,5),RLSE), // DCB=(RECFM=FB,LRECL=134,BLKSIZE=26800) //* //*RPT521R1 DD SYSOUT=* 00100999 //*PT521R1 DD DSN=DOESTAX.&LVLNODE..RPT521R1.EXP, //** DISP=(NEW,CATLG,CATLG), //*** DISP=(MOD,KEEP,KEEP), //* DISP=(OLD,KEEP,KEEP), //* UNIT=SYSDA, //* SPACE=(CYL,(10,5),RLSE), //* DCB=(RECFM=FB,LRECL=134,BLKSIZE=26800) //* //*PT521R2 DD SYSOUT=* 00100999 //RPT503R1 DD SYSOUT=* 00100999 //RPT503R2 DD SYSOUT=* 00100999 //RPT522R1 DD DSN=DOESTAX.&LVLNODE..RPT522R1.EXP, //** DISP=(NEW,CATLG,CATLG), // DISP=(OLD,KEEP,KEEP), // UNIT=SYSDA, // SPACE=(CYL,(10,5),RLSE), // DCB=(RECFM=FB,LRECL=134,BLKSIZE=26800) //* //RPT516R1 DD SYSOUT=* 00100999 //RPT516R2 DD SYSOUT=* 00100999 //RPT416R1 DD SYSOUT=* 00100999 //RPT416R2 DD SYSOUT=* 00100999 //RPT316R1 DD SYSOUT=* 00100999 //RPT316R2 DD SYSOUT=* 00100999 //RPT417R1 DD SYSOUT=* 00100999 //RPT417R2 DD SYSOUT=* 00100999 //RPT325R5 DD SYSOUT=* 00100999 //RPT325R4 DD SYSOUT=* 00100999 //RPT325R3 DD SYSOUT=* 00100999 //RPT325R2 DD SYSOUT=* 00100999 //** ETA-581 SPEC DEPT OF LABOR REPORT //RPT713R2 DD SYSOUT=O,COPIES=8 //** DEST=&LDEST. //RPT434R2 DD SYSOUT=* 00100999 //RPT434R1 DD SYSOUT=* 00100999 //RPT901R1 DD SYSOUT=* 00100999 //RPT901R2 DD SYSOUT=* 00100999 //RPT910R3 DD SYSOUT=* 00100999 //RPT910R2 DD SYSOUT=* 00100999 //RPT910R1 DD SYSOUT=* 00100999 //RTS910F1 DD DUMMY 00100999 //RST316R1 DD DSN=DOESTAX.DEVL.ESTQ062,DISP=SHR 00100999 //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(150,10),RLSE) 00007499 //SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(150,10),RLSE) 00008099 //REPORTF1 DD DSN=&&REPORTF1, // DISP=(,PASS,DELETE), // UNIT=SYSDA, // SPACE=(18000,(100,100),RLSE), // DCB=(RECFM=FB,LRECL=18,BLKSIZE=18000) //RPT604R1 DD SYSOUT=* 00100999 //RPT711R1 DD SYSOUT=* 00100999 //RPT608R1 DD SYSOUT=* 00100999 //RPT606R1 DD SYSOUT=* 00100999 //RPT606R2 DD SYSOUT=* 00100999 //RPT902R1 DD SYSOUT=* 00100999 //RPT902R2 DD SYSOUT=* 00100999 //RTS902F1 DD SYSOUT=* 00100999 //RTS902F2 DD SYSOUT=* 00100999 //RTP902F1 DD SYSOUT=* 00100999 //RPT903R1 DD SYSOUT=* 00100999 //RPT903R2 DD SYSOUT=* 00101099 //RPT907R1 DD SYSOUT=* 00100999 //RPT907R2 DD SYSOUT=* 00101099 //RPC150R1 DD SYSOUT=* 00101199 //RPC160R1 DD SYSOUT=* 00101299 //RPT908R1 DD SYSOUT=* 00106799 //*************************************************************** 00106899 //PRINTER DD SYSOUT=* 00110599 //** CONTROL REPORT SUMMARY 00110699 //RPT980R1 DD SYSOUT=Q,COPIES=2, 00110799 // HOLD=YES, 00110899 // DEST=U@PRT65 00110999 //** 00111000 //* 00120099 //STEP0500 EXEC PGM=DOESLABL, PRINT DOES LABELS 00131099 // COND=(0,LT), 00140099 // REGION=4096K 00150099 //SYSOUT DD SYSOUT=* 00151099 //SYSABOUT DD SYSOUT=* 00152099 //SYSABEND DD SYSOUT=* 00153099 //CAIMRPTS DD SYSOUT=* 00154099 //DOESLBL1 DD SYSOUT=* 00155299 //DOESVRI1 DD DSN=&&LABELS,DISP=(OLD,DELETE,DELETE) 00156199 // 00157099