PdcToolList.Add

Declaration

Add(Value as String) as PdcTool

Description

Returns a new added tool object

Notes

This property adds a tool to the toollist. The parameter is the code of the tool in the master data.

Code example

This code example adds a tool to the first operation's toollist.

dim objCalc
dim objOperation
dim objTools
dim objTool

  set objCalc = pdc.ActiveCalculation
  set objOperation = objCalc.OperationList(0)
  set objTools = objOperation.Tools
  set objTool = objTools.Add("toolnumber")
  objTool.Number = 1

   'the short version: objCalc.OperationList(0).Tools.Add("toolnumber")

Availability

Available since March 2008.