52 lines
4.0 KiB
Plaintext
52 lines
4.0 KiB
Plaintext
//**** 00000100
|
|
//** 00000200
|
|
//** EXTRACT STEP FOR THE ANNUAL RATING RUN 3? 00000307
|
|
//** PRODUCES 'FINAL' RATES FOR HOUSEHOLD EMPLOYERS 00000407
|
|
//** FILING ANNUALLY. 00000507
|
|
//** (WITH MSTR UPDATE) 00000601
|
|
//** 00000700
|
|
//DTSUX518 PROC 00000807
|
|
//** DEFNS NEEDED FOR THIS PROC: 00001009
|
|
//** LVLNODE = DEVL/TEST/PROD 00001109
|
|
//** BD710 = RTE-YR-START-YRQ,UPDATE-MASTER-IND,RUN TYPE 00001212
|
|
//** BD750 = RTE-YR-START-YRQ,UPDATE-MASTER-IND,RUN TYPE 00001312
|
|
//** BD790 = RTE-YR-START-YRQ 00001412
|
|
//**** 00001512
|
|
//**** REMOVED BD710 FROM PROC - ESTIMATED RATE ALREADY EXIST; CREATED 00001614
|
|
//**** DURING NORMAL YEARLY RUN XL1 00001714
|
|
//**** 00001814
|
|
//*STEP0100 EXEC PGM=DTSBD710, INITIALIZE ANNUAL RATING 00001914
|
|
//* COND=(0,LT), CUTOFF RECORD OCCURRENCES 00002014
|
|
//* PARM='&BD710.' RTE-YR-START-YRQ,PURGE-MRCT-IND 00002114
|
|
//*SYSOUT DD SYSOUT=* (= Y IF A RERUN) 00002214
|
|
//*SYSABOUT DD SYSOUT=* 00002314
|
|
//*SYSUDUMP DD SYSOUT=* 00002414
|
|
//*DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00002514
|
|
//*DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00002614
|
|
//* AMP=('BUFNI=5,BUFND=10') 00002714
|
|
//*DTSFCHG5 DD DSN=DOESTAX.&LVLNODE..VSAM.CHGM005,DISP=SHR, 00002814
|
|
//* AMP=('BUFNI=5,BUFND=10') 00002914
|
|
//*DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..PER.RPT(+1), 00003014
|
|
//* DISP=(,CATLG,DELETE), 00003114
|
|
//* SPACE=(8192,(1000,1000),RLSE), 00003214
|
|
//* DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00003314
|
|
//**** 00003414
|
|
//STEP0100 EXEC PGM=DTSBD750, ASSIGN RATES 00003514
|
|
// COND=(0,LT), CUTOFF RECORD OCCURRENCES 00003616
|
|
// PARM='&BD750.' RTE-YR-START-YRQ,UPDATE-MASTER-IND 00003714
|
|
//SYSOUT DD SYSOUT=* 00004000
|
|
//SYSABOUT DD SYSOUT=* 00005000
|
|
//SYSUDUMP DD SYSOUT=* 00006000
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00007010
|
|
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00008000
|
|
// AMP=('BUFNI=5,BUFND=10') 00009000
|
|
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..PER.RPT(+1), 00010014
|
|
// DISP=(,CATLG,DELETE), 00020000
|
|
// SPACE=(8192,(1000,1000),RLSE), 00030000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00040011
|
|
//DTSFBTCO DD DSN=DOESTAX.&LVLNODE..BTC(+1), 00050000
|
|
// DISP=(,CATLG,DELETE), 00060000
|
|
// SPACE=(8192,(1000,1000),RLSE), 00070000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00080011
|
|
//**** 00090000
|