           02  STATUS-CODE               PIC 9(4) COMP-4.
           02  DETAILED-STATUS-CODE      PIC 9(4) COMP-4.
           02  SUCCESSOR-ID              PIC X(6).
           02  TERMINATION-INDICATOR     PIC X.
           02  LOCK-ROLLBACK-INDICATOR   PIC X.
           02  TRANSACTION-ID.
               03 YEAR                   PIC 9(4) COMP-4.
               03 DAY                    PIC 9(4) COMP-4.
               03 TIME                   PIC 9(9) COMP-4.
           02  DATA-DEF-REC-NAME         PIC X(7).
           02  DEFINED-FILE-NAME         PIC X(7).
           02  STANDARD-MSG-LINE-LENGTH  PIC 9(4) COMP-4.
           02  STANDARD-MSG-NUMBER-LINES PIC 9(4) COMP-4.
           02  WORK-AREA-LENGTH          PIC 9(4) COMP-4.
           02  CONTINUITY-DATA-INPUT-LENGTH  PIC 9(4) COMP-4.
           02  CONTINUITY-DATA-OUTPUT-LENGTH  PIC 9(4) COMP-4.
           02  WORK-AREA-INC             PIC 9(4) COMP-4.
           02  CONTINUITY-DATA-AREA-INC  PIC 9(4) COMP-4.
