404 lines
16 KiB
Plaintext
404 lines
16 KiB
Plaintext
//*****
|
|
//** ON REQ RPT GENERATION
|
|
//*****
|
|
//*DTSRQRPT PROC LDEST='U@PRT155',
|
|
//DTSRQRPT PROC LDEST='LOCAL',
|
|
// LVDHOLD='YES'
|
|
//**** /* GEN A DUMMY RECORD FOR THE LABELS FILE 00001702
|
|
//*DOESLBL1 EXEC PGM=IEBDG, 00001806
|
|
//* COND=(3,LT) 00001906
|
|
//*SYSPRINT DD SYSOUT=* 00002006
|
|
//*LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE), 00002106
|
|
//* UNIT=SYSDA, 00002206
|
|
//* SPACE=(TRK,1), 00002306
|
|
//* DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00002406
|
|
//*SYSIN DD DSN=DOESTAX.DEVL.PARMLIB(DTSLBL01), 00002506
|
|
//* DISP=SHR
|
|
//DOESLBL1 EXEC PGM=GENT350,
|
|
// COND=(4,LT)
|
|
//SYSOUT DD SYSOUT=*
|
|
//LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE),
|
|
// UNIT=SYSDA,
|
|
// SPACE=(TRK,1),
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00002606
|
|
//**** /* POPULATE THE LABELS WORK FILE 00003105
|
|
//DOESLBL2 EXEC PGM=IDCAMS, 00003206
|
|
// COND=(3,LT) 00003306
|
|
//SYSPRINT DD SYSOUT=* 00003405
|
|
//FILEIN DD DSN=TMP901, 00003505
|
|
// DISP=(OLD,DELETE,DELETE), 00003605
|
|
// UNIT=SYSDA 00003705
|
|
//DOESVRO1 DD DSN=&&LBL901, 00003805
|
|
// DISP=(NEW,PASS,DELETE), 00003905
|
|
// UNIT=SYSDA, 00004005
|
|
// SPACE=(8192,(1000,1000),RLSE), 00004105
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00004205
|
|
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSLBL02), 00004305
|
|
// DISP=SHR 00004405
|
|
//** 00004705
|
|
//STEP0100 EXEC PGM=DTSBD800, OUTPUT GENERATION
|
|
// COND=(3,LT)
|
|
//SYSOUT DD SYSOUT=*
|
|
//SYSABOUT DD SYSOUT=*
|
|
//SYSUDUMP DD SYSOUT=*
|
|
//**
|
|
//PARMIN DD DUMMY
|
|
//**
|
|
//ATLSTIN DD DUMMY
|
|
//**
|
|
//DTSFVRI1 DD DSN=&&SRTRPT,DISP=(OLD,DELETE,DELETE)
|
|
//**
|
|
//DOESVRO1 DD DSN=&&LBL901,DISP=(OLD,PASS,DELETE) 00100001
|
|
//** 00100100
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
|
|
//** 00100100
|
|
//DTSFREF DD DSN=DOESTAX.PROD.VSAM.REF,DISP=SHR,
|
|
// AMP=('BUFNI=5,BUFND=10')
|
|
//**
|
|
//** NEW/REACT/DEACTIVATED EMPLYRS
|
|
//RPT116R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** GENRC/DEMAND/'8 QTRS 0' INACTVATN LTR
|
|
//RPT117R1 DD SYSOUT=W,
|
|
// DEST=&LDEST.
|
|
//** '8 QTRS OF NONE' REPORT
|
|
//RPT119R1 DD SYSOUT=0,
|
|
// DEST=&LDEST.
|
|
//** POTENTIONALLY FICTITIOUS EMPLOYERS
|
|
//RPT120R1 DD SYSOUT=Z,COPIES=2,
|
|
// DEST=&LDEST.
|
|
//** LIABILITY DETERMINATION ACTIVITY LIST
|
|
//RPT122R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT122R2 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT122R3 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT122R4 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT122R5 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT122R6 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** EMPLYRS W/05/06/09/11 STATUS CODES
|
|
//RPT123R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** EMPLOYER ALPHA LIST
|
|
//RPT125R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** EMPLOYER FLD-REP-ID = '??' RPT
|
|
//RPT129R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** WEB REGISTRATION CYCLE A RPT
|
|
//RPT130R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** WEB REGISTRATION ERROR REPORT
|
|
//RPT140R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** ACCOUNT NUMBER CHANGED
|
|
//RPT204R1 DD SYSOUT=O,
|
|
// DEST=&LDEST.
|
|
//** TRIAL BAL RPT
|
|
//RPT305R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.,
|
|
// HOLD=&LVDHOLD.
|
|
//** ACCT SUMMARY RPT
|
|
//RPT306R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** EMPLR ACCT CREDIT BAL RPT
|
|
//RPT308R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** STATEMENT OF ACCT (CR-MEMO-SM)
|
|
//RPT309R1 DD SYSOUT=W,
|
|
// DEST=&LDEST.
|
|
//** STATEMENT OF ACCT (CR-MEMO-PC)
|
|
//RPT309R2 DD SYSOUT=I,
|
|
// DEST=&LDEST.
|
|
//** STATEMENT OF ACCT - -CTRL RPT
|
|
//RPT310R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** STATEMENT OF ACCT - -CREDIT RPT
|
|
//RPT315R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** QUARTERLY LATE PAYMENT NOTICE
|
|
//RPT320R1 DD SYSOUT=*
|
|
//RPT320R2 DD SYSOUT=*
|
|
//RPT320R3 DD SYSOUT=W,
|
|
// DEST=&LDEST.
|
|
//** QUARTERLY MISSING REPORT NOTICE
|
|
//RPT320R4 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** SI EMPLOYER ADMIN ASSESSMENT LETTER
|
|
//RPT325R1 DD SYSOUT=W,
|
|
// DEST=&LDEST.
|
|
//** SI EMPLOYER ADMIN ASSESSMENT RPT2
|
|
//RPT325R2 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** SI EMPLOYER ADMIN ASSESSMENT RPT3
|
|
//RPT325R3 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** SI EMPLOYER ADMIN ASSESSMENT RPT4
|
|
//RPT325R4 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** SI EMPLOYER ADMIN ASSESSMENT RPT5
|
|
//RPT325R5 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** STATEMENT OF ACCT - -CREDIT RPT
|
|
//RPT410R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** OPEN BANKRUPTCIES LIST
|
|
//RPT411R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** ESTIMATED REPORT LIST
|
|
//RPT412R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** NO ESTIMATED REPORT LIST
|
|
//RPT412R2 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** WRITE OFF CANDIDATES LIST
|
|
//RPT413R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** MONTHLY DEBIT MEMO
|
|
//RPT414R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT414R2 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT414R3 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT414R5 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** COMMA SEPARATED COPY OF FILE 2
|
|
//RPT414R4 DD DUMMY
|
|
//**
|
|
//** ALL EMPLOYERS RECEIVIG BILLS
|
|
//RPT414R6 DD DUMMY
|
|
//**
|
|
//** WRITE 416 REPORT
|
|
//RPT416R1 DD SYSOUT=O,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** DELIQUENT REPORT NOTICES (UC-8)
|
|
//RPT417R1 DD SYSOUT=W,
|
|
// DEST=&LDEST.
|
|
//** DELINQUERNT EMPLYR ACCT NBR LIST
|
|
//RPT418R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** FINAL NOTICE DELINQUENCY LIST
|
|
//** (NOW PRODUCED AS RPT422R2)
|
|
//RPT420R1 DD DUMMY
|
|
//**RPT420R1 DD SYSOUT=Z,
|
|
//** DEST=&LDEST.
|
|
//** FINAL DELINQUENCY NOTICE
|
|
//RPT421R1 DD SYSOUT=W,
|
|
// DEST=&LDEST.
|
|
//** FINAL DELINQUENCY REPORT LIST
|
|
//RPT422R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** FINAL DELINQUENCY REPORT LIST (2)
|
|
//RPT422R2 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** PRIOR DELINQUENT LIST - FLD REP/1 ENTRY
|
|
//RPT423R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** PRIOR DELINQUENT LIST - FLD REP/2 ENTRIES
|
|
//RPT423R2 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** PRIOR DELINQUENT LIST - FLD REP/3+ ENTRIES
|
|
//RPT423R3 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** COLLECTIONS SUMMARY RPT
|
|
//RPT426R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** TOTAL BAL DUE > $?? RPT
|
|
//RPT429R1 DD SYSOUT=Z,COPIES=2,
|
|
// DEST=&LDEST.
|
|
//** SECOND NOTICE FOR REIMBURSBLE EMPLYS
|
|
//RPT433R1 DD SYSOUT=W,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** REPORT OF SECOND NOTICE FOR VIEW DIR
|
|
//RPT433R2 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** OVER 120 DAYS DELINQUENCY LIST
|
|
//RPT435R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** EMPLOYERS AGING ACCOUNT RECEIVABLE REPORT
|
|
//RPT442R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** FIRST DELINQUENT ANNUAL SELF MAILER
|
|
//RPT451R1 DD SYSOUT=W,
|
|
// DEST=&LDEST.
|
|
//** FIRST DELINQUENT ANNUAL REPORT
|
|
//RPT452R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//RPT452R2 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** FINAL DELINQUENT ANNUAL SELF MAILER
|
|
//RPT453R1 DD SYSOUT=W,
|
|
// DEST=&LDEST.
|
|
//** FINAL DELINQUENT ANNUAL REPORT
|
|
//RPT454R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//RPT454R2 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** ESTIMATE RPT CANDIDATES LIST
|
|
//RPT461R1 DD SYSOUT=Z
|
|
//RPT461R3 DD SYSOUT=Z
|
|
//RPT461R2 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** ESTIMATE RPT CANDIDATES LIST
|
|
//RPT455R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//RPT455R2 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** EMPLYRS QUALIFIED FOR EFF PENALTY
|
|
//RPT518R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** EMPLYRS QUALIFIED FOR PENALTY RATE
|
|
//RPT519R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** AUDIT SELECTION CRITERIA
|
|
//RPT602R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** AUDIT CANDIDATES LIST
|
|
//RPT602R2 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** AUDIT CANDIDATES SELF MAILER
|
|
//RPT602R3 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** AUDIT FILE
|
|
//RPT602F3 DD DUMMY
|
|
//** ASSIGNMENT SUMMARY - FLD REP
|
|
//RPT606R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** ASSIGNMENT DETAIL - FLD REP
|
|
//RPT607R1 DD SYSOUT=I,
|
|
// DEST=&LDEST.
|
|
//** ASSIGNMENT MANAGEMENT RPTS
|
|
//RPT609R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** ASSIGNMENT MANAGEMENT RPTS
|
|
//RPT609R2 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** ACT EMPLYRS BY ZIPCODE CNTS
|
|
//RPT611R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//****CBDATA DD DUMMY
|
|
//****CBDATA DD DSN=DOES.CICS.FIN730.CBDATA.EX100102,DISP=SHR
|
|
//** AUDIT ASSGNMNTS W/NO AUDIT RESULTS
|
|
//RPT612R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** FEILD ASSIGNMENT - DELINQUENCY
|
|
//RPT615R1 DD SYSOUT=0
|
|
//** SUCCESSFUL FUTA CERTIFICATIONS
|
|
//RPT704R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** FAILED FUTA CERTIFICATIONS
|
|
//RPT705R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** POTENTIAL NON-FEDERAL FILERS
|
|
//RPT708R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** REQ. FOR FED-ID LETTER (MASS MAILING)
|
|
//RPT712R1 DD SYSOUT=W,
|
|
// DEST=&LDEST.
|
|
//** ETA-581 ELEMENT RECORDS (EXPORT)
|
|
//RPT713R1 DD DUMMY
|
|
//**
|
|
//** ETA-581 SPEC DEPT OF LABOR REPORT
|
|
//RPT713R2 DD SYSOUT=O,COPIES=2,
|
|
// DEST=&LDEST.
|
|
//**
|
|
//RPT715R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//**
|
|
//***** SEE PROC DTSTPRPT FOR TPS FILES
|
|
//** TPS EXPERIENCE RATING (EXPORT)
|
|
//**RPT723R1 IS IN DTSARRPT
|
|
//**
|
|
//** ACCTS AVAIL FOR PURGE LST
|
|
//RPT729R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** ACCTS AVAIL FOR PURGE LST
|
|
//RPT730R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** WAGE FILE/TAX FILE COMPARISON
|
|
//RPT737R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** ELECTRONIC FILER LIST
|
|
//RPT740R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** LIST OF NEW EMPLOYERS WITHIN RPT PERIOC.
|
|
//RPT763R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** CICS OP ID LIST
|
|
//RPT791R1 DD SYSOUT=Z,COPIES=3,
|
|
// DEST=&LDEST.
|
|
//** EMPLYRS W/A MISSING SIC
|
|
//RPT792R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** FUTA QTRLY FEIN CHANGES
|
|
//RPT793R1 DD SYSOUT=W,
|
|
// DEST=&LDEST.
|
|
//** FUTA QTRLY FEIN CHANGES
|
|
//RPT793R2 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** WAGE RPTS (UC-30 QTRLY)
|
|
//DTS902F1 DD DUMMY
|
|
//**
|
|
//** WAGE RPTS (UC-30 DAILY)
|
|
//*RPT902R1 DD DUMMY
|
|
//RPT902R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** ONLINE UPDT LOG PARMS (MUST BE HERE*)
|
|
//PARM906 DD DUMMY,DCB=BLKSIZE=80
|
|
//** ONLINE UPDATE LOG RPT
|
|
//RPT906R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//** UNUSUAL CONDITIONS ENCOUNTERED REPORT
|
|
//RPT907R1 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** UNUSUAL CONDITIONS ENCOUNTERED REPORT
|
|
//RPT907R2 DD SYSOUT=Z,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** UC-30 CNTS RPTN
|
|
//RPT908R1 DD SYSOUT=Z,
|
|
// DEST=&LDEST.
|
|
//RPT909R1 DD SYSOUT=W,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT909R2 DD SYSOUT=W,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT909R3 DD SYSOUT=W,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT909R4 DD SYSOUT=W,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT909R5 DD SYSOUT=W,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//RPT909R6 DD SYSOUT=W,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** WAGE RPTS (UC-30H YRLY)
|
|
//DTS910F1 DD DUMMY
|
|
//**
|
|
//** WAGE RPTS (UC-30H DAILY)
|
|
//RPT910R1 DD DUMMY
|
|
//** CONTROL REPORT SUMMARY
|
|
//RPT980R1 DD SYSOUT=Q,HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//** EXPORT CONTROL REPORTS
|
|
//RPT991R1 DD SYSOUT=Q,COPIES=2,
|
|
// DEST=&LDEST.
|
|
//****
|
|
//DOESLBLP EXEC PGM=DOESLABL, /* PRINT DOES LABELS 00131001
|
|
// COND=(0,LT), 00140000
|
|
// REGION=4096K 00150000
|
|
//DOESVRI1 DD DSN=&&LBL901, 00150101
|
|
// DISP=(OLD,DELETE,DELETE) 00150201
|
|
//SYSOUT DD SYSOUT=* 00151000
|
|
//SYSABOUT DD SYSOUT=* 00152000
|
|
//SYSABEND DD SYSOUT=* 00153000
|
|
//CAIMRPTS DD SYSOUT=* 00154000
|
|
//DOESLBL1 DD SYSOUT=(C), 00155101
|
|
// FCB=P104, 00155201
|
|
// DEST=&LDEST., 00155302
|
|
// HOLD=&LVDHOLD. 00155403
|
|
//** 00157001
|
|
//**
|