PdcMaterial.BKind

Declaration

BKind as pdcMaterialKind

Description

Returns the real kind

Notes

This property returns (i.e. READ ONLY) the actual materialkind 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 materialkind 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.BKind
  next