CATIArrWorkbench Interfaces Use Case

Arrangement

CATIArrWorkbench Interfaces Use Case

This example shows how to create a .feat file, read the file, create Nomenclatures and other data and save the file. Help is taken of a macro. This macro has a reference to CATIArrWorkbench Interface (referred to as Workbench in the reference Visual Basic document).

PslNomenBuildFeat is launched after CATIA is up and the reference document is opened.

PslNomenBuildFeat.CATScript is located in the runtime directory Operating System (say intel_a)\code\command

CAAPslNomenBuildFeat includes the following steps:

Prolog
Create the Feat Document
Get Nomenclature data from new document, ArrWorkbench, Save the Feat Document
Epilog

Prolog

  ...
  a) Open the Input Document with Arrangement objects. 
  b) Run the macro.	
  ...

Create the Feat Document

...
   Dim objCATIAV5Document0 As Document
   Dim objCATIAV5FeatDocument As Document
   Dim objCATIAV5ArrWorkbench0 As Workbench
   Set objCATIAV5Document0 = CATIA.ActiveDocument
   '//---------- Get Arrworkbench from current document
   Set objCATIAV5ArrWorkbench0 = objCATIAV5Document0.GetWorkbench  ( "ArrWorkbench" ) 
   '//---------- Create a new .feat document 
   Set objCATIAV5FeatDocument = objCATIAV5ArrWorkbench0.CreateFeatDocument ("CATfct")
...

Get Nomenclature data from new document, ArrWorkbench, Save the Feat Document.

...
   Dim objCATIAV5ArrWorkbench1 As Workbench
   Dim objCATIAV5ArrNomTree1 As ArrNomenclatureTree
   Dim objCATIAV5ArrNomTopNode As ArrNomenclatures
   '//---------- Get Arrworkbench from the new ".feat" document
   Set objCATIAV5ArrWorkbench1 = objCATIAV5FeatDocument.GetWorkbench  ( "ArrWorkbench" ) 
   '//---------- Add a nomenclature hierachy tree to the .feat document 
   Set objCATIAV5ArrNomTree1 = objCATIAV5ArrWorkbench1.AddNomenclatureTree
   '//---------- Access the root of the tree
   Set objCATIAV5ArrNomTopNode = objCATIAV5ArrNomTree1.BaseNomenclatures
   '//----------  Create nomenclature
   Set objCATIAV5oArrNom = objCATIAV5ArrNomTopNode.AddUserNomenclature
            (strFeatIntSysName, strFeatIconName, strFeatNLSName, strFeatSuperTypeName)
   '---------- Save the .feat document
   strOutputFileName = strCATIAV5FeatOutputFileName + ".CATfct"
   '---------- Use the workbench save, so as to remove LifeCycleObject also
   objCATIAV5ArrWorkbench1.SaveFeatDocument strOutputFileName, objCATIAV5FeatDocument
 ...

Epilog

Thus we saw how to read a CATProduct document, retrieve the interface we are interested in and generate a report on these objects

...
End Sub

[Top]

In Short

Thus we saw how to read a CATProduct document, retrieve the interface we are interested in and generate a report on these objects.

[Top]

References

[1]	Replaying a macro
[Top]