00001 *****                                                             08/28/98
00002 *                                                                 DTSIMBAA
00003 *    DTSIMBAA  MASTER FILE 'BENEFIT ALTERNATE ADDRESS' RECORD        LV002
00004 *              DEFINITION.                                        DTSIMBAA
00005 *                                                                 DTSIMBAA
00006 *                                                                    CL**2
00007 *              08/28/1998  REVIEWED AND MODIFIED FOR DC.  EHH        CL**2
00008 *                                                                    CL**2
00009 *****                                                             DTSIMBAA
00010                                                                      CL**2
00011          10  MBAA-KEY-AREA.                                       DTSIMBAA
00012              15  MBAA-EMP-NO             PIC S9(07)       COMP-3. DTSIMBAA
00013              15  MBAA-REC-TYPE           PIC S9(04)       COMP.   DTSIMBAA
00014                  88  MBAA-BAA-88             VALUE +14.           DTSIMBAA
00015              15  MBAA-ID-NO              PIC S9(03)       COMP-3. DTSIMBAA
00016                  88  MBAA-PRIMARY-BEN-MAIL-ADDR-88  VALUE +000.      CL**2
00017              15  MBAA-KEY-FILLER         PIC  X(08).              DTSIMBAA
00018                                                                      CL**2
00019                                                                      CL**2
00020          10  MBAA-PURGE-DATE             PIC S9(09)       COMP-3. DTSIMBAA
00021                                                                      CL**2
00022                                                                      CL**2
00023          10  MBAA-DATA-AREA.                                      DTSIMBAA
00024              15  MBAA-NAME               PIC  X(40).              DTSIMBAA
00025                                                                      CL**2
00026              15  MBAA-ADDRESS.                                    DTSIMBAA
00027                  20  MBAA-ATTN-LINE      PIC  X(40).              DTSIMBAA
00028                  20  MBAA-DELIV-LINE-1   PIC  X(40).                 CL**2
00029                  20  MBAA-DELIV-LINE-2   PIC  X(40).                 CL**2
00030                  20  MBAA-CITY           PIC  X(25).              DTSIMBAA
00031                  20  MBAA-ST             PIC  X(02).              DTSIMBAA
00032                  20  MBAA-ZIP            PIC  X(10).              DTSIMBAA
00033                  20  MBAA-ADVANCED-BARCODE                           CL**2
00034                                          PIC  X(14).                 CL**2
00035                                                                      CL**2
00036              15  MBAA-PHONE-NUMBERS.                              DTSIMBAA
00037                  20  MBAA-VOICE-1.                                   CL**2
00038                      25  MBAA-VOICE-1-AREA-CD PIC X(03).             CL**2
00039                      25  MBAA-VOICE-1-PREFIX PIC  X(03).             CL**2
00040                      25  MBAA-VOICE-1-SUFFIX PIC  X(04).             CL**2
00041                      25  MBAA-VOICE-1-EXT    PIC  X(05).             CL**2
00042                  20  MBAA-VOICE-2.                                   CL**2
00043                      25  MBAA-VOICE-2-AREA-CD PIC X(03).             CL**2
00044                      25  MBAA-VOICE-2-PREFIX PIC  X(03).             CL**2
00045                      25  MBAA-VOICE-2-SUFFIX PIC  X(04).             CL**2
00046                      25  MBAA-VOICE-2-EXT    PIC  X(05).             CL**2
00047                  20  MBAA-FAX.                                    DTSIMBAA
00048                      25  MBAA-FAX-AREA-CD    PIC  X(03).          DTSIMBAA
00049                      25  MBAA-FAX-PREFIX     PIC  X(03).          DTSIMBAA
00050                      25  MBAA-FAX-SUFFIX     PIC  X(04).          DTSIMBAA
00051                      25  MBAA-FAX-EXT        PIC  X(05).             CL**2
00052                                                                      CL**2
00053              15  MBAA-EMAIL-ADDRESS      PIC  X(40).                 CL**2
00054                                                                      CL**2
00055              15  MBAA-ESTB-ABSTIME       PIC S9(15)       COMP-3.    CL**2
00056                                                                      CL**2
00057                                                                      CL**2
00058              15  FILLER                  PIC  X(32).              DTSIMBAA
00059                                                                      CL**2
00060                                                                      CL**2
00061              15  MBAA-CONVERTED-IND      PIC  X(01).              DTSIMBAA
00062                  88  MBAA-CONVERTED-88       VALUE 'Y'.           DTSIMBAA
00063                  88  MBAA-NOT-CONVERTED-88   VALUE 'N'.           DTSIMBAA
00064                                                                      CL**2
00065                                                                      CL**2
00066              15  MBAA-ESTB-DATE          PIC S9(09)       COMP-3. DTSIMBAA
00067                                                                      CL**2
00068              15  MBAA-CHNG-DATE          PIC S9(09)       COMP-3. DTSIMBAA