03  CUSC-RECORD                        REDEFINES MTIOAREA.   00000001
               05  CUSC-RECORD-KEY.                                     00000002
                   07  CUSTOMER-ID.                                     00000003
                       09  CUST-CODE                    PIC X(10).      00000004
                       09  CUST-ADDR-IND                PIC X(01).      00000005
               05  CUSC-RESULT-FIELDS.                                  00000006
                   07  NUMBER-NSF-CHECK                 PIC 9(03).      00000007
                   07  LAST-NSF-DATE.                                   00000008
                       09  LAST-NSF-DATE-YR.                            00000009
                           11  LAST-NSF-DATE-CC         PIC X(02).      00000010
                           11  LAST-NSF-DATE-YY         PIC X(02).      00000011
                       09  LAST-NSF-DATE-MNTH           PIC X(02).      00000012
                       09  LAST-NSF-DATE-DAY            PIC X(02).      00000013
                   07  NUMB-REC-INT                     PIC 9(03).      00000014
                   07  LAST-INT-DATE.                                   00000015
                       09  LAST-INT-DATE-YR.                            00000016
                           11  LAST-INT-DATE-CC         PIC X(02).      00000017
                           11  LAST-INT-DATE-YY         PIC X(02).      00000018
                       09  LAST-INT-DATE-MNTH           PIC X(02).      00000019
                       09  LAST-INT-DATE-DAY            PIC X(02).      00000020
                   07  NUMB-REC-COLL                    PIC 9(03).      00000021
                   07  LAST-COLL-DATE.                                  00000022
                       09  LAST-COLL-DATE-YR.                           00000023
                           11  LAST-COLL-DATE-CC        PIC X(02).      00000024
                           11  LAST-COLL-DATE-YY        PIC X(02).      00000025
                       09  LAST-COLL-DATE-MNTH          PIC X(02).      00000026
                       09  LAST-COLL-DATE-DAY           PIC X(02).      00000027
                   07  NUMB-REC-AG                      PIC 9(03).      00000028
                   07  LAST-AG-DATE.                                    00000029
                       09  LAST-AG-DATE-YR.                             00000030
                           11  LAST-AG-DATE-YR-CC       PIC X(02).      00000031
                           11  LAST-AG-DATE-YR-YY       PIC X(02).      00000032
                       09  LAST-AG-DATE-MNTH            PIC X(02).      00000033
                       09  LAST-AG-DATE-DAY             PIC X(02).      00000034
                   07  NUMB-REC-WO                      PIC 9(03).      00000035
                   07  LAST-WO-DATE.                                    00000036
                       09  LAST-WO-DATE-YR.                             00000037
                           11  LAST-WO-DATE-YR-CC       PIC X(02).      00000038
                           11  LAST-WO-DATE-YR-YY       PIC X(02).      00000039
                       09  LAST-WO-DATE-MNTH            PIC X(02).      00000040
                       09  LAST-WO-DATE-DAY             PIC X(02).      00000100