00001 *****                                                             11/14/05
00002 *                                                                 DTSIL074
00003 *    DTSIL074    FEIN EDIT MODULE LINKAGE.                           LV005
00004 *                                                                 DTSIL074
00005 *                                                                 DTSIL074
00006 *                09/08/1998  REVIEWED AND MODIFIED FOR DC.  EHH   DTSIL074
00007 *                06/23/2004  ADDED L074-DUP-STAT-UNK-88 -         DTSIL074
00008 *                            THIS VALUE SET WHEN ACCOUNT WITH     DTSIL074
00009 *                            MATCHING FEIN FOUND AND STATUS IS    DTSIL074
00010 *                            UNKNOWN.  A NEW ACTIVE ACCOUNT SHOULDDTSIL074
00011 *                            NOT BE ADDED IN THIS CASE.     GD.   DTSIL074
00012 *                                                                 DTSIL074
00013 *****                                                             DTSIL074
00014                                                                   DTSIL074
00015          10  L074-OPTION                PIC  X(01).               DTSIL074
00016              88  L074-ANY-DUP-88               VALUE '1'.         DTSIL074
00017              88  L074-ACTIVE-DUP-88            VALUE '2'.         DTSIL074
00018                                                                   DTSIL074
00019          10  L074-RESULT-IND             PIC  X(01).              DTSIL074
00020              88  L074-NO-DUP-88              VALUE '0'.           DTSIL074
00021              88  L074-DUP-BUT-OK-88          VALUE '1'.           DTSIL074
00022              88  L074-OK-88                  VALUE '0' '1'.       DTSIL074
00023              88  L074-DUP-NOT-OK-88          VALUE '2'.           DTSIL074
00024              88  L074-DUP-STAT-UNK-88        VALUE '3'.           DTSIL074
00025              88  L074-FILE-CLOSED-88         VALUE '9'.           DTSIL074
00026                                                                   DTSIL074
00027          10  L074-EMP-NO                 PIC S9(07)  COMP-3.      DTSIL074
00028                                                                   DTSIL074
00029          10  L074-FEIN                   PIC S9(09)  COMP-3.      DTSIL074
00030                                                                   DTSIL074
00031          10  L074-INACTIVE-EMP-NO        PIC S9(07)  COMP-3.      DTSIL074
00032                                                                   DTSIL074
00033          10  L074-MSG-AREA.                                       DTSIL074
00034              15  L074-MSG-ID             PIC  X(04).              DTSIL074
00035              15  L074-MSG-TEXT           PIC  X(60).              DTSIL074
00036                                                                   DTSIL074
00037          10  FILLER                      PIC  X(15).              DTSIL074