Attribute VB_Name = "ValidationRuleEnums"
' ValidationRuleEnums.bas
' Standard module for shared rule-type constants.
' Using Long constants instead of Enum to avoid VBA class-module ambiguity issues.
Option Explicit

Public Const ValRule_Required      As Long = 0
Public Const ValRule_Date          As Long = 1
Public Const ValRule_Number        As Long = 2
Public Const ValRule_CodeSelect    As Long = 3
Public Const ValRule_Range         As Long = 4
Public Const ValRule_Duplicate     As Long = 5
Public Const ValRule_Char          As Long = 6
Public Const ValRule_Varchar       As Long = 7
Public Const ValRule_Check01       As Long = 8
Public Const ValRule_Alphanumeric  As Long = 9
Public Const ValRule_Custom        As Long = 11

' --- Error Codes ---
Public Const ERR_REQUIRED  As String = "E002"
Public Const ERR_INVALID   As String = "E001"
Public Const ERR_RANGE     As String = "E004"
Public Const ERR_NOT_EXIST As String = "E004"
Public Const ERR_DUPLICATE As String = "E010"
Public Const ERR_CHARLEN   As String = "E006"
Public Const ERR_VARLEN    As String = "E007"
Public Const ERR_CHECK01   As String = "E008"
Public Const ERR_NUMDIGITS As String = "E014"