PdcMaterial.BPricePerUnit

Declaration

BPricePerUnit as double

Description

Returns the real price per unit

Notes

This property returns (i.e. READ ONLY) the actual price per unit for a material and is obviously only of interest once production has been reported.

Code example

This code example opens a calculation, loops through its materials, and shows the actual price per unit for each one in a message box.

dim objCalc

  set objCalc = pdc.OpenCalculation("00685")
  for i = 0 to objCalc.MaterialList.Count -1
    set objMat = objCalc.MaterialList(i)
    msgbox "The area factor is" & objMat.BPricePerUnit
  next