*****************************************************************
      *                                                               *
      *    TABLE: OREL                                                *
      *                                                               *
      *****************************************************************
       01 MTI-LOG.
          03 LOGREC-PREFIX.
              05 LOGREC-RECLEN                        PIC S9(04) COMP.
              05 LOGREC-TABNUM                        PIC X(4).
              05 LOGREC-ACTION                        PIC X.
                 88 LOGREC-ACTION-ADD                 VALUE 'A'.
                 88 LOGREC-ACTION-CHANGE              VALUE 'C'.
                 88 LOGREC-ACTION-DELETE              VALUE 'D'.
              05 LOGREC-DATE.
                 07 LOGREC-CC                         PIC XX.
                 07 LOGREC-YY                         PIC XX.
                 07 LOGREC-MM                         PIC XX.
                 07 LOGREC-DD                         PIC XX.
              05 LOGREC-TIME.
                 07 LOGREC-TIME-HH                    PIC XX.
                 07 LOGREC-TIME-MM                    PIC XX.
                 07 LOGREC-TIME-SS                    PIC XX.
              05 LOGREC-TABID                         PIC X(4).
              05 LOGREC-TYPE                          PIC X.                    
 	  03  OREL-RECORD REDEFINES MTIOAREA.
               05  OREL-RECORD-KEY.      
                   07  RECEIVABLE-NUMBER.
                       09  RECEIV-NUMBER-AGY            PIC X(03).
                       09  RECEIV-NUMBER-NUM            PIC X(11).      
                   07  LINE-NUMBER                      PIC X(02).
               05  OREL-RESULT-FIELDS.      
                   07  FUND                             PIC X(04).      
                   07  AGENCY                           PIC X(03).
                   07  XORGANIZATION                    PIC X(04).
                   07  SUB-ORG                          PIC X(02).      
                   07  APPR-UNIT                        PIC X(09).      
                   07  ACTIVITY                         PIC X(04).      
                   07  XFUNCTION                        PIC X(04).  
                   07  OBJECT                           PIC X(04).
                   07  SUB-OBJECT                       PIC X(02).
                   07  REVENUE-SOURCE                   PIC X(04).
                   07  SUB-REV-SOURCE                   PIC X(02).
                   07  BS-ACCOUNT                       PIC X(04).
                   07  REPORTING-CATEGORY               PIC X(04).
                   07  JOB-NUMBER                       PIC X(08).
                   07  PROJECT-DATA                     PIC X(08).
                   07  OFF-BLD-REC-ACCT                 PIC X(04).
                   07  RATE-CODE                        PIC X(04).
                   07  NUMBER-UNITS                     PIC S9(05)V99.                                  
                   07  UOM                              PIC X(04).
                   07  DESCRIPTION                      PIC X(30).
                   07  RECEIV-AMT                       PIC S9(12)V99.                                     
                   07  REC-COLL-AMT                     PIC S9(12)V99.                  
                   07  CLOSED-REC-AMT                   PIC S9(12)V99. 
          03  FILLER                                    PIC X(1843).