* INV.COST FILE DEFINITION (IC)
*
EQU  IC$ITEM.WHSE            TO 00 ;* (ITEM*WHSE)
EQU  IC$DATE.RECEIVED        TO 01 ;* MV - newest to oldest date/cost
EQU  IC$QTY.RECEIVED         TO 02 ;* MV - total received at cost
EQU  IC$UNIT.COST            TO 03 ;* MV - cost
EQU  IC$SOURCE               TO 04 ;* MV - most recent source
EQU  IC$REFERENCE            TO 05 ;* MV - most recent reference
*
* end of inventory cost record