Description
Returns True if the given data matches the current checksum routine and False otherwise.
Applicable Events
Post Extract, AnyApp Post Extract, Pre-Verify, Interactive, Verification Function Key (F-Key), Post-Verify
Syntax
object.DataMatchesChecksumRoutine (strData, intRoutine)
Parameters
Object is a reference to the Form object. For more information, see Form Object (page Form Object).
DataMatchesChecksumRoutine is the command.
strData is a string expression representing data to test.
intRoutine is an integer value that represents a particular Checksum Routine. Use the constants listed below for the checksum routines that are listed under Checksum/Checkdigit Routines in the Rules Parameters window.
|
CS_8_OR_11_MOD_10 CS_990_CHECKDIGIT CS_ABN CS_ACCESSION CS_AIRLINE_TICKET CS_ALPHANUM_MOD10 CS_ALPHANUM_MOD11 CS_AMERLEGION_MOD11 CS_ASCII_MOD_100 CS_AVON_LINE CS_AVON_VENEZUELA CS_AVON9731 CS_BARCLAYS_TRANS CS_BARCODE_LUHN_FORMULA CS_BASIC_MOD7 CS_BELGIUM_VAT CS_BELGIUMBANKS CS_BIORAD CS_CITICORP CS_CREDITCARD |
CS_DAKOTA_MOD11 CS_DELTA CS_ELEVEN_DIGIT_MOD10 CS_EUROCHEQUE CS_FEDASO_MOD19 CS_HAWAII CS_HOSPITAL CS_KODAK_PERSONAL CS_KODAK23 CS_KOREAN_21 CS_KOREAN_731 CS_KOREAN_MOD11 CS_LA_WILDLIFE_DEPT CS_LTD CS_MAERSK_GREEN CS_MAERSK_RED CS_MERCEDES CS_METIER CS_MOD10LUHN CS_MOD11_RENTAL |
CS_MORTECH CS_NASS_MOD10 CS_NORWEGIAN CS_NPI_MOD_10_LUHN CS_PA_EMPLOYER_ACCT_NUM CS_PARKSEED CS_POLICY_CONTRACT CS_SCDR137 CS_SCDR21 CS_SCPR CS_SMITHKLINE CS_SPOKEN_KEY CS_TAP CS_TEN_DIGIT_MOD11 CS_TWA_MOD7 CS_UMPI CS_USAIR CS_USPS CS_VALIDATE_ABA_NUMBER CS_VIN CS_WA_STATE CS_WESTMERCIA |
Example
strdata=This.Value
blnResult = Form.DataMatchesChecksumRoutine(strdata,CS_CCREDITCARD)
If Len(strData) = 16 And blnResult = True Then
This.Hidden = True
Else
strTrmp = This.Value
strResult = InputBox("Card number not found - please re-enter")
If strResult <> strTemp Then
'MsgBox "Didn't match "
This.CustomMessage = "Please re-enter the card number"
This.Flagged =True
End If
End If