03 APPROPRIATION-TABLE REDEFINES MTIOAREA. 00000001 05 DOCD-IOAREA. 00000002 10 APPR-KEY-FIELDS. 00000003 15 FISC-YEAR. 00000004 20 FISC-YEAR-CC PIC X(02). 00000005 20 FISC-YEAR-YY PIC X(02). 00000006 15 FUND-KEY PIC X(04). 00000007 15 AGENCY-KEY PIC X(03). 00000008 15 XORGANIZATION PIC X(04). 00000009 15 APPR-UNIT PIC X(09). 00000010 10 APPR-RESULT-FIELDS. 00000011 15 FUND PIC X(04). 00000012 15 AGENCY PIC X(03). 00000013 15 APPR-NAME PIC X(30). 00000014 15 APPR-SHORT-NAME PIC X(12). 00000015 15 APPROV-APPR-AMT PIC S9(14). 00000016 15 CUR-MOD-APPR-AMT PIC S9(14). 00000017 15 EST-RECEIPT-AMT PIC S9(14). 00000018 15 ACT-RECEIPT-AMT PIC S9(14). 00000019 15 BUD-AUTH-OPT PIC X(01). 00000020 15 TOTAL-ALLOT-AMT PIC S9(14). 00000021 15 PRE-ENCUMBERED-AMT PIC S9(14). 00000022 15 ENCUMBERED-AMT PIC S9(14). 00000023 15 EXPENDED-AMT PIC S9(14). 00000024 15 STATUS-IND PIC X(01). 00000025 15 BUD-LINE-CTR PIC S9(04). 00000026 15 BD-CUR-MOD-APPR-AMT PIC S9(14). 00000027 15 BD-PRE-ENCUM-AMT PIC S9(14). 00000028 15 BD-ENCUM-AMT PIC S9(14). 00000029 15 BD-EXPEND-AMT PIC S9(14). 00000030 15 APPR-TYPE PIC X(02). 00000031 15 APPR-END-DATE. 00000032 20 APPR-END-YEAR. 00000033 25 APPR-END-YEAR-CC PIC X(02). 00000034 25 APPR-END-YEAR-YY PIC X(02). 00000035 20 APPR-END-MONTH PIC X(02). 00000036 20 APPR-END-DAY PIC X(02). 00000037 15 MY-IND PIC X(01). 00000038 15 ORIG-EST-RECEIPT-AMT PIC S9(14). 00000039 15 BEGIN-CASH-BALANCE PIC S9(14). 00000040 15 REVERTED-AMOUNT PIC S9(14). 00000041 15 TRANSFER-IN-AMOUNT PIC S9(14). 00000042 15 TRANSFER-OUT-AMOUNT PIC S9(14). 00000043 15 PRIOR-YR-EXP-AMT PIC S9(14). 00000044 15 TOTAL-EXP-BUD-AMT PIC S9(14). 00000045 15 BUDGET-AUTH-AMT PIC S9(14). 00000046 15 AGENCY-RESERVE-AMT PIC S9(14). 00000047 15 RESTRICTED-AMT PIC S9(14). 00000102