00001 *****                                                             12/14/09
00002 *                                                                 DTSIMDOC
00003 *    DTSIMDOC  MASTER FILE DOCUMENT RECORD DEFINITION.               LV001
00004 *                                                                 DTSIMDOC
00005 *                                                                 DTSIMDOC
00006 *              11/25/2009  INITIAL DEVELOPMENT.           GD      DTSIMDOC
00007 *                                                                 DTSIMDOC
00008 *****                                                             DTSIMDOC
00009                                                                   DTSIMDOC
00010          10  MDOC-KEY-AREA.                                       DTSIMDOC
00011              15  MDOC-EMP-NO             PIC S9(07)       COMP-3. DTSIMDOC
00012              15  MDOC-REC-TYPE           PIC S9(04)       COMP.   DTSIMDOC
00013                  88  MDOC-DOC-88             VALUE +19.           DTSIMDOC
00014              15  MDOC-DOC-ID             PIC S9(11)       COMP-3. DTSIMDOC
00015              15  MDOC-KEY-FILLER         PIC  X(04).              DTSIMDOC
00016                                                                   DTSIMDOC
00017                                                                   DTSIMDOC
00018          10  MDOC-PURGE-DATE             PIC S9(09)       COMP-3. DTSIMDOC
00019                                                                   DTSIMDOC
00020                                                                   DTSIMDOC
00021          10  MDOC-DATA-AREA.                                      DTSIMDOC
00022              15  MDOC-RELATED-REC-KEY.                            DTSIMDOC
00023                  20  MDOC-KEY-EMP-NO      PIC S9(07)      COMP-3. DTSIMDOC
00024                  20  MDOC-KEY-REC-TYPE    PIC S9(04)      COMP.   DTSIMDOC
00025                  20  MDOC-KEY-FILLER      PIC  X(10).             DTSIMDOC
00026                                                                   DTSIMDOC
00027                                                                   DTSIMDOC
00028              15  FILLER                  PIC  X(24).              DTSIMDOC
00029                                                                   DTSIMDOC
00030                                                                   DTSIMDOC
00031              15  MDOC-CONVERTED-IND      PIC  X(01).              DTSIMDOC
00032                  88  MDOC-CONVERTED-88       VALUE 'Y'.           DTSIMDOC
00033                  88  MDOC-NOT-CONVERTED-88   VALUE 'N'.           DTSIMDOC
00034                                                                   DTSIMDOC
00035              15  MDOC-ESTB-DATE          PIC S9(09)       COMP-3. DTSIMDOC
00036                                                                   DTSIMDOC
00037              15  MDOC-CHNG-DATE          PIC S9(09)       COMP-3. DTSIMDOC