Error getting BOMRows

[Anonymous]

Can someone please help with an error I'm getting when I try to access the BOMRowsEnumerator object ???

Dim oAsmComp As ComponentDefinition = oRefDoc.ComponentDefinition

Dim oBOM As BOM = oAsmComp.BOM

oBOM.StructuredViewEnabled = True
oBOM.StructuredViewFirstLevelOnly = False

Dim oBOMView As BOMView = oBOM.BOMViews("Structured")

Dim oBOMRows As BOMRowsEnumerator = oBOMView.BOMRows

The error is generated on the red line and the details of it are:

System.Runtime.InteropServices.COMException (0x80004005): Unspecified error (Exception from HRESULT: 0x80004005 (E_FAIL))
at System.RuntimeType.ForwardCallToInvokeMember(String memberName, BindingFlags flags, Object target, Int32[] aWrapperTypes, MessageData& msgData)
at Inventor.BOMView.get_BOMRows()
at Costing.LmiRuleScript.PartCount(AssemblyDocument oRefDoc, StreamWriter oWrite, Int32& oCount, Int32& oManuPartCount, Int32& oAssemblyCount, Int32& oFastenerCount, Int32& oComponentCount)
at Costing.LmiRuleScript.OpTime(Document oRefDoc, StreamWriter oWrite, Int32 Amount)
at Costing.LmiRuleScript.Main()
at Autodesk.iLogic.Exec.AppDomExec.ExecRuleInAssembly(Assembly assem)
at iLogic.RuleEvalContainer.ExecRuleEval(String execRule)

[bradeneuropeArthur]

this works:

Dim oRefDoc As Inventor.AssemblyDocument
oRefDoc = ThisDoc.Document

Dim oAsmComp As Inventor.AssemblyComponentDefinition = oRefDoc.ComponentDefinition
 
Dim oBOM As BOM = oAsmComp.BOM


oBOM.StructuredViewEnabled = True
oBOM.StructuredViewFirstLevelOnly = False

 
Dim oBOMView As BOMView = oBOM.BOMViews("Structured")
 
Dim oBOMRows As BOMRowsEnumerator = oBOMView.BOMRows

[Anonymous]

I run this rule in a sequence along with other rules. What I was finding is that it worked just fine when ran on its own. When run in sequence with other it would generate the error.

I got down to the bottom of which other rule was causing this one to fail. The rule that runs just before this one contained this:

AddVbFile "RunAllRulesUnderDocument.txt"

Dim ruleRunner = New RunAllRulesUnderDocument(iLogicVb, Component, "Base Data.ipt")
Dim doc = ThisDoc.Document ' This is required (indirectly) by the external rule so that it can use Inventor objects.

ruleRunner.RunAllRules("Top")

After commenting this out I don't get the error anymore when run in sequence. Any idea why this could cause that error?

[bradeneuropeArthur]

Hi,

Be careful with declaring always as "document".

if meant Part than as "partDocument"

If meant Assembly as "Assemblydocument"

If meant drawing as "DrawingDocument"

This will be  the issue I think!

[MechMachineMan]

To further elaborate, it has been outlined in a blog by an Autodesk employee that the GENERIC document class does not work with the ComponentDefinition method in all cases, and is prone to issues. It is therefore better to use the specific document type if you are going to be accessing the component definition.

[bradeneuropeArthur]

we say toppie, for the explanation!

Again!

[FRFR1426]

This can also happen when there is some missing references in the assembly (on 2021. On 2016, there is no exception thrown).