03 OPEN-CHECK-HEADER-TABLE REDEFINES MTIOAREA. 05 DOCD-IOAREA. 10 OPCH-KEY-FIELDS. 15 BANK-ACCOUNT-CODE PIC X(2). 15 CHECK-ID. 20 TRANS-CODE PIC X(02). 20 CHECK-NUMBER. 25 CHECK-NUMBER-MAP PIC X(11). 25 FILLER PIC X(03). 10 OPCH-RESULT-FIELDS. 15 CHECK-DATE. 20 CHECK-YEAR. 25 CHECK-YEAR-CC PIC X(02). 25 CHECK-YEAR-YY PIC X(02). 20 CHECK-MONTH PIC XX. 20 CHECK-DAY PIC XX. 15 BACKUP-WITHHOLDING-X PIC X(14). 15 CHECK-AMOUNT-X PIC X(14). 15 CANCELED-CHECK PIC X(01). 15 VENDOR-CODE-R PIC X(11). 15 VENDOR-NAME PIC X(30). 15 VENDOR-ADDRESS-LINE1 PIC X(30). 15 VENDOR-ADDRESS-LINE2 PIC X(30). 15 VENDOR-ADDRESS-LINE3. 20 CITY-STATE. 25 CITY PIC X(18). 25 STATE PIC X(02). 20 ZIP-CODE PIC X(10). 15 CLOSED-DATE. 20 CLOSED-YEAR. 25 CLOSED-YEAR-CC PIC X(02). 25 CLOSED-YEAR-YY PIC X(02). 20 CLOSED-MONTH PIC X(02). 20 CLOSED-DAY PIC X(02). 15 INTERCEPT-AMT-X PIC X(14).