03 ALT-VPER-TABLE REDEFINES MTIOAREA. 00000001 10 VPER-KEY-FIELDS. 00000002 15 VENDOR-CODE. 00000003 20 VENDOR-NUMBER PIC X(10). 00000004 20 VENDOR-ADDR-IND PIC X(01). 00000005 10 VPER-RESULT-FIELDS. 00000006 15 PO-YTD-ORDERS PIC 9(06). 00000007 15 PO-CANCELLATIONS PIC 9(04). 00000008 15 PO-CAN-LINES PIC S9(04). 00000009 15 PO-YTD-ORDER-LINES PIC S9(06). 00000010 15 PO-FINAL-RC-LINES PIC 9(06). 00000011 15 PO-AVG-DEL-DAYS PIC S9(05). 00000012 15 PO-BACKORDERS PIC 9(04). 00000013 15 PO-OVER-SHIPS PIC 9(04). 00000014 15 PO-UNDER-SHIPS PIC 9(04). 00000015 15 PO-DAMAGED-SHIPS PIC 9(04). 00000016 15 PO-SUB-SHIPS PIC 9(04). 00000017 15 PO-DUP-SHIPS PIC 9(04). 00000018 15 PO-UNDER-BILLS PIC 9(04). 00000019 15 PO-OVER-BILLS PIC 9(04). 00000020 15 PO-LATE-DEL-DAYS PIC S9(06). 00000021 15 PG-YTD-ORDERS PIC 9(06). 00000022 15 PG-CANCELLATIONS PIC 9(04). 00000023 15 PG-CAN-LINES PIC S9(04). 00000024 15 PG-YTD-ORDER-LINES PIC S9(06). 00000025 15 PG-FINAL-RC-LINES PIC 9(06). 00000026 15 PG-AVG-DEL-DAYS PIC S9(05). 00000027 15 PG-BACKORDERS PIC 9(04). 00000028 15 PG-OVER-SHIPS PIC 9(04). 00000029 15 PG-UNDER-SHIPS PIC 9(04). 00000030 15 PG-DAMAGED-SHIPS PIC 9(04). 00000031 15 PG-SUB-SHIPS PIC 9(04). 00000032 15 PG-DUP-SHIPS PIC 9(04). 00000033 15 PG-UNDER-BILLS PIC 9(04). 00000034 15 PG-OVER-BILLS PIC 9(04). 00000035 15 PG-LATE-DEL-DAYS PIC S9(06). 00000036 15 PD-YTD-ORDERS PIC 9(06). 00000037 15 PD-CANCELLATIONS PIC 9(04). 00000038 15 PD-CAN-LINES PIC S9(04). 00000039 15 PD-YTD-ORDER-LINES PIC S9(06). 00000040 15 PD-FINAL-RC-LINES PIC 9(06). 00000041 15 PD-AVG-DEL-DAYS PIC S9(05). 00000042 15 PD-BACKORDERS PIC 9(04). 00000043 15 PD-OVER-SHIPS PIC 9(04). 00000044 15 PD-UNDER-SHIPS PIC 9(04). 00000045 15 PD-DAMAGED-SHIPS PIC 9(04). 00000046 15 PD-SUB-SHIPS PIC 9(04). 00000047 15 PD-DUP-SHIPS PIC 9(04). 00000048 15 PD-UNDER-BILLS PIC 9(04). 00000049 15 PD-OVER-BILLS PIC 9(04). 00000050 15 PD-LATE-DEL-DAYS PIC S9(06). 00000051 15 PTOT-YTD-ORDERS PIC 9(06). 00000052 15 PTOT-CANCELLATIONS PIC 9(04). 00000053 15 PTOT-CAN-LINES PIC S9(04). 00000054 15 PTOT-YTD-ORDER-LINES PIC S9(06). 00000055 15 PTOT-FINAL-RC-LINES PIC 9(06). 00000056 15 PTOT-AVG-DEL-DAYS PIC S9(05). 00000057 15 PTOT-BACKORDERS PIC 9(04). 00000058 15 PTOT-OVER-SHIPS PIC 9(04). 00000059 15 PTOT-UNDER-SHIPS PIC 9(04). 00000060 15 PTOT-DAMAGED-SHIPS PIC 9(04). 00000061 15 PTOT-SUB-SHIPS PIC 9(04). 00000062 15 PTOT-DUP-SHIPS PIC 9(04). 00000063 15 PTOT-UNDER-BILLS PIC 9(04). 00000064 15 PTOT-OVER-BILLS PIC 9(04). 00000065 15 BIDS-SENT PIC S9(06). 00000066 15 BID-RESPONSES PIC S9(06). 00000067 15 NO-BIDS PIC S9(06). 00000068 15 PR-YR-BIDS-SENT PIC S9(06). 00000069 15 PR-YR-BID-RESPONSES PIC S9(06). 00000070 15 PR-YR-NO-BIDS PIC S9(06). 00000100