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 ALT-DDRQ-TABLE REDEFINES MTIOAREA. 05 DDRQ-HEADER-KEY-FIELDS. 07 DRAWDOWN-DATE. 10 DRAWDOWN-YEAR. 15 DDRQ-CENTURY PIC X(02). 15 DDRQ-YEAR PIC X(02). 10 DRAWDOWN-MONTH PIC X(02). 10 DRAWDOWN-DAY PIC X(02). 07 CMIA-DRAWDOWN-GRP PIC X(02). 07 FED-AID-AGENCY PIC X(03). 07 FED-AID-NUMBER PIC X(12). 05 DDRQ-LINE-KEY-FIELDS. 07 FUND PIC X(04). 07 AGENCY PIC X(03). 07 XORGANIZATION PIC X(04). 07 ACTIVITY PIC X(04). 07 APPROPRIATION-UNIT PIC X(09). 07 REPORTING-CATEGORY PIC X(04). 07 REVENUE-SOURCE PIC X(04). 07 DDRQ-TYPE PIC X(01). 05 DDRQ-LINE-RESULT-FIELDS. 07 DRAWDOWN-AMT-X PIC X(14). 07 CMIA-IN-CR-NUMBER. 10 CMIA-IN-CR-NUM-AGCY PIC X(03). 10 CMIA-IN-CR-NUM-NUM PIC X(11). 03 FILLER PIC X(1914).