Find BOMRow Parent Row object

[Raider_71]

Hi guys,

Am I missing something here? I need to check and then initiate the parent BOM row from the current one. So basically I need to iterate upward through the tree up to the root BOM node.

This is what I have done (which does not work)

    Function GetBOMTreeTotalQTY(oRow As Inventor.BOMRow, intQTY As Integer) As Integer
        Dim oParentRow As Inventor.BOMRow

        If oRow.Parent IsNot Nothing Then
            oParentRow = oRow.Parent()   <== This is where it fails
            GetBOMTreeTotalQTY(oParentRow, oParentRow.ItemQuantity * intQTY)
        End If

        Return intQTY

    End Function

Can someone please tell me how to grab the parent BOM row. The help doc says the "parent" property is to find the BOMView OR BOMRow object so I am not sure.

Any help would be appreciated.

Cheers

[MechMachineMan · Accepted solution]

Hi.

As oParentRow is strongly typed, it will fail every time you run the code on a top BOMRow item as that would be trying to assign a BOMView to an object of type BOMRow.

Implement a check to see what type the .Parent is before assigning it to a strongly typed variable, or implement some error catching to handle such an issue.