01  FX-REC-DELIMIT.                                            
     05  FX-BAT-DATA.                                           
         10  BAT-TYPE                       PIC X(04).          
         10  FILLER                         PIC X(01) VALUE '|'.
         10  BAT-ORG1                       PIC X(03).          
         10  FILLER                         PIC X(01) VALUE '|'.
         10  BAT-NUMBER                     PIC X(06).          
         10  FILLER                         PIC X(01) VALUE '|'.
         10  DOC-TYPE                       PIC X(04).          
         10  FILLER                         PIC X(01) VALUE '|'.
         10  DOC-ORG1                       PIC X(03).          
         10  FILLER                         PIC X(01) VALUE '|'.
         10  DOC-NUMBER                     PIC X(11).          
         10  FILLER                         PIC X(01) VALUE '|'.
     05  FX-HDR-DATA.                                           
         10  TRANS-CODE                     PIC X(2).           
         10  FILLER                         PIC X(01) VALUE '|'.
         10  TRANS-NUMBER-AGENCY            PIC X(3).           
         10  FILLER                         PIC X(01) VALUE '|'.
         10  TRANS-NUMBER                   PIC X(11).          
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  RECORD-MONTH                   PIC X(2).            
         10  RECORD-DAY                     PIC X(2).            
         10  RECORD-YEAR                    PIC X(2).            
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  FISC-MONTH                     PIC X(2).            
         10  FISC-YEAR                      PIC X(2).            
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  UNITS-TOTAL                    PIC X(7).            
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  DOCUMENT-TOTAL                 PIC X(14).           
         10  FILLER                         PIC X(01) VALUE '|'. 
     05  FX-LN-DATA.                                             
         10  BUDGET-FY                      PIC X(2).            
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  FUND                           PIC X(4).            
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  AGENCY                         PIC X(3).            
         10  FILLER                         PIC X(01) VALUE '|'. 
         10 XORGANIZATION                   PIC X(4).            
         10  FILLER                         PIC X(01) VALUE '|'.
         10  SUB-ORG                        PIC X(2).           
         10  FILLER                         PIC X(01) VALUE '|'.
         10  APPR-UNIT                      PIC X(9).           
         10  FILLER                         PIC X(01) VALUE '|'.
         10  ACTIVITY                       PIC X(4).           
         10  FILLER                         PIC X(01) VALUE '|'.
         10  XFUNCTION                      PIC X(04).          
         10  FILLER                         PIC X(01) VALUE '|'.
         10 XOBJECT                         PIC X(4).           
         10  FILLER                         PIC X(01) VALUE '|'.
         10  SUB-OBJECT                     PIC X(2).           
         10  FILLER                         PIC X(01) VALUE '|'.
         10  REPORTING-CATEGORY             PIC X(4).           
         10  FILLER                         PIC X(01) VALUE '|'.
         10  CHARGE-CLASS                   PIC X(3).           
         10  FILLER                         PIC X(01) VALUE '|'.
         10  LINE-UNITS                     PIC X(7).           
         10  FILLER                         PIC X(01) VALUE '|'.
         10  LINE-AMOUNT                    PIC X(14).          
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  LINE-ACTION                    PIC X(1).            
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  FX-STATUS                      PIC X(05).           
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  LAST-USER                      PIC X(08).           
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  APPROVALS                      PIC X(05).           
         10  FILLER                         PIC X(01) VALUE '|'. 
         10  LAST-DATE                      PIC X(08).