As I know, this functionallity doesn't support yet.
Try this, it works for me:
Somewhere on the top level:
Rule bDisplayThreadFeature As Boolean = true ' (or false)
Apply these rules to each type of view (see the picture below):
' Returns "True" If the object(parent) of the drawing view is assembly
Rule bIsAssemblyType As Boolean
If Model.IsKindOf?(:IvAssemblyDocument) Then
Return True
Else
Return False
End If
End Rule
' Shows the thread features on the assembly drawing views only
Rule DisplayThreadFeatures As Any
Dim oInvApp As Any = %%InventorApplication
Dim oDrawDoc As Any = oInvApp.ActiveDocument
Dim oSheet As Any = oDrawDoc.ActiveSheet
Dim oDrawViews As Any = oSheet.DrawingViews
If bIsAssemblyType Then
If bDisplayThreadFeature Then
For i = 1 To oDrawViews.Count
If oDrawViews.get_Item(i).DisplayThreadFeatures = False Then
Dim oView As Any = oDrawViews.get_Item(i)
oView.DisplayThreadFeatures = True
End If
Next
Else
For i = 1 To oDrawViews.Count
If oDrawViews.get_Item(i).DisplayThreadFeatures = True Then
Dim oView As Any = oDrawViews.get_Item(i)
oView.DisplayThreadFeatures = False
End If
Next
End If
Else
Return NoValue
End If
End Rule
' Calls the "DisplayThreadFeatures" rule
Child DisplayThread As :BasePart
render? = (DisplayThreadFeatures <> NoValue)
showInModelBrowser? = False
End Child

Win10 x64
Xeon E5-1630
32 Gb RAM
Quadro K5200
Inventor 2020.3.4, Build 373