05 COMMODITY-TABLE 00000005 10 COMMODITY-CODE PIC X(14). 00000006 10 BUYER-CODE PIC X(02). 00000007 10 XGROUP PIC X(01). 00000008 10 INVENTORY-IND PIC X(01). 00000009 10 EXPEDITOR PIC X(02). 00000010 10 SCHEDULED-LET PIC X(01). 00000011 10 STANDARD-SPECS PIC X(01). 00000012 10 STANDARD-UNIT PIC X(04). 00000013 10 YTD-PURCHASES PIC S9(14). 00000014 10 FIXED-ASSET-IND PIC X(01). 00000015 10 DESCRIPTION-60 PIC X(60). 00000016 10 COMMENTS-60 PIC X(60). 00000017 10 TWM-FLAG PIC X(01). 00000018 10 UNIT-COST-FLAG PIC X(01). 00000019 10 LAST-UNIT-COST PIC X(14). 00000020 10 COMM-CLASS PIC X(03). 00000021 10 COMM-SUB-CLASS PIC X(02). 00000022 10 OBJECT PIC X(04). 00000023 10 PG-IND PIC X(01). 00000024 10 MSDS-IND PIC X(01). 00000025 10 APPROVAL-GROUP. 00000026 15 APPROVE-GROUP-1 PIC X(02). 00000027 15 APPROVE-GROUP-2 PIC X(02). 00000028 15 APPROVE-GROUP-3 PIC X(02). 00000029 15 APPROVE-GROUP-4 PIC X(02). 00000030 15 APPROVE-GROUP-5 PIC X(02). 00000031 15 APPROVE-GROUP-6 PIC X(02). 00000032 15 APPROVE-GROUP-7 PIC X(02). 00000033 15 APPROVE-GROUP-8 PIC X(02). 00000034 15 APPROVE-GROUP-9 PIC X(02). 00000035 15 APPROVE-GROUP-10 PIC X(02). 00000036 10 COMM-APPRV-AMT PIC S9(14). 00000037 10 TAX-CODE PIC X(03). 00000038 10 SUB-OBJECT PIC X(02). 00000100 10 PARTIAL-PAYMENT-IND PIC X(01).