CimProject.MeasurementManager (read-only property)

Gets the Alarm Class List object.
Syntax: Set CimMeasurementManager = object.MeasurementManager
Description: The CimProject.MeasurementManager property is read-only and returns the measurement system manager.

Example:

Dim project As CimProject
Set project = CreateObject("CimProject")
project.OpenLocalProject "d:\classes\classes.gef"
Dim measurementManager As CimMeasurementManager
Dim measurementAssocList As CimMeasurementAssociationList
Dim measurementAssoc As CimMeasurementAssociation
Dim measurementUnitList As CimMeasurementUnitList
Dim measurementUnit As CimMeasurementUnit
Set measurementManager = project.MeasurementManager
Set measurementUnitList = measurementManager.Units
Set measurementUnit = measurementUnitList.Item("METER")
Set measurementAssocList = measurementUnit.SystemAssociations
Set measurementAssoc = measurementAssocList.Item("Metric")
MsgBox measurementAssoc.SystemID