//DTSRQ506 JOB (UI,4300,3400,T),DTSYRLY.RATING.1,CLASS=P, 00010000 // MSGCLASS=X,NOTIFY=ECNTSUP, 00020000 //**** TYPRUN=SCAN, 00030000 // REGION=0M 00040000 //**** CHECK '***>>>' ON LINES BELOW FOR A RERUN 00050000 //**** 00051000 //**** LEAVE JOBNAME DTSRQ506 TO CAPTURE VIEW DIRECT REPORTS ZL1 00051100 //**** 00051200 //* RUN YEARLY EXPERIENCE RATING PART 1 (DTSRQ500) 00052000 //* AFTER REVIEW OF THE THESE REPORTS, MAKE NEEDED ADJUSTMENTS AND 00053000 //* RUN YEARLY EXPERIENCE RATING PART 2 (DTSRQ517) 00054000 //* 00055000 //* ** THE FOLLOWING DATA ELEMENTS MUST BE ENTERED ON (E.G.,) 00056000 //* ** SCREEN 83 BEFORE STARTING THIS RUN: 00057000 //* ** 1. CREATE A NEW FUIR RECORD BY ADDING A NEW 00058000 //* ** SCREEN 83 OCCURRENCE FOR THE NEW RATE YEAR (011) 00059000 //* ** 2. ENTER THE RATE CUTOFF DATE (THE DATE ON 00060000 //* ** WHICH THE RATING PROCESS *BEGINS*) (120800) 00070000 //* ** AND THE RATE NOTICE DATE) (120800) 00071000 //* ** 3. ENTER THE TRUST FUND INTEREST AMOUNT 00080000 //* ** 4. ENTER THE TRUST FUND BALANCE AMOUNT 00081000 //**** 00090000 // SET ACHYEAR='FY2009' /* ARCHIVING YEAR 00100000 // SET LOADLIB='PROD' /* LOADLIB & PROCLIB YOU WANT TO USE 00100100 // SET LVLNODE='PROD' /* MASTER FILES YOU WANT TO USE 00101000 // SET MSTNODE='PROD' /* MASTER FILES YOU WANT TO USE 00102000 // SET UINODE='PROD' /* BENEFITS MASTER 00103000 // SET RATEYR='YR2014' 00110000 // SET TPSYRQ='YR2014' 00110100 // SET QTRLY='RT141' 00111000 // SET BD710='141,N,Y,R' /* (1):RTE-YR-START-YRQ,(2):PURGE-MRCT-IND 00120000 //* (3):UPD MASTER,(4):RUN TYPE 00130000 // SET BD720='141' /* RTE-YR-START-YRQ 00140000 // SET BD730='141,Y' /* RTE-YR-START-YRQ,RPT-EXISTING-AMT-IND 00150000 // SET BD740='141' /* RTE-YR-START-YRQ 00160000 // SET BD745='141,Y' /* RTE-YR-START-YRQ,OVERWRITE FUIR 00160100 //** /* 00161000 // SET LDEST='LOCAL' 00171000 // SET LHOLD='YES' 00180000 // SET CHGNODE='PROD' 00181000 // SET CHGMNBR='CHGM002' 00182000 // SET CHGMSSN='CHGM030' 00183000 //**** 00184000 //**** DEFINE INITIAL INPUT FILE(S) 00190000 //**** 00220000 //PROCLIB JCLLIB ORDER=DOESTAX.&LOADLIB..PROCLIB 00231000 //LOADLIBS INCLUDE MEMBER=DTSIJLIB 00250000 //**** BACKUP BEFORE THIS RUN 00260000 //**** (NOT NEEDED IF RUN IMMEDIATELY 00270000 //**** *AFTER* A DAILY RUN) 00280000 //STEP0500 EXEC DTSVR506 00720001 //** INDIVIDUAL RPT OVERRIDE(S) 00730000 //**STEP0100.RPT520R1 DD HOLD=NO 00740000 //STEP0100.RPT723R1 DD DUMMY 00741000 //** 00750000 //**** BACKUP AFTER THIS RUN 00760000