Here are two rules that you should find useful. Remember if you are modifying a field, make sure it is not marked “Read-Only”! More rules to come:
Date Normalization in VBScript
On Error Resume Next
me.FIELD(“InvoiceDate”).Value = FormatDateTime(me.FIELD(“InvoiceDate”).Value, vbGeneralDate )
If Err.Number 0 Then
me.ERRORMESSAGE = “Error, Date is in Invalid Format”
me.CHECKSUCCEEDED = False
End If
Type Conversion, Numerical Compare in VBScript
Dim AIValue, temp
On Error Resume Next
temp = me.Field(“AnnualIncome”).VALUE
If Err.Number 0 Then
me.ERRORMESSAGE = “Error, Income is in Invalid Format”
me.CHECKSUCCEEDED = False
End If
AIValue = temp + 0
if AIValue > 1500 then
me.CheckSucceeded = true
else
me.ErrorMessage = “Warning! Low annual income”
me.CheckSucceeded = false
me.FOCUSEDFIELD = me.FIELD(“AnnualIncome”)
end if