00001 *****                                                             05/11/04
00002 *                                                                 DTSIL081
00003 *    DTSIL081    CLAIMANT NAME LOOKUP MODULE LINKAGE.                LV010
00004 *                                                                 DTSIL081
00005 *                                                                 DTSIL081
00006 *                09/08/1998  REVIEWED AND MODIFIED FOR DC.  EHH   DTSIL081
00007 *                                                                 DTSIL081
00008 *****                                                             DTSIL081
00009                                                                   DTSIL081
00010          10  L081-RESULT-IND             PIC  X(01).              DTSIL081
00011              88  L081-NAME-FOUND             VALUE '1'.           DTSIL081
00012              88  L081-NAME-NOT-FOUND         VALUE '2'.           DTSIL081
00013              88  L081-FILE-CLOSED            VALUE '3'.           DTSIL081
00014                                                                   DTSIL081
00015          10  L081-CLAIMANT-SSN           PIC  9(09)  COMP-3.      DTSIL081
00016                                                                   DTSIL081
00017          10  L081-CLAIMANT-NAME          PIC  X(32).              DTSIL081
00018                                                                   DTSIL081
00019          10  L081-CLAIMANT-ADDRESS.                               DTSIL081
00020              15  L081-CLAIMANT-STREET    PIC  X(40).              DTSIL081
00021              15  L081-CLAIMANT-CITY      PIC  X(15).              DTSIL081
00022              15  L081-CLAIMANT-STATE     PIC  X(02).              DTSIL081
00023              15  L081-CLAIMANT-ZIP       PIC  X(10).              DTSIL081
00024                                                                   DTSIL081
00025          10  L081-MSG-AREA.                                       DTSIL081
00026              15  L081-MSG-ID             PIC  X(04).              DTSIL081
00027              15  L081-MSG-TEXT           PIC  X(60).              DTSIL081
00028                                                                   DTSIL081
00029          10  FILLER                      PIC  X(24).              DTSIL081