Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
MechMachineMan
in reply to: Anonymous

There was a small typo in what I previously posted.

 

But yeah, it's telling us that it's seeing everything; just not letting us activate it. And if you were to try to activate an LOD while you have a BOM open, you would notice you can't, so that is certainly the issue.

 

You can make the rule work by trapping it in an error, or by using control definitions in a error loop to close the BOM. There is no function call I can see that actually lets you know when the BOM is open, so you pretty much have to deal with the error trapping.

 

Dim doc as AssemblyDocument = ThisDoc.Document
Dim oAsmCompDef As ComponentDefinition = doc.ComponentDefinition
    
Try
    oLOD = oAsmCompDef.RepresentationsManager.LevelOfDetailRepresentations.Item("iLogic")
Catch
     MsgBox("No iLogic LOD Found or error accessing it... Attemptin to add it!")

     Try 
         oLOD = oAsmCompDef.RepresentationsManager.LevelOfDetailRepresentations.Add("iLogic")
     Catch
         MsgBox("Unable to Add iLogic LOD!")
         Exit Sub
     End try
End try

Try
     oLOD.Activate
Catch
     MsgBox("Error ACTIVATING LOD")
     Exit Sub
End try

InventorVb.DocumentUpdate()

--------------------------------------
Did you find this reply helpful ? If so please use the 'Accept as Solution' or 'Like' button below.

Justin K
Inventor 2018.2.3, Build 227 | Excel 2013+ VBA
ERP/CAD Communication | Custom Scripting
Machine Design | Process Optimization


iLogic/Inventor API: Autodesk Online Help | API Shortcut In Google Chrome | iLogic API Documentation
Vb.Net/VBA Programming: MSDN | Stackoverflow | Excel Object Model
Inventor API/VBA/Vb.Net Learning Resources: Forum Thread

Sample Solutions:Debugging in iLogic ( and Batch PDF Export Sample ) | API HasSaveCopyAs Issues |
BOM Export & Column Reorder | Reorient Skewed Part | Add Internal Profile Dogbones |
Run iLogic From VBA | Batch File Renaming| Continuous Pick/Rename Objects

Local Help: %PUBLIC%\Documents\Autodesk\Inventor 2018\Local Help

Ideas: Dockable/Customizable Property Browser | Section Line API/Thread Feature in Assembly/PartsList API Static Cells | Fourth BOM Type