03 POOL-BASE-DEF-TABLE                REDEFINES MTIOAREA.     00000001
              05  DOCD-IOAREA.                                          00000002
                 10  PBDF-KEY-LINE-FIELDS.                              00000003
                  15  GROUP-NO                        PIC X(05).        00000004
                  15  STEP-NO                         PIC X(06).        00000005
                  15  FUND                            PIC X(04).        00000006
                  15  AGENCY                          PIC X(03).        00000007
                  15  XORGANIZATION                   PIC X(04).        00000008
                  15  SUB-ORG                         PIC X(02).        00000009
                  15  ACTIVITY                        PIC X(04).        00000010
                  15  XFUNCTION                       PIC X(04).        00000011
                  15  OBJ-REV-IND                     PIC X(01).        00000012
                  15  OBJ-REV-CLS-IND                 PIC X(01).        00000013
                  15  OBJ-REV-CODE                    PIC X(04).        00000014
                  15  SUB-OBJ-REV                     PIC X(02).        00000015
                  15  JOB-NUMBER                      PIC X(08).        00000016
                  15  REPORTING-CATEGORY              PIC X(04).        00000017
                  15  PROJECT-DATA                    PIC X(08).        00000018
                  15  APPR-UNIT                       PIC X(09).        00000019
                 10  PBDF-NON-KEY-LINE-FIELDS.                          00000020
                  15  POOL-BASE-IND                   PIC X(01).        00000021
                  15  BASE-TYPE                       PIC X(01).        00000022
                  15  REF-STEP-NO                     PIC X(06).        00000023
                  15  FWD-REF-STEP-NO                 PIC X(06).        00000024
                  15  PERCENT-X                       PIC X(10).        00000025
                  15  STAT-UNITS-X                    PIC X(18).        00000026
                  15  INCLUDE-EXCLUDE-IND             PIC X(01).        00000027
                  15  OFF-FUND                        PIC X(04).        00000028
                  15  OFF-AGENCY                      PIC X(03).        00000029
                  15  OFF-XORGANIZATION               PIC X(04).        00000030
                  15  OFF-SUB-ORG                     PIC X(02).        00000031
                  15  OFF-ACTIVITY                    PIC X(04).        00000032
                  15  OFF-OBJ-REV-IND                 PIC X(01).        00000033
                  15  OFF-OBJ-REV-CODE                PIC X(04).        00000034
                  15  OFF-SUB-OBJ-REV                 PIC X(02).        00000035
                  15  OFF-JOB-NUMBER                  PIC X(08).        00000036
                  15  OFF-FUNCTION                    PIC X(04).        00000037
                  15  OFF-REPT-CATG                   PIC X(04).        00000038
                  15  OFF-PROJECT                     PIC X(08).        00000039
                  15  OFF-APPR-UNIT                   PIC X(09).        00000040
                  15  OFF-OPTION                      PIC X(01).        00000100