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.