topic Re: Add Custom iproperty columns with ilogic ? in Inventor Programming Forum

Add Custom iproperty columns with ilogic ?

Darkforce_the_ilogic_guy — Wed, 24 Jan 2024 09:47:51 GMT

is there a way to add Custom iProperty columns with Ilogic ? If not is that a good way to update all our old files to a news standard setup ?

sdf

Re: Add Custom iproperty columns with ilogic ?

Andrii_Humeniuk — Wed, 24 Jan 2024 10:26:51 GMT

Hi @Darkforce_the_ilogic_guy .With the ExportBOMCustomization and ImportBOMCustomization methods, you can first save your BOM table settings to an XML file and then import those settings to all your assemblies.

Re: Add Custom iproperty columns with ilogic ?

Darkforce_the_ilogic_guy — Wed, 24 Jan 2024 11:16:13 GMT

how would i do that with ilogic ?

Re: Add Custom iproperty columns with ilogic ?

m_baczewski — Wed, 24 Jan 2024 11:33:41 GMT

Hello,

At the beginning, it is necessary to remember to manually edit the table and then export it to a specific location.

Dim oDoc As Document
oDoc = ThisApplication.ActiveDocument

Dim oBom As BOM
oBom = oDoc.ComponentDefinition.BOM

oBom.ImportBOMCustomization("Your .xml BOM customization path") ' C:\Users\YOU\Desktop\BOMcustomization.xml

InventorVb.DocumentUpdate()

Re: Add Custom iproperty columns with ilogic ?

Andrii_Humeniuk — Wed, 24 Jan 2024 11:49:38 GMT

Example of exporting settings:

Dim oDoc As Document = ThisDoc.Document If oDoc.DocumentType <> DocumentTypeEnum.kAssemblyDocumentObject Then Exit Sub Dim oADoc As AssemblyDocument = oDoc Dim oBOM As BOM = oADoc.ComponentDefinition.BOM Dim sPathFile As String = "D:\BOM.xml" oBOM.ExportBOMCustomization(sPathFile)

Example of importing settings:

Line 5 is the path to the .xml file.

If you need to update the BOM table in sub-assemblies, you can use the For each statement, here is an example:

Dim oDoc As Document = ThisDoc.Document If oDoc.DocumentType <> DocumentTypeEnum.kAssemblyDocumentObject Then Exit Sub Dim oADoc As AssemblyDocument = oDoc Dim sPathFile As String = "D:\BOM.xml" For Each oRefDoc As Document In oADoc.AllReferencedDocuments If oRefDoc.DocumentType <> DocumentTypeEnum.kAssemblyDocumentObject Then Continue For If Not oRefDoc.IsModifiable Then Continue For Dim oBOM As BOM = oRefDoc.ComponentDefinition.BOM Try : oBOM.ImportBOMCustomization(sPathFile) : Catch : End Try Next