topic Re: Change bom-structure with a custom parameter in Inventor Forum

Change bom-structure with a custom parameter

stefan.godfroid — Fri, 08 Feb 2019 07:23:24 GMT

Hello

I want to change the bom-structur with a custom parameter (TEKENINGCODE).

The bom-structure must be Purchased when TEKENINGCODE= B, LB, LK, T, D, DS or K

The bom-structure must be Inseperable when TEKENINGCODE= L

The bom-structure must be Phantom when TEKENINGCODE= x

in other cases (other letters, or nothing entered), then the bom-structure must be normal.

How can i do that with I-logic?

Thanks

Re: Change bom-structure with a custom parameter

Sergio.D.Suárez — Fri, 08 Feb 2019 08:30:58 GMT

in part, you can use an ilogic like this, changing the multiple value will change the BOM reference

Dim oDoc As Document = ThisApplication.ActiveDocument
'kDefaultBOMStructure 51969 The default structure type.
'kInseparableBOMStructure 51974 The inseparable structure type.
'kNormalBOMStructure 51970 The normal structure type.
'kPhantomBOMStructure 51971 The phantom structure type.
'kPurchasedBOMStructure 51973 The purchased structure type.
'kReferenceBOMStructure 51972 The reference structure type.
'kVariesBOMStructure 51975 The structure type varies amongst references.

' TEKENINGCODE is user parameter in part
If TEKENINGCODE ="L"
oDoc.ComponentDefinition.BOMStructure = BOMStructureEnum.kInseparableBOMStructure
Else
	If TEKENINGCODE ="x"
	oDoc.ComponentDefinition.BOMStructure = BOMStructureEnum.kPhantomBOMStructure
	Else
	oDoc.ComponentDefinition.BOMStructure = BOMStructureEnum.kNormalBOMStructure
	End If
End If
InventorVb.DocumentUpdate()

Re: Change bom-structure with a custom parameter

stefan.godfroid — Wed, 02 Oct 2019 11:19:54 GMT

But TEKENCODE is a Custom iproperties. Sorry for the wrong info.

And the purchased bomstructure?

When the Custom ipropertie TEKENCODE= B, LB, LK, T, D, DS or K, then the bomstructure must be set to Purchased.

When the Custom ipropertie TEKENCODE= L, then he bomstructure must be set to inseperable

When the Custom ipropertie TEKENCODE= x, then he bomstructure must be set to phantom

In other cases (other letters, or nothing entered), then the bom-structure must be normal.

How can it be done with ilogic?

Re: Change bom-structure with a custom parameter

Sergio.D.Suárez — Wed, 02 Oct 2019 13:31:01 GMT

Hello, you can try the following code, I think it should work.

Dim oDoc As Document = ThisApplication.ActiveDocument
oDoc.ComponentDefinition.BOMStructure = 51970
On Error Resume Next

Dim oProp As String = iProperties.Value("Custom", "TEKENINGCODE") 

If oProp = "L" Then oDoc.ComponentDefinition.BOMStructure =  51974
If oProp = "x" Then oDoc.ComponentDefinition.BOMStructure =  51971

If oProp = "B" Or oProp = "LB" Or oProp = "LK" Or _
	oProp = "T" Or oProp = "D" Or oProp = "DS" Or oProp = "K" Then
	oDoc.ComponentDefinition.BOMStructure = 51973
End If

InventorVb.DocumentUpdate()

'kDefaultBOMStructure 51969 The default structure type.
'kInseparableBOMStructure 51974 The inseparable structure type.
'kNormalBOMStructure 51970 The normal structure type.
'kPhantomBOMStructure 51971 The phantom structure type.
'kPurchasedBOMStructure 51973 The purchased structure type.
'kReferenceBOMStructure 51972 The reference structure type.
'kVariesBOMStructure 51975 The structure type varies amongst references.

I hope this helps. Regards

Re: Change bom-structure with a custom parameter

stefan.godfroid — Thu, 17 Oct 2019 08:27:02 GMT

It seems to be working!

Thanks!