Role: Allows creating Design Unit under a Product.
Methods
- Func CreateDesignUnit() As
-
Creates the Design Unit inside a Product.
- Example:
-
- This Example creates a Design Unit inside a Product from scratch.
' Create a New Product Document Dim NewProdDoc As ProductDocument Set NewProdDoc = CATIA.Documents.Add("Product") ' Get the Product from the Product Document Dim RootPrd As Product Set RootPrd = NewProdDoc.Product ' Select the Product Document and Add the product to this selection Dim SelectionObj As Selection Set SelectionObj = NewProdDoc.Selection SelectionObj.Add RootPrd ' Create a SDD product from above Product Dim SddProductObj As SddProduct Set SddProductObj = SelectionObj.FindObject("CATIASddProduct") ' Create a Design Unit under this Product Dim SddDesignUnit As Part Set SddDesignUnit = SddProductObj.CreateDesignUnit ' Using this Part get the CustomerFactory Dim FactoryObj As SfmFactory Set FactoryObj = SddDesignUnit.GetCustomerFactory("SfmFactory") - This Example creates a Design Unit inside a Product from scratch.