03 REAL-BIDH-TABLE                    REDEFINES MTIOAREA.     00000001
                 10  BIDH-KEY-FIELDS.                                   00000002
                  15  BID-ID.                                           00000003
                   20  BID-NUMBER                     PIC X(10).        00000004
                   20  BID-SUFFIX                     PIC X(01).        00000005
                  15  VENDOR-CODE.                                      00000006
                   20  VENDOR-NUMBER                  PIC X(10).        00000007
                   20  VENDOR-ADDR-IND                PIC X(01).        00000008
                 10  BIDH-RESULT-FIELDS.                                00000009
                  15  FOB-POINT                       PIC X(01).        00000010
                  15  RESPONSE-DATE.                                    00000011
                   20  RESPONSE-YEAR.                                   00000012
                       25  RESPONSE-YEAR-CC           PIC X(02).        00000013
                       25  RESPONSE-YEAR-YY           PIC X(02).        00000014
                   20  RESPONSE-MONTH                 PIC X(02).        00000015
                   20  RESPONSE-DAY                   PIC X(02).        00000016
                  15  QUOTATION-BY                    PIC X(20).        00000017
                  15  QUOTATION-NUMBER                PIC X(20).        00000018
                  15  DELIVERY-DATE.                                    00000019
                   20  DELIVERY-YEAR.                                   00000020
                       25  DELIVERY-YEAR-CC           PIC X(02).        00000021
                       25  DELIVERY-YEAR-YY           PIC X(02).        00000022
                   20  DELIVERY-MONTH                 PIC X(02).        00000023
                   20  DELIVERY-DAY                   PIC X(02).        00000024
                  15  ACTUAL-BID                      PIC S9(14).       00000025
                  15  COMMENTS-30                     PIC X(30).        00000026
                  15  LOW-BID-INDICATOR               PIC X(01).        00000027
                  15  TERMS                           PIC X(12).        00000028
                  15  NO-BID-INDICATOR                PIC X(01).        00000029
                  15  DISCOUNT-9                      PIC S9(6)V99.     00000030
                  15  BID-RESP-TEXT                   PIC X(01).        00000031
                  15  WHOLE-BID                       PIC X(01).        00000032
                  15  BT-IND-FLAG                     PIC X(01).        00000033
                  15  NO-RESPONSE-IND                 PIC X(01).        00000040
                  15  NUM-OF-RESPONSES                PIC 9(04).        00000100