Select Constraints

[al.popovich]

Good morning, Friends,

Is there a way to select all suppressed constraints, similar to select all suppressed components?

I have an automation project which suppresses and un-suppresses a lot of constraints as needed.

At the end of the project generation, I'd like to delete all the suppressed constraints.

Ideally, I'd like to go back into each component, from the top level assembly, to perform this.

Thank You, Al

[Andrii_Humeniuk · Accepted solution]

Hi @al.popovich . This rule looks for a suppressed constraint and removes it:

Sub main
	Dim oDoc As Document = ThisDoc.Document
	If Not TypeOf oDoc Is AssemblyDocument Then Exit Sub
	Dim oAsmDoc As AssemblyDocument = oDoc
	Dim oCnsts As AssemblyConstraints = oAsmDoc.ComponentDefinition.Constraints
	If oCnsts.Count = 0 Then Exit Sub
	For Each oCnst As AssemblyConstraint In oCnsts
		If oCnst.Suppressed Then oCnst.Delete()
	Next
End Sub

[al.popovich]

Very much appreciated!