All Frameworks Object Hierarchy This Framework Indexes
o Sub UpdateAllInstancesFromReference( | iCompLocalRef) |
' --- get SchUpdateInstances interface Dim objCurrentDoc As Document Dim objPrdRoot As Product Dim objSchRoot As SchematicRoot Dim objUpdateInstances As SchUpdateInstances Set objCurrentDoc = CATIA.ActiveDocument Set objPrdRoot = objCurrentDoc.Product Set objSchRoot = objPrdRoot.GetTechnologicalObject ("SchematicRoot") Set objUpdateInstances = objSchRoot.GetInteface ("CATIASchUpdateInstances",objCurrentDoc) ' --- get the local reference Dim objPrdInst As Product Dim objPrdRef As Product Dim objCompRef As SchComponent ' --- get an instance, objPrdInst from the selected set of objects Set objPrdInst = objCurrentDoc.Selection.FindObject("CATIAProduct") Set objPrdRef = objPrdInst.ReferenceProduct Set objCompRef = objSchRoot.GetInterface ("CATIASchComponent",objPrdRef) ' --- update all the instances objUpdateInstances.UpdateAllInstancesFromReference objCompRef
Copyright © 2003, Dassault Systèmes. All rights reserved.