03 ALT-REPV-TABLE REDEFINES MTIOAREA. 00000001 10 REPV-KEY-FIELDS. 00000002 15 PV-NUMBER. 00000003 20 ENTRY-NUM PIC X(09). 00000004 20 DATE-FILLER PIC X(02). 00000005 15 LINE-NO PIC X(02). 00000006 10 REPV-RESULT-FIELDS. 00000007 15 LINE-FIELDS. 00000008 20 REF-TRANS-ID. 00000009 25 REF-TRANS-CODE PIC X(02). 00000010 25 REF-TRANS-NUMBER. 00000011 30 REF-TRANS-NUMBER-AGC PIC X(03). 00000012 30 REF-TRANS-NUMBER-NUM PIC X(11). 00000013 20 REF-TRANS-LINE PIC X(2). 00000014 20 VENDOR-INVOICE PIC X(12). 00000015 20 FUND PIC X(04). 00000016 20 AGENCY PIC X(03). 00000017 20 XORGANIZATION PIC X(04). 00000018 20 SUB-ORG PIC X(02). 00000019 20 ACTIVITY PIC X(04). 00000020 20 OBJECT PIC X(04). 00000021 20 SUB-OBJECT PIC X(02). 00000022 20 REVENUE-SOURCE PIC X(04). 00000023 20 SUB-REV-SOURCE PIC X(02). 00000024 20 BS-ACCOUNT PIC X(04). 00000025 20 XFUNCTION PIC X(04). 00000026 20 JOB-NUMBER PIC X(08). 00000027 20 REPORTING-CATEGORY PIC X(04). 00000028 20 DISCOUNT-TYPE PIC X(01). 00000029 20 DESCRIPTION-FIELD. 00000030 25 LINE-DESCRIPTION-27 PIC X(27). 00000031 25 PC-LINE-NUM PIC X(03). 00000032 20 LINE-AMOUNT PIC X(14). 00000033 20 INC-DEC-IND PIC X. 00000034 20 P-F-FLAG PIC X(01). 00000035 20 APPR-UNIT PIC X(09). 00000036 20 LINE-TAX-CODE PIC X(03). 00000037 20 VENDOR-INV-LINE-NUM PIC X(03). 00000038 20 QUANTITY-X PIC X(12). 00000039 15 HEADER-PV-KEYS-LINE. 00000040 20 SUBMITTING-AGENCY PIC X(03). 00000041 20 FREQUENCY-TYPE PIC X(01). 00000042 20 ENTRY-START-DATE. 00000043 25 ENTRY-START-YEAR. 00000044 30 ENTRY-START-YEAR-CC PIC X(02). 00000045 30 ENTRY-START-YEAR-YY PIC X(02). 00000046 25 ENTRY-START-MONTH PIC X(02). 00000047 25 ENTRY-START-DAY PIC X(02). 00000048 20 ENTRY-END-DATE. 00000049 25 ENTRY-END-YEAR. 00000050 30 ENTRY-END-YEAR-CC PIC X(02). 00000051 30 ENTRY-END-YEAR-YY PIC X(02). 00000052 25 ENTRY-END-MONTH PIC X(02). 00000053 25 ENTRY-END-DAY PIC X(02). 00000054 20 LATEST-DATE-POSTED. 00000055 25 LATEST-DATE-YEAR. 00000056 30 LATEST-DATE-YEAR-CC PIC X(02). 00000057 30 LATEST-DATE-YEAR-YY PIC X(02). 00000058 25 LATEST-DATE-MONTH PIC X(02). 00000059 25 LATEST-DATE-DAY PIC X(02). 00000060 20 TYPE-OF-VOUCHER PIC X(01). 00000061 20 SCHED-PYMT-DATE. 00000062 25 SCHED-PYMT-YEAR. 00000063 30 SCHED-PYMT-YEAR-CC PIC X(02). 00000064 30 SCHED-PYMT-YEAR-YY PIC X(02). 00000065 25 SCHED-PYMT-MONTH PIC X(02). 00000066 25 SCHED-PYMT-DAY PIC X(02). 00000067 20 FIXED-ASSET-IND PIC X(01). 00000068 20 OFF-LIAB-ACCT PIC X(04). 00000069 20 VENDOR-CODE. 00000070 25 VENDOR-NUMBER PIC X(10). 00000071 25 VENDOR-ADDR-IND PIC X(01). 00000072 20 CHECK-CATEGORY PIC X(2). 00000073 20 SINGLE-CHECK-FLAG PIC X(1). 00000074 20 SELLER-FUND PIC X(04). 00000075 20 SELLER-AGENCY PIC X(03). 00000076 20 SELLER-ORG PIC X(04). 00000077 20 SELLER-SUB-ORG PIC X(02). 00000078 20 SELLER-ACTIVITY PIC X(04). 00000079 20 SELLER-REV-SOURCE PIC X(04). 00000080 20 SELLER-SUB-REV-SRCE PIC X(02). 00000081 20 SELLER-FUNCTION PIC X(04). 00000082 20 SELLER-JOB-NUMBER PIC X(08). 00000083 20 SELLER-REPT-CAT PIC X(04). 00000084 20 SELLER-OBJECT PIC X(04). 00000085 20 SELLER-SUB-OBJ PIC X(02). 00000086 20 SELLER-BS-ACCT PIC X(04). 00000087 20 OFFSET-REC-ACCT PIC X(04). 00000088 20 SELLER-APPR-UNIT PIC X(09). 00000089 20 HEADER-TAX-CODE PIC X(03). 00000090 20 EFT-IND PIC X(01). 00000091 20 APPLICATION-TYPE PIC X(02). 00000100 20 BUDGET-FY