       01 Extend-Stat.
           03 Primary-Error              PIC X(2).
           03 Secondary-Error            PIC X(10).
       01 Text-Message                   PIC X(40).

       01 Acu-Show-Msg.
          05 Acu-Call-Fail-Code     PIC X(2).
          05 Acu-Msg-Id             PIC 9(3).
          05 Acu-Err-File           PIC X(30).

      * for message display
       78 Acu-Length VALUE 80.
       78 Acu-Full-Len VALUE 250.
       01 Acu-Msg-BOX.
      * Mb-Default-Icon, Mb-Warning-Icon, Mb-Error-Icon, 4:QUESTION
          05 Acu-Icon-Type PIC 9 VALUE 1.
      * Mb-Yes, Mb-No, Mb-Cancel
          05 Acu-Default-Button PIC 9 VALUE 1.
      * Mb-Ok, Mb-Yes-No, Mb-Ok-Cancel, Mb-Yes-No-Cancel
          05 Acu-Button-Type PIC 9 VALUE 1.
      * Mb-Yes, Mb-No, Mb-Cancel
          05 Acu-Return-Value PIC 9 VALUE 1.
          05 Acu-Msg-1 PIC X(Acu-Length).
          05 Acu-Msg-2 PIC X(Acu-Length).
          05 Acu-Msg-3 PIC X(Acu-Length).
          05 Acu-Msg-Text PIC X(Acu-Full-Len).

          05 Acu-Text-Ptr             SIGNED-SHORT.
          05 Acu-Size                 SIGNED-SHORT.


       77 Acu-Idx1                    PIC 9(3).
       77 Acu-Idx2                    PIC 9(3).
       77 Acu-Idx3                    PIC 9(3).
