03 ACCOUNTING-PRD-TABLE               REDEFINES MTIOAREA.     00000001
              05  DOCD-IOAREA.                                          00000002
                 10  APRD-KEY-FIELDS.                                   00000003
                  15  FISC-YEAR.                                        00000004
                   20  FISC-YEAR-CC                   PIC X(02).        00000005
                   20  FISC-YEAR-YY                   PIC X(02).        00000006
                  15  FISC-MONTH                      PIC X(02).        00000007
                 10  APRD-RESULT-FIELDS.                                00000008
                  15  FISC-QUARTER                    PIC X(01).        00000009
                  15  FISC-MONTH-NAME                 PIC X(12).        00000010
                  15  FISC-MONTH-END-DATE.                              00000011
                   20  FISC-MONTH-END-YEAR.                             00000012
                     25  FISC-MONTH-END-YEAR-CC       PIC X(02).        00000013
                     25  FISC-MONTH-END-YEAR-YY       PIC X(02).        00000014
                   20  FISC-MONTH-END-MONTH           PIC X(02).        00000015
                   20  FISC-MONTH-END-DAY             PIC X(02).        00000016
                  15  CLOSED-PERIOD-IND               PIC X(01).        00000017
                  15  Y-E-ADJ-PRD-IND                 PIC X(01).        00000020
                  15  MNTH-END-PRCSS-IND              PIC X(01).        00000100