03 FAID-STATUS-TABLE                  REDEFINES MTIOAREA.     00000001
              05  DOCD-IOAREA.                                          00000002
                 10  FAID-STATUS                      PIC X(02).        00000003
                 10  STATUS-DESC                      PIC X(30).        00000010
                 10  STATUS-SHORT-NAME                PIC X(12).        00000100