00001 ***** 02/26/08 00002 * DTSIMERA 00003 * DTSIMERA MASTER FILE 'EMPLOYER REGISTRATION CYCLE A' LV008 00004 * RECORD DEFINITION. DTSIMERA 00005 * DTSIMERA 00006 * DTSIMERA 00007 * 08/28/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIMERA 00008 * 05/31/2000 ADDED FIRST LABEL IND FIELD. ZL1 DTSIMERA 00009 * 07/22/2004 UPDATED LEVEL-88S FOR SOURCE CODE - GD DTSIMERA 00010 * 06/01/2005 ADDED WEB REGISTRATION AND FISCAL DTSIMERA 00011 * AGENT SOURCE CODES. - GD DTSIMERA 00012 * DTSIMERA 00013 ***** DTSIMERA 00014 DTSIMERA 00015 10 MERA-KEY-AREA. DTSIMERA 00016 15 MERA-EMP-NO PIC S9(07) COMP-3. DTSIMERA 00017 15 MERA-REC-TYPE PIC S9(04) COMP. DTSIMERA 00018 88 MERA-ERA-88 VALUE +18. DTSIMERA 00019 15 MERA-KEY-FILLER PIC X(10). DTSIMERA 00020 DTSIMERA 00021 DTSIMERA 00022 10 MERA-PURGE-DATE PIC S9(09) COMP-3. DTSIMERA 00023 DTSIMERA 00024 DTSIMERA 00025 10 MERA-DATA-AREA. DTSIMERA 00026 15 MERA-SOURCE-CD PIC X(02). DTSIMERA 00027 88 MERA-SOURCE-CNTR-CMPLY-88 VALUE '00'. DTSIMERA 00028 88 MERA-SOURCE-PHONE-88 VALUE '01'. DTSIMERA 00029 88 MERA-SOURCE-LETTER-88 VALUE '02'. DTSIMERA 00030 88 MERA-SOURCE-VOL-88 VALUE '03'. DTSIMERA 00031 88 MERA-SOURCE-PRED-88 VALUE '04'. DTSIMERA 00032 88 MERA-SOURCE-BEN-88 VALUE '05'. DTSIMERA 00033 88 MERA-SOURCE-940-88 VALUE '06'. DTSIMERA 00034 88 MERA-SOURCE-UNION-HALL-88 VALUE '07'. DTSIMERA 00035 88 MERA-SOURCE-FIELD-REP-88 VALUE '08'. DTSIMERA 00036 88 MERA-SOURCE-FOLLOW-UP-88 VALUE '09'. DTSIMERA 00037 88 MERA-SOURCE-DEPT-REVENUE-88 VALUE '10'. DTSIMERA 00038 88 MERA-SOURCE-WRKR-COMP-88 VALUE '11'. DTSIMERA 00039 88 MERA-SOURCE-LIQ-LICENSE-88 VALUE '12'. DTSIMERA 00040 88 MERA-SOURCE-FEIN-LIST-88 VALUE '13'. DTSIMERA 00041 88 MERA-SOURCE-UC30-STAFF-88 VALUE '14'. DTSIMERA 00042 88 MERA-SOURCE-UC30-SYS-88 VALUE '15'. DTSIMERA 00043 88 MERA-SOURCE-UC30-88 VALUE '14', '15'.DTSIMERA 00044 88 MERA-SOURCE-FISC-AGNT-88 VALUE '16'. DTSIMERA 00045 88 MERA-SOURCE-WEB-REG-88 VALUE '17'. DTSIMERA 00046 88 MERA-SOURCE-WEB-REG-PRED-88 VALUE '18'. DTSIMERA 00047 88 MERA-SOURCE-WEB-REG-SUCC-88 VALUE '19'. DTSIMERA 00048 88 MERA-SOURCE-WEB-88 VALUE DTSIMERA 00049 '17' THRU '19'. DTSIMERA 00050 88 MERA-SOURCE-SYSTEM-88 VALUE DTSIMERA 00051 '14' THRU '19'. DTSIMERA 00052 88 MERA-SOURCE-OTH-88 VALUE '98'. DTSIMERA 00053 88 MERA-SOURCE-UNK-88 VALUE '99'. DTSIMERA 00054 DTSIMERA 00055 15 MERA-CLAIMANT-SSN PIC S9(09) COMP-3. DTSIMERA 00056 DTSIMERA 00057 15 MERA-CLAIMANT-NAME PIC X(32). DTSIMERA 00058 DTSIMERA 00059 15 MERA-RESPONSIBLE-OP-ID PIC X(08). DTSIMERA 00060 DTSIMERA 00061 15 MERA-POT-PRED-EMP-NO PIC S9(07) COMP-3. DTSIMERA 00062 DTSIMERA 00063 15 MERA-NOTE PIC X(60). DTSIMERA 00064 DTSIMERA 00065 15 MERA-LETTER-1-CD PIC X(02). DTSIMERA 00066 88 MERA-LETTER-GENERIC-88 VALUE '01'. DTSIMERA 00067 88 MERA-LETTER-EMP-REQUEST-88 VALUE '02'. DTSIMERA 00068 88 MERA-LETTER-UC30-RCVD-88 VALUE '04'. DTSIMERA 00069 88 MERA-LETTER-CLAIMNT-WGS-88 VALUE '05'. DTSIMERA 00070 DTSIMERA 00071 15 MERA-LABEL-CNT PIC S9(01) COMP-3. DTSIMERA 00072 DTSIMERA 00073 15 MERA-STATUS-CD PIC X(02). DTSIMERA 00074 88 MERA-STATUS-SETUP-88 VALUE '00'. DTSIMERA 00075 88 MERA-STATUS-LTR1-88 VALUE '01'. DTSIMERA 00076 88 MERA-STATUS-LTR2-88 VALUE '02'. DTSIMERA 00077 88 MERA-STATUS-COOP-88 VALUE '05'. DTSIMERA 00078 88 MERA-STATUS-ASSGN-GEN-88 VALUE '06'. DTSIMERA 00079 88 MERA-STATUS-MANUAL-88 VALUE '09'. DTSIMERA 00080 88 MERA-STATUS-RECD-88 VALUE '11'. DTSIMERA 00081 88 MERA-STATUS-HOLD-88 VALUE '12'. DTSIMERA 00082 88 MERA-STATUS-NOT-LIAB-88 VALUE '21'. DTSIMERA 00083 88 MERA-STATUS-LIAB-88 VALUE '31'. DTSIMERA 00084 88 MERA-STATUS-ACTIVE-88 VALUE '00' DTSIMERA 00085 THRU '11'. DTSIMERA 00086 DTSIMERA 00087 15 MERA-STATUS-CHNG-DATE PIC S9(09) COMP-3. DTSIMERA 00088 DTSIMERA 00089 15 MERA-MAIL-DATE-1 PIC S9(09) COMP-3. DTSIMERA 00090 DTSIMERA 00091 15 MERA-MAIL-DATE-2 PIC S9(09) COMP-3. DTSIMERA 00092 DTSIMERA 00093 15 MERA-COOP-AGENCY-REQ-DATE DTSIMERA 00094 PIC S9(09) COMP-3. DTSIMERA 00095 DTSIMERA 00096 15 MERA-FIELD-ASSIGN-DATE PIC S9(09) COMP-3. DTSIMERA 00097 DTSIMERA 00098 15 MERA-RECEIVED-DATE PIC S9(09) COMP-3. DTSIMERA 00099 DTSIMERA 00100 15 MERA-DETER-NOTSUB-DATE PIC S9(09) COMP-3. DTSIMERA 00101 DTSIMERA 00102 15 MERA-FIRST-LABEL-IND PIC X(01). DTSIMERA 00103 88 MERA-FIRST-LABEL-NEEDED-88 VALUE '0'. DTSIMERA 00104 88 MERA-FIRST-LABEL-PRINTED-88 VALUE '1'. DTSIMERA 00105 DTSIMERA 00106 15 FILLER PIC X(47). DTSIMERA 00107 DTSIMERA 00108 DTSIMERA 00109 15 MERA-CONVERTED-IND PIC X(01). DTSIMERA 00110 88 MERA-CONVERTED-88 VALUE 'Y'. DTSIMERA 00111 88 MERA-NOT-CONVERTED-88 VALUE 'N'. DTSIMERA 00112 DTSIMERA 00113 DTSIMERA 00114 15 MERA-ESTB-DATE PIC S9(09) COMP-3. DTSIMERA 00115 DTSIMERA 00116 15 MERA-CHNG-DATE PIC S9(09) COMP-3. DTSIMERA