iMate conflict checking

[Anonymous]

How to ietrate thru assembly documet and find out any imate results are conflict in the Assembly document?

[Anonymous]

Solved !

 oAssyDoc = m_inventorApplication.ActiveDocument
        oAssyCompDef = oAssyDoc.ComponentDefinition

        Dim oConstraint As AssemblyConstraint
        Dim oObjectCol As ObjectCollection
        oObjectCol = m_inventorApplication.TransientObjects.CreateObjectCollection

        For Each oConstraint In oAssyCompDef.Constraints
            If oConstraint.HealthStatus = HealthStatusEnum.kInconsistentHealth Then
                oObjectCol.Add(oConstraint)
            End If
        Next

        If oObjectCol.Count <> 0 Then
            MsgBox(oObjectCol.Count & " - Inconsistent Constraints found in this Assembly, Please Correct it before using Bolt Insert")            
            Exit Sub
        End If

[Burnit87]

this works for me

find first part of imate in part occurrence

Dim iMatemate1a As iMateDefinition
For Each iMatemate1a In prtbakXocc.iMateDefinitions
If iMatemate1a.Name = "imate_name" Then
Exit For
End If
Next

find second part of imate in part occurrence

Dim iMatemate1b As iMateDefinition
For Each iMatemate1b In prtbakXocc.iMateDefinitions
If iMatematex1b.Name = "imate_name_2" Then
Exit For
End If
Next

add them together

Dim oiMateResult1 As iMateResult
oiMateResult1 = m_ThisAssembly.ComponentDefinition.iMateResults.AddByTwoiMates(iMatemate1a, iMatemate1b)