01 MTI-LOG. 03 LOGREC-PREFIX. 05 LOGREC-RECLEN PIC S9(04) COMP. 05 LOGREC-TABNUM PIC X(4). 05 LOGREC-ACTION PIC X. 88 LOGREC-ACTION-ADD VALUE 'A'. 88 LOGREC-ACTION-CHANGE VALUE 'C'. 88 LOGREC-ACTION-DELETE VALUE 'D'. 05 LOGREC-DATE. 07 LOGREC-CC PIC XX. 07 LOGREC-YY PIC XX. 07 LOGREC-MM PIC XX. 07 LOGREC-DD PIC XX. 05 LOGREC-TIME. 07 LOGREC-TIME-HH PIC XX. 07 LOGREC-TIME-MM PIC XX. 07 LOGREC-TIME-SS PIC XX. 05 LOGREC-TABID PIC X(4). 05 LOGREC-TYPE PIC X. 03 NOTE-PAD-TABLE REDEFINES MTIOAREA. 05 DOCH-IOAREA. 10 NOTE-KEY-HEADER-FIELDS. 15 TRANS-CODE PIC X(02). 15 TRANS-NUMBER. 20 TRANS-NUMBER-AGENCY PIC X(03). 20 TRANS-NUMBER-NUMBER PIC X(11). 05 DOCD-IOAREA. 10 NOTE-PAD-TABLE-DETAIL. 15 NOTE-KEY-LINE-FIELDS. 20 TEXT-LINE-NUMBER PIC X(03). 15 NOTE-RESULT-FIELDS. 20 TEXT-LINE PIC X(70). 20 TEXT-LINE-FF-FL PIC X(01). 20 NOTE-DATE. 25 NOTE-DATE-YEAR. 30 NOTE-DATE-YEAR-CC PIC X(02). 30 NOTE-DATE-YEAR-YY PIC X(02). 25 NOTE-DATE-MONTH PIC X(02). 25 NOTE-DATE-DAY PIC X(02).