Private _IgnoreRules As Boolean = False
 
''' <summary>
''' Gets or sets _IgnoreRules
''' </summary>
Public Property IgnoreRules() As Boolean
    Get
        Return Me._IgnoreRules
    End Get
    Set(ByVal value As Boolean)
        Me._IgnoreRules = value
    End Set
End Property
 
Protected Overrides Sub OnCheckRulesOnCurrentRow(ByVal e As MicroFour.StrataFrame.Business.CheckRulesEventArgs)
    '-- Only check the rules if _IgnoreRules is False

    If Not _IgnoreRules Then MyBase.OnCheckRulesOnCurrentRow(e)
End Sub