iLogic iPart update

[AbellS]

I have a rule designed to change iParts upon selection of the part name from a multi list param.

The rule is functioning fine in the lower sub assemblies but in my top assembly it fails to exicute. Even if I right click the rule and run it manually.

see below

Dim oFileName As String
Dim SheaveDia As String
Dim SheaveThx As String

oFileName = "DEV-0100MRL-S:1"'change this to match the name of the first part in the list above.

iPart.ChangeRow("Sheave:1",Parameter(oFileName, "MRL_Sheave"))
iPart.ChangeRow("Sheave:2",Parameter(oFileName, "MRL_Sheave"))
SheaveDia = iPart.CurrentRowStringValue("d2_Dia")/25.4
SheaveThx = iPart.CurrentRowStringValue("d0_Width")/25.4
Parameter("DEV-0100MRL-S:1", "d10_MRLSheaveDia1") = SheaveDia
Parameter("DEV-0100MRL-S:1", "d10_MRLSheaveTHK") = SheaveThx

InventorVb.DocumentUpdate()

trigger = iTrigger0