00001 ***** 01/29/02 00002 * DTSIR112 00003 * DTSIR112 EMPLOYER REGISTRATION NOTICE OF SUBJECTIVITY LV004 00004 * (UI-47) REPORT RECORD. DTSIR112 00005 * DTSIR112 00006 * NOTE: IF R112-EMP-CLASS = 'R', R112-LAST-RATE-END-YRQ DTSIR112 00007 * WILL BE THE VALUE OF MHDR-LAST-REG-RATE-END-YRQ. DTSIR112 00008 * IF R112-EMP-CLASS = 'G', R112-LAST-RATE-END-YRQ DTSIR112 00009 * WILL BE THE VALUE OF MHDR-LAST-GOV-RATE-END-YRQ. DTSIR112 00010 * IF R112-EMP-CLASS = 'S', R112-LAST-RATE-END-YRQ DTSIR112 00011 * DOES NOT APPLY. DTSIR112 00012 * DTSIR112 00013 * R112-RATE-AREA WILL CARRY THE MOST RECENT SIX DTSIR112 00014 * RATES ASCENDING BY MRTE-EFF-YRQ. DTSIR112 00015 * THE REPORT MODULE WILL DETERMINE WHICH RATES DTSIR112 00016 * TO DISPLAY AND THE SEQUENCE FOR DISPLAY. DTSIR112 00017 * DTSIR112 00018 * DTSIR112 00019 * 10/28/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIR112 00020 * DTSIR112 00021 * 11/02/2001 MODIFIED FOR HOUSEHOLD. GD DTSIR112 00022 * DTSIR112 00023 ***** DTSIR112 00024 DTSIR112 00025 10 R112-LENGTH PIC S9(04) COMP. DTSIR112 00026 DTSIR112 00027 10 R112-SORT-AREA. DTSIR112 00028 15 R112-REC-TYPE PIC X(03) VALUE '112'. DTSIR112 00029 15 R112-OP-ID PIC X(08). DTSIR112 00030 15 R112-EMP-NO PIC S9(07) COMP-3. DTSIR112 00031 DTSIR112 00032 10 R112-DATA-AREA. DTSIR112 00033 15 R112-RPT-TYPE PIC X(01). DTSIR112 00034 88 R112-RPT-QUARTERLY-88 VALUE 'Q'. DTSIR112 00035 88 R112-RPT-ANNUAL-88 VALUE 'A'. DTSIR112 00036 15 R112-RUN-DATE PIC S9(09) COMP-3. DTSIR112 00037 15 R112-FMT-ADDR. DTSIR112 00038 20 R112-FMT-LINE OCCURS 5 TIMES DTSIR112 00039 INDEXED BY R112-FMT-IDX DTSIR112 00040 PIC X(40). DTSIR112 00041 15 R112-ZIP PIC X(10). DTSIR112 00042 15 R112-ADVANCED-BARCODE PIC X(14). DTSIR112 00043 15 R112-FIRST-LIAB-YRQ PIC S9(05) COMP-3. DTSIR112 00044 15 R112-LAST-LIAB-YRQ PIC S9(05) COMP-3. DTSIR112 00045 15 R112-SCHED-START-YRQ PIC S9(05) COMP-3. DTSIR112 00046 15 R112-EMP-CLASS PIC X(01). DTSIR112 00047 88 R112-CLASS-RATED-88 VALUE 'R'. DTSIR112 00048 88 R112-CLASS-SELF-INS-88 VALUE 'S'. DTSIR112 00049 15 R112-LAST-RATE-END-YRQ PIC S9(05) COMP-3. DTSIR112 00050 15 R112-RATE-CNT PIC S9(04) COMP. DTSIR112 00051 15 R112-RATE-AREA OCCURS 6 TIMES DTSIR112 00052 INDEXED BY R112-RATE-IDX. DTSIR112 00053 20 R112-RATE-EFF-YRQ PIC S9(05) COMP-3. DTSIR112 00054 20 R112-RATE-END-YRQ PIC S9(05) COMP-3. DTSIR112 00055 20 R112-UI-RATE PIC S9(01)V9(04) DTSIR112 00056 COMP-3. DTSIR112