418 lines
33 KiB
Plaintext
418 lines
33 KiB
Plaintext
//***** 00010000
|
|
//* UI TAX DAILY UPDATE. 00020000
|
|
//* HANDLE BD800 RPT ONLY 00030000
|
|
//***** 00030100
|
|
//* UPDATED PROC FOR TRMS IMPLEMENTATION ON 8/16/12 ZL1 00031000
|
|
//* FOR REPORT TO GO INTO TRMS CHANGE CLASS TO O 00032000
|
|
//***** 00033000
|
|
//**** /* GEN A DUMMY RECORD FOR THE LABELS FILE 00040000
|
|
//DOESLBL1 EXEC PGM=IEBDG, 00050000
|
|
// COND=(0,LT) 00060000
|
|
//SYSPRINT DD SYSOUT=* 00070000
|
|
//LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE), 00080000
|
|
// UNIT=SYSDA, 00090000
|
|
// SPACE=(TRK,1), 00100000
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00110000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSLBL01), 00120000
|
|
// DISP=SHR 00130000
|
|
//**** /* POPULATE THE LABELS WORK FILE 00140000
|
|
//DOESLBL2 EXEC PGM=IDCAMS, 00150000
|
|
// COND=(0,LT) 00160000
|
|
//SYSPRINT DD SYSOUT=* 00170000
|
|
//FILEIN DD DSN=&&TMP901, 00180000
|
|
// DISP=(OLD,DELETE,DELETE), 00190000
|
|
// UNIT=SYSDA 00200000
|
|
//DOESVRO1 DD DSN=&&LBL901, 00210000
|
|
// DISP=(NEW,PASS,DELETE), 00220000
|
|
// UNIT=SYSDA, 00230000
|
|
// SPACE=(8192,(1000,1000),RLSE), 00240000
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00250000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSLBL02), 00260000
|
|
// DISP=SHR 00270000
|
|
//** 00280000
|
|
//STEP0990 EXEC PGM=DTSBD800, OUTPUT GENERATION 00290000
|
|
// COND=(0,LT) 00300000
|
|
//SYSOUT DD SYSOUT=* 00310000
|
|
//SYSABOUT DD SYSOUT=* 00320000
|
|
//SYSUDUMP DD SYSOUT=* 00330000
|
|
//SYSPRINT DD SYSOUT=* 00340000
|
|
//** 00350000
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00360000
|
|
//** 00370000
|
|
//DTSFVRI1 DD DSN=DOESTAX.&LVLNODE..SRTDAILY.RPT(&S0910.),DISP=SHR 00380000
|
|
//** 00390000
|
|
//DOESVRO1 DD DSN=&&LBL901,DISP=(OLD,PASS,DELETE) 00400000
|
|
//** 00410000
|
|
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00420000
|
|
// AMP=('BUFNI=5,BUFND=10') 00430000
|
|
//** 00440000
|
|
//PARMIN DD DUMMY 00450000
|
|
//** 00460000
|
|
//ATLSTIN DD DUMMY 00470000
|
|
//** GEN. 1ST LETTER, REG. CYCLE A 00480000
|
|
//RPT102R1 DD SYSOUT=I, 00490000
|
|
// DEST=&LDEST., 00500000
|
|
// HOLD=&LVDHOLD. 00501001
|
|
//** GEN. 2ND LETTER, REG. CYCLE A 00510000
|
|
//RPT103R1 DD SYSOUT=I, 00520000
|
|
// DEST=&LDEST., 00530000
|
|
// HOLD=&LVDHOLD. 00531001
|
|
//** LTR TO OUT-OF-STATE AGENCY 00540000
|
|
//RPT105R1 DD SYSOUT=I, 00550000
|
|
// DEST=&LDEST., 00560000
|
|
// HOLD=&LVDHOLD. 00561001
|
|
//** NOT LIABLE LTR 00570000
|
|
//RPT108R1 DD SYSOUT=W, 00580000
|
|
// HOLD=&PRTHOLD., 00581000
|
|
// DEST=U@PRT155 00590000
|
|
//** MISSING CONTRIB & WAGE RPTS 00600000
|
|
//RPT109R1 DD SYSOUT=I, 00610000
|
|
// DEST=&LDEST., 00620000
|
|
// HOLD=&LVDHOLD. 00621001
|
|
//** HOUSEHOLD - ANNUAL VERS. 00630000
|
|
//RPT109R2 DD SYSOUT=I, 00640000
|
|
// DEST=&LDEST., 00650000
|
|
// HOLD=&LVDHOLD. 00651001
|
|
//** NOTICE OF SUBJECTIVETY 00660000
|
|
//RPT112R1 DD SYSOUT=I, 00670000
|
|
// DEST=&LDEST., 00680000
|
|
// HOLD=&LVDHOLD. 00681001
|
|
//** HOUSEHOLD - ANNUAL VERS. 00690000
|
|
//RPT112R2 DD SYSOUT=I, 00700000
|
|
// DEST=&LDEST., 00710000
|
|
// HOLD=&LVDHOLD. 00711001
|
|
//** WELCOME LETTER 00720000
|
|
//RPT115R1 DD SYSOUT=I, 00730000
|
|
// DEST=&LDEST., 00740000
|
|
// HOLD=&LVDHOLD. 00741001
|
|
//** NEW/REACT/ACTIVATED EMPLYRS 00750000
|
|
//RPT116R1 DD SYSOUT=0 00760000
|
|
//** (FOR FUTURE USE) 00780000
|
|
//RPT116R2 DD SYSOUT=Z, 00790000
|
|
// DEST=&LDEST, 00800000
|
|
// HOLD=&LVDHOLD. 00801001
|
|
//** GEN INACT LTR 00810000
|
|
//RPT117R1 DD SYSOUT=W, 00820000
|
|
// HOLD=&PRTHOLD., 00821000
|
|
// DEST=U@PRT155 00830000
|
|
//** '8 QTRS NONE' CANCELLATION LTR 00840000
|
|
//RPT117R2 DD SYSOUT=I, 00850000
|
|
// HOLD=&LVDHOLD., 00851001
|
|
// DEST=&LDEST. 00860000
|
|
//** '8 QTRS NONE' CANCELLATION LTR 00870000
|
|
//RPT117R3 DD SYSOUT=I, 00880000
|
|
// HOLD=&LVDHOLD., 00881001
|
|
// DEST=&LDEST. 00890000
|
|
//** FR-500 EMPLYR REG. 00900000
|
|
//RPT127R1 DD SYSOUT=I, 00910000
|
|
// HOLD=&LVDHOLD., 00911001
|
|
// DEST=&LDEST. 00920000
|
|
//** (FOR FUTURE USE) 00921000
|
|
//RPT128R1 DD SYSOUT=Z, 00922000
|
|
// DEST=&LDEST, 00923000
|
|
// HOLD=&LVDHOLD. 00924001
|
|
//** (FOR FUTURE USE) 00925000
|
|
//RPT128R2 DD SYSOUT=Z, 00926000
|
|
// DEST=&LDEST, 00927000
|
|
// HOLD=&LVDHOLD. 00928001
|
|
//** (FOR FUTURE USE) 00929000
|
|
//RPT128R3 DD SYSOUT=Z, 00929100
|
|
// DEST=&LDEST, 00929200
|
|
// HOLD=&LVDHOLD. 00929301
|
|
//** (FOR FUTURE USE) 00929400
|
|
//RPT128R4 DD SYSOUT=Z, 00929500
|
|
// DEST=&LDEST, 00929600
|
|
// HOLD=&PRTHOLD. 00929700
|
|
//** HOUSEHOLD REQUESTS 00930000
|
|
//RPT131R1 DD SYSOUT=I, 00940000
|
|
// HOLD=&LVDHOLD., 00941001
|
|
// DEST=&LDEST. 00950000
|
|
//** HOUSEHOLD CONFIRMATIONS 00960000
|
|
//RPT131R2 DD SYSOUT=W, 00970000
|
|
// HOLD=&PRTHOLD., 00971000
|
|
// DEST=U@PRT155 00980000
|
|
//* 00980100
|
|
//** WEB REGISTRATION ERROR REPORT 00980200
|
|
//RPT140R1 DD SYSOUT=Z,HOLD=&LVDHOLD., 00980300
|
|
// DEST=LOCAL 00980400
|
|
//** 00980500
|
|
//** WEB REGISTRATION ERROR REPORT FOR DOWNLOAD 00980600
|
|
//RPT140R2 DD DSN=DOESTAX.&MSTNODE..WEBREG.ERR, 00980700
|
|
//** DISP=(,CATLG,CATLG), 00980800
|
|
// DISP=(OLD,KEEP,KEEP), 00980900
|
|
// UNIT=SYSDA, 00981000
|
|
// SPACE=(29400,(100,100),RLSE), 00981100
|
|
// DCB=(RECFM=FB,LRECL=98,BLKSIZE=29400) 00981200
|
|
//* 00981300
|
|
//** ICESA DEPOSIT TRANSMITTAL EMAIL REPORT 00981400
|
|
//RPT202R1 DD DSN=DOESTAX.&LVLNODE..R202.ICESA,DISP=SHR 00982000
|
|
//** DEPOSIT TRANSMITTAL FOR WEB 00983000
|
|
//DTSX202F DD DSN=DOESTAX.&LVLNODE..DEPOSIT.X202EXP, 00984000
|
|
// DISP=(OLD,KEEP,KEEP), 00985000
|
|
// UNIT=SYSDA, 00986000
|
|
// SPACE=(CYL,(10,5),RLSE), 00987000
|
|
// DCB=(RECFM=FB,LRECL=55,BLKSIZE=5500) 00988000
|
|
//** ACCOUNT NUMBER CHANGED 00990000
|
|
//RPT204R1 DD DSN=DOESTAX.PROD.RPT204,DISP=SHR 01000000
|
|
//** DEST=&LDEST. 01010000
|
|
//** BATCH CONTROL SUMMARY 01020000
|
|
//RPT301R1 DD SYSOUT=0 01030000
|
|
//** ACCT DTL RPT (GL) 01050000
|
|
//RPT302R1 DD SYSOUT=0 01060000
|
|
//** REVENUE REFUND VOUCHER 01080000
|
|
//RPT303R1 DD SYSOUT=O, 01090000
|
|
// HOLD=&LVDHOLD., 01091001
|
|
// DEST=&LDEST. 01100000
|
|
//** LETTER FOR 303R1 (309R1 FORM) 01110000
|
|
//RPT303R2 DD SYSOUT=0 01120000
|
|
//** CFO REFUND EXPORT FILE 01141000
|
|
//RPT303R3 DD DSN=DOESTAX.&LVLNODE..FTP.REFUND.X303EXP, 01142000
|
|
//* DISP=(NEW,CATLG,CATLG), 01143000
|
|
// DISP=(OLD,KEEP,KEEP), 01144000
|
|
// UNIT=SYSDA, 01145000
|
|
// SPACE=(CYL,(10,5),RLSE), 01146000
|
|
// DCB=(RECFM=FB,LRECL=750,BLKSIZE=7500) 01147000
|
|
//** 01148000
|
|
//** STATEMENT OF ACCT (CREDIT MEMO-SM) 01149000
|
|
//** (DAILY - NORMALLY A CICS DIRECT PRINT) 01150000
|
|
//RPT309R1 DD SYSOUT=W, 01160002
|
|
// HOLD=&PRTHOLD., 01161000
|
|
// DEST=&LDEST. 01170000
|
|
//** STATEMENT OF ACCT (CREDIT MEMO-PC) 01180000
|
|
//RPT309R2 DD SYSOUT=*, 01190000
|
|
// HOLD=&PRTHOLD., 01191000
|
|
// DEST=&LDEST. 01200000
|
|
//** ESTIMATED REPORT LETTER 01210000
|
|
//RPT316R1 DD SYSOUT=W, 01220000
|
|
// HOLD=&PRTHOLD., 01221000
|
|
// DEST=U@PRT155 01230000
|
|
//** TAXABLE WAGE ERROR LETTER 01240000
|
|
//RPT317R1 DD SYSOUT=W, 01250000
|
|
// DEST=U@PRT155, 01260000
|
|
// HOLD=&PRTHOLD. 01270000
|
|
//** ELECTRONIC PAYMENT LISTING 1 01280000
|
|
//RPT318R1 DD SYSOUT=O, 01290000
|
|
// DEST=&LDEST., 01300000
|
|
// HOLD=&LVDHOLD. 01310001
|
|
//** ELECTRONIC PAYMENT LISTING 2 01320000
|
|
//RPT318R2 DD SYSOUT=O, 01330000
|
|
// DEST=&LDEST., 01340000
|
|
// HOLD=&PRTHOLD. 01350000
|
|
//** DAILY RETURNED CHECKS 01360000
|
|
//RPT319R1 DD SYSOUT=W, 01370000
|
|
// DEST=U@PRT155 01380000
|
|
//* HOLD=&PRTHOLD. 01390000
|
|
//** DAILY DEBIT REPORT 01400000
|
|
//RPT319R2 DD SYSOUT=Z, 01410000
|
|
// DEST=&LDEST. 01420000
|
|
//* HOLD=&PRTHOLD. 01430000
|
|
//** PENALTY ASSESSMENT NOTICE 01431000
|
|
//RPT320R1 DD SYSOUT=W, 01431200
|
|
// DEST=U@PRT155 01431300
|
|
//* HOLD=&PRTHOLD. 01431400
|
|
//** PENALTY ASSESSENT LISTING 01431500
|
|
//RPT320R2 DD SYSOUT=0 01431600
|
|
//* DEST=&LDEST. 01431700
|
|
//* HOLD=&PRTHOLD. 01431800
|
|
//** SI ADMIN ASSESSMENT LETTER 01431900
|
|
//RPT321R1 DD SYSOUT=X, 01432000
|
|
// DEST=U@PRT155 01432100
|
|
//* HOLD=&PRTHOLD. 01432200
|
|
//** PENALTY ASSESSENT LISTING 01432300
|
|
//RPT321R2 DD SYSOUT=X 01432400
|
|
//* DEST=U@PRT155 01432500
|
|
//* HOLD=&PRTHOLD. 01432600
|
|
//** SI ADMIN ASSESSMENT LETTER 01432700
|
|
//RPT325R1 DD SYSOUT=W, 01432800
|
|
//* HOLD=YES 01433000
|
|
// DEST=U@PRT155 01433100
|
|
//* HOLD=&PRTHOLD. 01434000
|
|
//** SI ADMIN ASSESSMENT RPT2 01435000
|
|
//RPT325R2 DD SYSOUT=Z, 01436000
|
|
// DEST=&LDEST. 01437000
|
|
//* HOLD=&PRTHOLD. 01438000
|
|
//** SI ADMIN ASSESSMENT RPT3 01439000
|
|
//RPT325R3 DD SYSOUT=Z, 01439100
|
|
// DEST=&LDEST. 01439200
|
|
//* HOLD=&PRTHOLD. 01439300
|
|
//** SI ADMIN ASSESSMENT RPT4 01439400
|
|
//RPT325R4 DD SYSOUT=Z, 01439500
|
|
// DEST=&LDEST. 01439600
|
|
//* HOLD=&PRTHOLD. 01439700
|
|
//** SI ADMIN ASSESSMENT RPT5 01440100
|
|
//RPT325R5 DD SYSOUT=Z, 01440200
|
|
// DEST=&LDEST. 01440300
|
|
//* HOLD=&PRTHOLD. 01440400
|
|
//** LIEN FORMS (& R3?) 01441000
|
|
//RPT403R1 DD SYSOUT=I, 01450000
|
|
// HOLD=&LVDHOLD., 01451001
|
|
// DEST=&LDEST. 01460000
|
|
//** LICENSE LIEN LTR 01470000
|
|
//** (NO LONGER PRODUCED IN THIS FORM 991025) 01480000
|
|
//RPT403R2 DD SYSOUT=*,DEST=U@PRT65,HOLD=YES 01490000
|
|
//**RPT403R2 DD SYSOUT=I, 01500000
|
|
//** DEST=&LDEST. 01510000
|
|
//** LIEN PKG PRTED CONTROL RPT 01520000
|
|
//*PT404R1 DD SYSOUT=(V,DTS404D1),HOLD=&LVDHOLD., 01530000
|
|
//RPT404R1 DD SYSOUT=0 01540000
|
|
//* DEST=&LDEST. 01550000
|
|
//** STATEMENT OF ACCT (DEBIT MEMO-SM) 01560000
|
|
//** (DAILY - NORMALLY A CICS DIRECT PRINT) 01570000
|
|
//RPT414R1 DD SYSOUT=W, 01580000
|
|
// HOLD=&PRTHOLD., 01581000
|
|
// DEST=U@PRT155 01590000
|
|
//** STATEMENT OF ACCT (PAGE 2) 01600000
|
|
//RPT414R2 DD SYSOUT=W, 01610000
|
|
// HOLD=&PRTHOLD., 01611000
|
|
// DEST=U@PRT155 01620000
|
|
//** COPY FOR DEPT. 01630000
|
|
//** (NO LONGER PRODUCED IN THIS FORM 991125) 01640000
|
|
//RPT414R3 DD SYSOUT=*,DEST=U@PRT65,HOLD=YES 01650000
|
|
//**RPT414R3 DD SYSOUT=I, 01660000
|
|
//** DEST=&LDEST. 01670000
|
|
//** STATEMENT OF ACCT OVERNIGHT PRINTING 01671000
|
|
//RPT414R4 DD DSN=DOESTAX.PROD.R414.EXCL.RPT4,DISP=SHR 01671100
|
|
//RPT414R5 DD DSN=DOESTAX.PROD.R414.EXCL.RPT5,DISP=SHR 01671300
|
|
//RPT414R6 DD DSN=DOESTAX.PROD.R414.EXCL.RPT6,DISP=SHR 01671500
|
|
//** STATEMENT OF ACCT OVERNIGHT PRINTING 01671600
|
|
//RPT415R1 DD SYSOUT=W, 01672000
|
|
// HOLD=&PRTHOLD., 01672100
|
|
// DEST=U@PRT155 01673000
|
|
//** STATEMENT OF ACCT OVERNIGHT REPORT 01674000
|
|
//RPT416R1 DD SYSOUT=Z, 01675000
|
|
// HOLD=&PRTHOLD., 01675100
|
|
// DEST=&LDEST. 01676000
|
|
//** INCR IN TOTAL BAL DUE 01680000
|
|
//RPT424R1 DD SYSOUT=0 01690000
|
|
//** MISSING RPTS ESTB LST (FCO) 01710000
|
|
//RPT425R1 DD SYSOUT=0 01720000
|
|
//** ACCTS REC AUDIT TRAIL RPT 01740000
|
|
//RPT432R1 DD SYSOUT=0 01750000
|
|
//** DEFERRED PAYMENT CONTRACT 01770000
|
|
//RPT434R1 DD SYSOUT=I,COPIES=3, 01780000
|
|
// HOLD=&LVDHOLD., 01781001
|
|
// DEST=&LDEST. 01790000
|
|
//** RATE DISCREPANCY LST 01800000
|
|
//RPT502R1 DD SYSOUT=0 01810000
|
|
//** RATE NOTICES (632) 01830000
|
|
//RPT503R1 DD SYSOUT=W, 01840000
|
|
// HOLD=&PRTHOLD., 01841000
|
|
// DEST=U@PRT155 01850000
|
|
//** RATE NOTICES (632A) 01860000
|
|
//RPT503R2 DD SYSOUT=W, 01870000
|
|
// HOLD=&PRTHOLD., 01871000
|
|
// DEST=U@PRT155 01880000
|
|
//** RATE FILE FOR ESSP - NOT NEEDED FOR DAILY 01880100
|
|
//RPT503R3 DD DUMMY 01881000
|
|
//** FLD ASSGN RPT - TAX DATA 01890000
|
|
//RPT603R1 DD SYSOUT=0 01900000
|
|
//** FLD ASSGN RPT - WAGE DATA 01920000
|
|
//RPT604R1 DD SYSOUT=0 01930000
|
|
//** 01940000
|
|
//DTSFWGH DD DSN=DOESTAX.&MSTNODE..VSAM.WGH,DISP=SHR 01950000
|
|
//DTSFNAME DD DSN=DOESTAX.&MSTNODE..VSAM.WAGE.NAME,DISP=SHR 01960000
|
|
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(20,20),RLSE) 01970000
|
|
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(20,20),RLSE) 01980000
|
|
//** 01990000
|
|
//REPORTF1 DD DSN=&&REPORTF1, 02000000
|
|
// DISP=(,PASS,DELETE), 02010000
|
|
// UNIT=SYSDA, 02020000
|
|
// SPACE=(18000,(100,100),RLSE), 02030000
|
|
// DCB=(RECFM=FB,LRECL=18,BLKSIZE=18000) 02040000
|
|
//** 02050000
|
|
//** AUDIT SURVEY CARDS 02060000
|
|
//RPT608R1 DD SYSOUT=W, 02070000
|
|
// HOLD=&PRTHOLD., 02071000
|
|
// DEST=U@PRT155 02080000
|
|
//** AUDIT NOTIFICATION LETTER 02080100
|
|
//RPT615R1 DD SYSOUT=I, 02080200
|
|
// HOLD=&LVDHOLD., 02080301
|
|
// DEST=&LDEST. 02080400
|
|
//** FUTA CERTIFICATION OVERNIGHT PRINTING 02081000
|
|
//RPT711R1 DD SYSOUT=I, 02082000
|
|
// HOLD=&LVDHOLD., 02082101
|
|
// DEST=&LDEST. 02083000
|
|
//** REQ FOR FEIN LETTER 02090000
|
|
//** (DISTINCT FROM RPT903R1) 02100000
|
|
//RPT712R1 DD SYSOUT=W, 02110000
|
|
// HOLD=&PRTHOLD., 02111000
|
|
// DEST=U@PRT155 02120000
|
|
//** TICKLER TRIG OVERDUE LST 02130000
|
|
//** TRIG DTE<=(CURRDTE-#PARMDAYS) 02140000
|
|
//RPT724R1 DD SYSOUT=0 02150000
|
|
//** LMI MISSING EMPLOYEE LTR 02170000
|
|
//RPT726R1 DD SYSOUT=W, 02180000
|
|
// HOLD=&PRTHOLD., 02181000
|
|
// DEST=U@PRT155 02190000
|
|
//** EMPLOYER WAGE REQUEST 02200000
|
|
//RPT751R1 DD SYSOUT=I, 02210000
|
|
// HOLD=&LVDHOLD., 02211001
|
|
// DEST=&LDEST. 02220000
|
|
//** /* NO LONGER PRODUCED THIS WAY (05/17/01) 02230000
|
|
//** /* EXTRACT & PRINT LABELS (8-LINE) 02240000
|
|
//**RPT901R1 DD SYSOUT=(C,,6662),FCB=P663, 02250000
|
|
//** DEST=&LDEST. 02260000
|
|
//** WAGE RPTS (UC-30/FORM 30) DAILY 02270000
|
|
//RPT902R1 DD SYSOUT=I, 02280000
|
|
// HOLD=&LVDHOLD., 02281001
|
|
// DEST=&LDEST. 02290000
|
|
//** SUR TAX (UC-30/FORM 30) DAILY 02291000
|
|
//RPT902R2 DD SYSOUT=I, 02292000
|
|
// HOLD=&LVDHOLD., 02293001
|
|
// DEST=&LDEST. 02294000
|
|
//** WAGE RPTS (UC-30/FORM 30) QTRLY 02300000
|
|
//DTS902F1 DD DUMMY 02310000
|
|
//** REQ FOR FED ID (UC-643) 02320000
|
|
//RPT903R1 DD SYSOUT=W, 02330000
|
|
// HOLD=&PRTHOLD., 02331000
|
|
// DEST=U@PRT155 02340000
|
|
//** DAILY UPDATE CONTROL REPORT 02350000
|
|
//RPT904R1 DD SYSOUT=Q,HOLD=&PRTHOLD., 02360000
|
|
// DEST=&LDEST. 02370000
|
|
//** ONLINE RECOVERY/RESTART REPORT 02380000
|
|
//RPT905R1 DD SYSOUT=Q,HOLD=&PRTHOLD., 02390000
|
|
// DEST=&LDEST. 02400000
|
|
//** ONLINE UPDT LOG PARMS (MUST BE HERE*) 02410000
|
|
//PARM906 DD DUMMY,DCB=BLKSIZE=80 02420000
|
|
//** ONLINE UPDT LOG RPT 02430000
|
|
//** (DAILY -NORMALLY AN 'ON REQ' RPT 02440000
|
|
//RPT906R1 DD SYSOUT=Q,HOLD=YES, 02450000
|
|
// DEST=&LDEST. 02460000
|
|
//** UNUSUAL CONDITIONS ENCOUNTERED REPORT 02470000
|
|
//RPT907R1 DD SYSOUT=Q,HOLD=&PRTHOLD., 02480000
|
|
// DEST=&LDEST. 02490000
|
|
//** UNUSUAL CONDITIONS ENCOUNTERED REPORT 02500000
|
|
//RPT907R2 DD SYSOUT=Q,HOLD=&PRTHOLD., 02510000
|
|
// DEST=&LDEST. 02520000
|
|
//** WAGE RPTS (UC-30H/HOUSEHOLD) YRLY 02530000
|
|
//DTS910F1 DD DUMMY 02540000
|
|
//** UC-30 NOTICES - HOUSEHOLD DAILY 02550000
|
|
//RPT910R1 DD SYSOUT=I, 02560000
|
|
// HOLD=&LVDHOLD., 02561001
|
|
// DEST=&LDEST. 02570000
|
|
//** ADMIN ASSESSMENT UC-30 NOTICES - HOUSEHOLD DAILY 02571000
|
|
//RPT910R2 DD SYSOUT=I, 02572000
|
|
// HOLD=&LVDHOLD., 02573001
|
|
// DEST=&LDEST. 02574000
|
|
//** CONTROL REPORT SUMMARY 02580000
|
|
//RPT980R1 DD SYSOUT=Q,COPIES=2, 02590000
|
|
// HOLD=&LVDHOLD., 02591001
|
|
// DEST=&LDEST. 02600000
|
|
//** EXPORT CONTROL REPORTS 02610000
|
|
//RPT991R1 DD SYSOUT=Q, 02620000
|
|
// HOLD=&LVDHOLD., 02621001
|
|
// DEST=&LDEST. 02630000
|
|
//** 02640000
|
|
//DOESLBLP EXEC PGM=DOESLABL, /* PRINT DOES LABELS 02650000
|
|
// COND=(0,LT), 02660000
|
|
// REGION=4096K 02670000
|
|
//DOESVRI1 DD DSN=&&LBL901, 02680000
|
|
// DISP=(OLD,DELETE,DELETE) 02690000
|
|
//SYSOUT DD SYSOUT=* 02700000
|
|
//SYSABOUT DD SYSOUT=* 02710000
|
|
//SYSABEND DD SYSOUT=* 02720000
|
|
//CAIMRPTS DD SYSOUT=* 02730000
|
|
//DOESLBL1 DD SYSOUT=(C),FCB=P104, 02740000
|
|
// DEST=U@PRT155 02750000
|
|
//** 02760000
|