//***** 00010000 //* UI TAX ARCHIVE REPORTING 00030001 //* HANDLE BD800 RPT ONLY 00041000 //**** /* GEN A DUMMY RECORD FOR THE LABELS FILE 00212000 //DOESLBL1 EXEC PGM=IEBDG, 00213000 // COND=(0,LT) 00213100 //SYSPRINT DD SYSOUT=* 00214000 //LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE), 00215000 // UNIT=SYSDA, 00216000 // SPACE=(TRK,1), 00217000 // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00218000 //SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSLBL01), 00219007 // DISP=SHR 00219100 //**** /* POPULATE THE LABELS WORK FILE 00219200 //DOESLBL2 EXEC PGM=IDCAMS, 00219300 // COND=(0,LT) 00219400 //SYSPRINT DD SYSOUT=* 00219500 //FILEIN DD DSN=&&TMP901, 00219600 // DISP=(OLD,DELETE,DELETE), 00219700 // UNIT=SYSDA 00219800 //DOESVRO1 DD DSN=&&LBL901, 00219900 // DISP=(NEW,PASS,DELETE), 00220000 // UNIT=SYSDA, 00220100 // SPACE=(8192,(1000,1000),RLSE), 00221000 // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00222000 //SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSLBL02), 00223007 // DISP=SHR 00224000 //** 00225000 //STEP0990 EXEC PGM=DTSBD800, OUTPUT GENERATION 02270000 // COND=(0,LT) 02280000 //SYSOUT DD SYSOUT=* 02300000 //SYSABOUT DD SYSOUT=* 02310000 //SYSUDUMP DD SYSOUT=* 02320000 //SYSPRINT DD SYSOUT=* 02321000 //** 02330000 //DTSFVRI1 DD DSN=&&RPTOUT, 02340118 //*TSFVRI1 DD DSN=DOESTAX.DEVL.REPORTS, 02340218 // DISP=(OLD,PASS,DELETE), 02340318 //* DISP=SHR, 02340418 // UNIT=SYSDA, 02340515 // SPACE=(8192,(1000,1000),RLSE), 02340615 // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 02340715 //** 02341000 //DOESVRO1 DD DSN=&&LBL901,DISP=(OLD,PASS,DELETE) 02342000 //** 02350000 //DTSFMSTR INCLUDE MEMBER=DTSIMSTR 02351000 //* 02352000 //DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 02360000 // AMP=('BUFNI=5,BUFND=10') 02370000 //** 02381000 //PARMIN DD DUMMY 02390000 //** 02400000 //ATLSTIN DD DUMMY 02410000 //** GEN. 1ST LETTER, REG. CYCLE A 02420000 //RPT102R1 DD SYSOUT=I,HOLD=YES, 02430002 // DEST=&LDEST. 02440000 //** GEN. 2ND LETTER, REG. CYCLE A 02450000 //RPT103R1 DD SYSOUT=I,HOLD=YES, 02460004 // DEST=&LDEST. 02470000 //** LTR TO OUT-OF-STATE AGENCY 02480000 //RPT105R1 DD SYSOUT=I,HOLD=YES, 02490004 // DEST=&LDEST. 02500000 //** NOT LIABLE LTR 02510000 //RPT108R1 DD SYSOUT=I,HOLD=YES, 02511005 // DEST=&LDEST. 02521000 //** MISSING CONTRIB & WAGE RPTS 02522000 //RPT109R1 DD SYSOUT=I,HOLD=YES, 02523005 // DEST=&LDEST. 02524000 //** HOUSEHOLD - ANNUAL VERS. 02524100 //RPT109R2 DD SYSOUT=I,HOLD=YES, 02524205 // DEST=&LDEST. 02524300 //** NOTICE OF SUBJECTIVETY 02525000 //RPT112R1 DD SYSOUT=I,HOLD=YES, 02526005 // DEST=&LDEST. 02527000 //** HOUSEHOLD - ANNUAL VERS. 02527100 //RPT112R2 DD SYSOUT=I,HOLD=YES, 02527205 // DEST=&LDEST. 02527300 //** WELCOME LETTER 02528000 //RPT115R1 DD SYSOUT=I,HOLD=YES, 02529005 // DEST=&LDEST. 02529100 //** NEW/REACT/ACTIVATED EMPLYRS 02529200 //RPT116R1 DD SYSOUT=*, 02529300 // DEST=&LDEST. 02529400 //** (FOR FUTURE USE) 02529500 //RPT116R2 DD SYSOUT=Z, 02529600 // DEST=&LDEST. 02529700 //** GEN INACT LTR 02529800 //RPT117R1 DD SYSOUT=W,HOLD=YES, 02529906 // DEST=&LDEST. 02530000 //** REPORT INACTVATN LTR 02530100 //RPT117R2 DD SYSOUT=I, 02530206 // DEST=&LDEST., 02530300 // HOLD=&LVDHOLD. 02530400 //** '8 QTRS NONE' CANCELLATION LTR 02530500 //RPT117R3 DD SYSOUT=I,HOLD=YES, 02530605 // DEST=&LDEST. 02530700 //** FR-500 EMPLYR REG. 02530800 //RPT127R1 DD SYSOUT=I,HOLD=YES, 02530905 // DEST=&LDEST. 02531000 //RPT128R1 DD SYSOUT=I, 02531100 // DEST=&LDEST., 02531200 // HOLD=&LVDHOLD. 02531300 //** WEB REGISTRATIONS 02531400 //RPT128R2 DD SYSOUT=I, 02531500 // DEST=&LDEST., 02531600 // HOLD=&LVDHOLD. 02531700 //** WEB REGISTRATIONS 02531800 //RPT128R3 DD SYSOUT=I, 02531900 // DEST=&LDEST., 02532000 // HOLD=&LVDHOLD. 02532100 //** WEB REGISTRATIONS 02532200 //RPT128R4 DD SYSOUT=I, 02532300 // DEST=&LDEST., 02532400 // HOLD=&LVDHOLD. 02532500 //** HOUSEHOLD REQUESTS 02532600 //RPT131R1 DD SYSOUT=I,HOLD=YES, 02532705 // DEST=&LDEST. 02532800 //** HOUSEHOLD CONFIRMATIONS 02532900 //RPT131R2 DD SYSOUT=W,HOLD=YES, 02533006 // DEST=&LDEST. 02533100 //** ICESA DEPOSIT TRANSMITTAL EMAIL REPORT 02533200 //RPT202R1 DD DSN=DOESTAX.&LVLNODE..R202.ICESA,DISP=SHR 02533400 //** 02534100 //** ACCOUNT NUMBER CHANGED 02534200 //RPT204R1 DD SYSOUT=O,HOLD=&LVDHOLD., 02534300 // DEST=&LDEST. 02534400 //** BATCH CONTROL SUMMARY 02534500 //RPT301R1 DD SYSOUT=*, 02534600 // DEST=&LDEST. 02534700 //** ACCT DTL RPT (GL) 02534800 //RPT302R1 DD SYSOUT=*, 02534900 // DEST=&LDEST. 02535000 //** REVENUE REFUND VOUCHER 02535100 //RPT303R1 DD SYSOUT=O,HOLD=&LVDHOLD., 02535200 // DEST=&LDEST. 02535300 //** LETTER FOR 303R1 (309R1 FORM) 02535400 //RPT303R2 DD SYSOUT=I,HOLD=YES, 02535505 // DEST=&LDEST. 02535600 //** 02535700 //** 02536500 //** STATEMENT OF ACCT (CREDIT MEMO-SM) 02536600 //** (DAILY - NORMALLY A CICS DIRECT PRINT) 02536700 //RPT309R1 DD SYSOUT=W,HOLD=YES, 02536806 // DEST=&LDEST. 02536900 //** STATEMENT OF ACCT (CREDIT MEMO-PC) 02537000 //RPT309R2 DD SYSOUT=X,HOLD=YES, 02537106 // DEST=&LDEST. 02537200 //** STATEMENT OF ACCT (CONTROL RPT) 02537300 //RPT310R1 DD SYSOUT=Z, 02537400 // DEST=&LDEST. 02537500 //** ESTIMATED REPORT LETTER 02537600 //RPT316R1 DD SYSOUT=W,HOLD=YES, 02537706 // DEST=&LDEST. 02537800 //** TAXABLE WAGE ERROR LETTER 02537900 //RPT317R1 DD SYSOUT=W, 02538006 // DEST=&LDEST., 02538100 // HOLD=YES 02538205 //** ELECTRONIC PAYMENT LISTING 1 02538300 //RPT318R1 DD SYSOUT=O, 02538400 // DEST=&LDEST., 02538500 // HOLD=&LVDHOLD. 02538600 //** ELECTRONIC PAYMENT LISTING 2 02538700 //RPT318R2 DD SYSOUT=O, 02538800 // DEST=&LDEST., 02538900 // HOLD=&LVDHOLD. 02539000 //** DAILY RETURNED CHECKS 02539100 //RPT319R1 DD SYSOUT=W, 02539206 // DEST=&LDEST., 02539300 // HOLD=YES 02539405 //** DAILY DEBIT REPORT 02539500 //RPT319R2 DD SYSOUT=Z, 02539600 // DEST=&LDEST., 02539700 // HOLD=&LVDHOLD. 02539800 //** DAILY ADMIN ASSESS BILLS 02539900 //RPT325R1 DD SYSOUT=W, 02540006 // DEST=&LDEST., 02540100 // HOLD=YES 02540205 //** DAILY ADMIN ASSESS ALL WAGES 02540300 //RPT325R2 DD SYSOUT=Z, 02540400 // DEST=&LDEST., 02540500 // HOLD=&LVDHOLD. 02540600 //** DAILY ADMIN ASSESS TOLERATED 02540700 //RPT325R3 DD SYSOUT=Z, 02540800 // DEST=&LDEST., 02540900 // HOLD=&LVDHOLD. 02541000 //** DAILY ADMIN ASSESS NOT TOLERATED 02541100 //RPT325R4 DD SYSOUT=Z, 02541200 // DEST=&LDEST., 02541300 // HOLD=&LVDHOLD. 02541400 //** DAILY ADMIN ASSESS NO WAGES 02541500 //RPT325R5 DD SYSOUT=Z, 02541600 // DEST=&LDEST., 02541700 // HOLD=&LVDHOLD. 02541800 //** LIEN FORMS (& R3?) 02541900 //RPT403R1 DD SYSOUT=I,HOLD=YES, 02542005 // DEST=&LDEST. 02542100 //** LICENSE LIEN LTR 02542200 //** (NO LONGER PRODUCED IN THIS FORM 991025) 02542300 //RPT403R2 DD SYSOUT=*,DEST=LOCAL,HOLD=YES 02542400 //**RPT403R2 DD SYSOUT=I, 02542500 //** DEST=&LDEST. 02542600 //** LIEN PKG PRTED CONTROL RPT 02542700 //RPT404R1 DD SYSOUT=*, 02542800 // DEST=&LDEST. 02542900 //** STATEMENT OF ACCT (DEBIT MEMO-SM) 02543000 //** (DAILY - NORMALLY A CICS DIRECT PRINT) 02543100 //RPT414R1 DD SYSOUT=W,HOLD=YES, 02543206 // DEST=&LDEST. 02543300 //** STATEMENT OF ACCT (PAGE 2) 02543400 //RPT414R2 DD SYSOUT=W,HOLD=&LVDHOLD., 02543506 // DEST=&LDEST. 02543600 //** COPY FOR DEPT. 02543700 //** (NO LONGER PRODUCED IN THIS FORM 991125) 02543800 //RPT414R3 DD SYSOUT=*,DEST=LOCAL,HOLD=YES 02543900 //RPT414R4 DD SYSOUT=*,DEST=LOCAL,HOLD=YES 02544011 //RPT414R5 DD SYSOUT=*,DEST=LOCAL,HOLD=YES 02544113 //RPT414R6 DD SYSOUT=*,DEST=LOCAL,HOLD=YES 02544213 //**RPT414R3 DD SYSOUT=I, 02544313 //** DEST=&LDEST. 02544413 //** STATEMENT OF ACCT- OVERNIGHT 02544513 //** (DAILY - NORMALLY A CICS DIRECT PRINT) 02544613 //RPT415R1 DD SYSOUT=W, 02544713 // DEST=&LDEST., 02544813 // HOLD=YES 02544913 //** STATEMENT OF ACCT (CONTROL RPT) 02545013 //RPT416R1 DD SYSOUT=Z, 02545113 // DEST=&LDEST., 02545213 // HOLD=&LVDHOLD. 02545313 //** FIRST DELINQUENCY 02545413 //RPT417R1 DD SYSOUT=W,HOLD=YES, 02545513 // DEST=&LDEST. 02545613 //** FINAL DELINQUENCY 02545713 //RPT421R1 DD SYSOUT=W,HOLD=YES, 02545813 // DEST=&LDEST. 02545913 //** MISSING RPTS ESTB LST (FCO) 02546013 //** ACCTS REC AUDIT TRAIL RPT 02546113 //** INCR IN TOTAL BAL DUE 02546213 //RPT424R1 DD SYSOUT=*, 02546313 // DEST=&LDEST. 02546413 //** MISSING RPTS ESTB LST (FCO) 02546513 //RPT425R1 DD SYSOUT=*, 02546613 // DEST=&LDEST. 02546713 //** ACCTS REC AUDIT TRAIL RPT 02546813 //RPT432R1 DD SYSOUT=*, 02546913 // DEST=&LDEST. 02547013 //** SI SECOND NOTICE 02547113 //RPT433R1 DD SYSOUT=W,HOLD=YES, 02547213 // DEST=&LDEST. 02547313 //** SI SECOND NOTICE 02547413 //RPT433R2 DD SYSOUT=W,HOLD=YES, 02547513 // DEST=&LDEST. 02547613 //** DEFERRED PAYMENT CONTRACT 02547713 //RPT434R1 DD SYSOUT=I,HOLD=YES, 02547813 // DEST=&LDEST. 02547913 //** RATE DISCREPANCY LST 02548013 //RPT436R1 DD SYSOUT=W,HOLD=&LVDHOLD., 02548113 // DEST=&LDEST. 02548213 //** RATE DISCREPANCY LST 02548313 //RPT502R1 DD SYSOUT=*, 02548413 // DEST=&LDEST. 02548513 //** RATE NOTICES (632) 02548613 //RPT503R1 DD SYSOUT=W,HOLD=YES, 02548713 // DEST=&LDEST. 02548813 //** RATE NOTICES (632A) 02548913 //RPT503R2 DD SYSOUT=W,HOLD=&LVDHOLD., 02549013 // DEST=&LDEST. 02549113 //** FLD ASSGN RPT - TAX DATA 02549213 //RPT603R1 DD SYSOUT=*, 02549313 // HOLD=&LVDHOLD., 02549413 // DEST=&LDEST. 02549513 //** FLD ASSGN RPT - TAX DATA - TEXT 02549613 //*RPT603R1 DD DSN=DOESTAX.&LVLNODE..R603.EXP, 02549713 //* DISP=(NEW,CATLG,CATLG), 02549813 //* DISP=(OLD,KEEP,KEEP), 02549913 //* UNIT=SYSDA, 02550013 //* SPACE=(CYL,(10,5),RLSE), 02550113 //* DCB=(RECFM=FB,LRECL=134,BLKSIZE=26800) 02550213 //** 02550313 //** FLD ASSGN RPT - WAGE DATA 02550413 //RPT604R1 DD SYSOUT=*, 02550513 // HOLD=&LVDHOLD., 02550613 // DEST=&LDEST. 02550713 //** FLD ASSGN RPT - WAGE DATA - TEXT 02550813 //*RPT604R1 DD DSN=DOESTAX.&LVLNODE..R604.EXP, 02550913 //** DISP=(NEW,CATLG,CATLG), 02551013 //* DISP=(OLD,KEEP,KEEP), 02551113 //* UNIT=SYSDA, 02551213 //* SPACE=(CYL,(10,5),RLSE), 02551313 //* DCB=(RECFM=FB,LRECL=134,BLKSIZE=26800) 02551413 //** 02551513 //*EWG960F1 DD DSN=UI.PROD.DOCS.EWG960F1,DISP=SHR 02551613 //DTSFWGH DD DSN=DOESTAX.&MSTNODE..VSAM.WGH,DISP=SHR 02551713 //DTSFNAME DD DSN=DOESTAX.&MSTNODE..VSAM.WAGE.NAME,DISP=SHR 02551813 //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(20,20),RLSE) 02551913 //SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(20,20),RLSE) 02552013 //** 02552113 //REPORTF1 DD DSN=&&REPORTF1, 02552213 // DISP=(,PASS,DELETE), 02552313 // UNIT=SYSDA, 02552413 // SPACE=(18000,(100,100),RLSE), 02552513 // DCB=(RECFM=FB,LRECL=18,BLKSIZE=18000) 02552613 //** 02552713 //** AUDIT SURVEY CARDS 02552813 //RPT608R1 DD SYSOUT=W,HOLD=&LVDHOLD., 02552913 // DEST=&LDEST. 02553013 //** AUDIT NOTIFICATION LETTER 02553114 //RPT615R1 DD SYSOUT=I, 02553214 // DEST=&LDEST., 02553314 // HOLD=&LVDHOLD. 02553414 //** FUTA CERTIFICATION 02553513 //RPT711R1 DD SYSOUT=I, 02553613 // DEST=&LDEST., 02553713 // HOLD=&LVDHOLD. 02553813 //** REQ FOR FEIN LETTER 02553913 //** (DISTINCT FROM RPT903R1) 02554013 //RPT712R1 DD SYSOUT=W,HOLD=YES, 02554113 // DEST=&LDEST. 02554213 //** TICKLER TRIG OVERDUE LST 02554313 //** TRIG DTE<=(CURRDTE-#PARMDAYS) 02554413 //RPT724R1 DD SYSOUT=*, 02554513 // DEST=&LDEST. 02554613 //** LMI MISSING EMPLOYEE LTR 02554713 //RPT726R1 DD SYSOUT=W,HOLD=&LVDHOLD., 02554813 // DEST=&LDEST. 02554913 //** EMPLOYER WAGE REQUEST 02555013 //RPT751R1 DD SYSOUT=X,HOLD=&LVDHOLD., 02555113 // DEST=&LDEST. 02555213 //** /* NO LONGER PRODUCED THIS WAY (05/17/01) 02555313 //** /* EXTRACT & PRINT LABELS (8-LINE) 02555413 //**RPT901R1 DD SYSOUT=(C,,6662),FCB=P663, 02555513 //** DEST=&LDEST. 02555613 //** WAGE RPTS (UC-30/FORM 30) DAILY 02555713 //RPT902R1 DD SYSOUT=I,HOLD=YES, 02555813 // DEST=&LDEST. 02555913 //** SUR TAX (UC-30/FORM 30) DAILY 02556013 //RPT902R2 DD SYSOUT=I,HOLD=YES, 02556113 // DEST=&LDEST. 02556213 //** 02556313 //DTS902F1 DD DUMMY 02556413 //** REQ FOR FED ID (UC-643) 02556513 //RPT903R1 DD SYSOUT=W,HOLD=YES, 02556613 // DEST=&LDEST. 02556713 //** DAILY UPDATE CONTROL REPORT 02556813 //RPT904R1 DD SYSOUT=Q,HOLD=&LVDHOLD., 02556913 // DEST=&LDEST. 02557013 //** ONLINE RECOVERY/RESTART REPORT 02557113 //RPT905R1 DD SYSOUT=Q,HOLD=&LVDHOLD., 02557213 // DEST=&LDEST. 02557313 //** ONLINE UPDT LOG PARMS (MUST BE HERE*) 02557413 //PARM906 DD DUMMY,DCB=BLKSIZE=80 02557513 //** ONLINE UPDT LOG RPT 02557613 //** (DAILY -NORMALLY AN 'ON REQ' RPT 02557713 //RPT906R1 DD SYSOUT=Q,HOLD=&LVDHOLD., 02557813 // DEST=&LDEST. 02557913 //** UNUSUAL CONDITIONS ENCOUNTERED REPORT 02558013 //RPT907R1 DD SYSOUT=Q,HOLD=&LVDHOLD., 02558113 // DEST=&LDEST. 02558213 //** UNUSUAL CONDITIONS ENCOUNTERED REPORT 02558313 //RPT907R2 DD SYSOUT=Q,HOLD=&LVDHOLD., 02558413 // DEST=&LDEST. 02558513 //** WAGE RPTS (UC-30H/HOUSEHOLD) YRLY 02558613 //DTS910F1 DD DUMMY 02558713 //** UC-30 NOTICES - HOUSEHOLD DAILY 02558813 //RPT910R1 DD SYSOUT=I,HOLD=YES, 02558913 // DEST=&LDEST. 02559013 //** UC-30 NOTICES - HOUSEHOLD DAILY AFTER 2006 02559113 //RPT910R2 DD SYSOUT=I,HOLD=YES, 02559213 // DEST=&LDEST. 02559313 //** CONTROL REPORT SUMMARY 02559413 //RPT980R1 DD SYSOUT=Q,COPIES=2, 02559513 // DEST=&LDEST. 02559613 //** EXPORT CONTROL REPORTS 02559713 //RPT991R1 DD SYSOUT=Q, 02559813 // DEST=&LDEST. 02559913 //** 02560013 //DOESLBLP EXEC PGM=DOESLABL, /* PRINT DOES LABELS 02560113 // COND=(0,LT), 02560213 // REGION=4096K 02560313 //DOESVRI1 DD DSN=&&LBL901, 02560413 // DISP=(OLD,DELETE,DELETE) 02560513 //SYSOUT DD SYSOUT=* 02560613 //SYSABOUT DD SYSOUT=* 02560713 //SYSABEND DD SYSOUT=* 02560813 //CAIMRPTS DD SYSOUT=* 02560913 //DOESLBL1 DD SYSOUT=(C),FCB=P104, 02561013 // DEST=&LDEST. 02562000 //** 02570000