All Frameworks Object Hierarchy This Framework Indexes
o Func GetApplObjFactFromVirtualType( | iApplicationID) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchObjFact As SchAppObjectFactory Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") Set objSchObjFact = objSchPlatformRoot.GetApplObjFactFromVirtualType("UserDefined")(
o Func GetApplicationObjectFactory( | iApplicationID) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchObjFact As SchAppObjectFactory Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") Set objSchObjFact = objSchPlatformRoot.GetApplicationObjectFactory("CatSchIDLCATPID")(
o Func GetCompGroupFromCatalog( | iCatalogEntryName, | |
iCtlgDoc) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchComponent As SchComponent Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") Dim objCtlgDoc As Document Set objCtlgDoc = CATIA.Documents.Open ("Electrical_ANSI_PartFunctions.catalog") Set objSchComponent = objSchPlatformRoot.GetCompGroupFromCatalog ("JuncBox-TermBoard",objCtlgDoc)
o Func GetCompSymbolFromCatalog( | iCatalogEntryName, | |
iCtlgDoc) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchGRRComp As SchGRRComp Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") Dim objCtlgDoc As Document Set objCtlgDoc = CATIA.Documents.Open ("PID_ANSI_Equipment.catalog") Set objSchGRRComp = objSchPlatformRoot.GetCompSymbolFromCatalog ("Blower",objCtlgDoc)
o Func GetComponents( | ) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchListComps As SchListOfObjects Set objoSchListComps = objSchPlatformRoot.GetComponents
o Func GetDrawingStandard( | ) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchLSymbols As SchListOfObjects Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") oDrwStd = objSchPlatformRoot.GetDrawingStandard
o Func GetDrawing( | ) As |
Dim objSchPlatformRoot As SchematicRoot Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") Dim objDrawRoot As DrawingRoot Set objDrawRoot = objSchPlatformRoot.GetDrawing
o Func GetInterface( | iInterfaceName, | |
iObject) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchObjFact As SchAppObjectFactory Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") Set objSchObjFact = SchPlatformRoot.GetApplicationObjectFactory("CatSchIDLCATPID") Set objSchObjFact2 = objSchPlatformRoot.GetInterface ("CATIASchAppObjectFactory2",SchObjFact)
o Func GetRefComponents( | ) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchListComps As SchListOfObjects Set objSchListComps = objSchPlatformRoot.GetRefComponents
o Func GetRoutes( | ) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchListRoutes As SchListOfObjects Set objSchListRoutes = objSchPlatformRoot.GetRoutes
o Func GetSchBaseFactory( | ) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchBaseFact As SchBaseFactory Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") Set objSchBaseFact = objSchPlatformRoot.GetBaseFactory
o Func GetSchematicSession( | ) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchSession As SchSession Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") Set objSchSession = objSchPlatformRoot.GetSession
o Func GetTemporaryListFactory( | ) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchList As SchTempListFactory Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") Set objSchList = objSchPlatformRoot.GetTemporaryListFactory
o Func GetUnassociatedSymbols( | ) As |
Dim objSchPlatformRoot As SchematicRoot Dim objSchLSymbols As SchListOfObjects Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") Set objSchLSymbols = objSchPlatformRoot.GetUnassociatedSymbols
o Sub SetDrawingStandard( | iDrwStd) |
Dim objSchPlatformRoot As SchematicRoot Dim objSchLSymbols As SchListOfObjects Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objSchPlatformRoot = objProductRoot.GetTechnologicalObject ("SchematicRoot") objSchPlatformRoot.SetDrawingStandard catISO
Copyright © 2003, Dassault Systèmes. All rights reserved.