      * DEMOELES.CPY
      * Copyright (C) 1991-2007 Micro Focus (IP) Limited.
      * All rights reserved.
      ******************************************************************
      **************  TABLE DATA BASE DETAIL       *********************
      ******************************************************************
       01  DEMOELES.
           03  DEMOELES-KEY-GROUP.
               05  DEMOELES-KEY-EXPANSION    PIC X(10) VALUE LOW-VALUES.
               05  DEMOELES-KEY              PIC X(20).
           03  DEMOELES-ELE-DATA.
               05  FILLER                    PIC X(133) VALUE SPACES.
           03  DEMOELES-INV-MATRIX REDEFINES DEMOELES-ELE-DATA.
               05  ELES-INV-DATA OCCURS 13 TIMES.
                   10  ELES-DATE             PIC 9(04).
                   10  ELES-DATEX REDEFINES ELES-DATE.
                       15  ELES-YY           PIC X(02).
                       15  ELES-YY9 REDEFINES ELES-YY PIC 9(02).
                       15  ELES-MM           PIC X(02).
                       15  ELES-MM9 REDEFINES ELES-MM PIC 9(02).
                   10  ELES-HDRS             PIC 9(06).
               05  FILLER                    PIC X(03).
           03  DEMOELES-TABLE-NUMERIC.
               05  FILLER                    PIC S9(15) COMP-3 VALUE +0.
           03  DEMOELES-EXPANSION.
               05  FILLER                    PIC X(53).
