var digits = "0123456789";
var lowercaseLetters = "abcdefghijklmnopqrstuvwxyz"
var uppercaseLetters = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
var whitespace = " \t\n\r";
var decimalPointDelimiter = "."
var phoneNumberDelimiters = "()- ";
var validUSPhoneChars = digits + phoneNumberDelimiters;
var validWorldPhoneChars = digits + phoneNumberDelimiters + "+";
var SSNDelimiters = "- ";
var validSSNChars = digits + SSNDelimiters;
var digitsInSocialSecurityNumber = 9;
var digitsInUSPhoneNumber = 10;
var ZIPCodeDelimiters = "-";
var ZIPCodeDelimeter = "-"
var validZIPCodeChars = digits + ZIPCodeDelimiters
var digitsInZIPCode1 = 5
var digitsInZIPCode2 = 9
var creditCardDelimiters = " "
var mPrefix = "You did not enter a value into the "
var mSuffix = " field. This is a required field. Please enter it now."
var sUSLastName = "Last Name"
var sUSFirstName = "First Name"
var sWorldLastName = "Family Name"
var sWorldFirstName = "Given Name"
var sTitle = "Title"
var sCompanyName = "Company Name"
var sUSAddress = "Street Address"
var sWorldAddress = "Address"
var sCity = "City"
var sStateCode = "State Code"
var sWorldState = "State, Province, or Prefecture"
var sCountry = "Country"
var sZIPCode = "ZIP Code"
var sWorldPostalCode = "Postal Code"
var sPhone = "Phone Number"
var sFax = "Fax Number"
var sDateOfBirth = "Date of Birth"
var sExpirationDate = "Expiration Date"
var sEmail = "Email"
var sSSN = "Social Security Number"
var sCreditCardNumber = "Credit Card Number"
var sOtherInfo = "Other Information"
var iStateCode = "This field must be a valid two character U.S. state abbreviation (like CA for California). Please reenter it now."
var iZIPCode = "This field must be a 5 or 9 digit U.S. ZIP Code (like 30305). Please reenter it now."
var iUSPhone = "This field must be a 10 digit U.S. phone number (like 415 555 1212). Please reenter it now."
var iWorldPhone = "This field must be a valid international phone number. Please reenter it now."
var iSSN = "This field must be a 9 digit U.S. social security number (like 123 45 6789). Please reenter it now."
var iEmail = "This field must be a valid email address (like firstlast@myprovidername.com). Please reenter it now."
var iURL = "This field must be a valid Website address (like www.companyname.com). Please reenter it now."
var iCreditCardPrefix = "This is not a valid "
var iCreditCardSuffix = " credit card number. (Click the link on this form to see a list of sample numbers.) Please reenter it now."
var iDay = "This field must be a day number between 1 and 31.  Please reenter it now."
var iMonth = "This field must be a month number between 1 and 12.  Please reenter it now."
var iYear = "This field must be a 2 or 4 digit year number.  Please reenter it now."
var iDatePrefix = "The Day, Month, and Year for "
var iDateSuffix = " do not form a valid date.  Please reenter them now."
var pEntryPrompt = "Please enter a "
var pStateCode = "2 character code (like CA)."
var pZIPCode = "5 or 9 digit U.S. ZIP Code (like 94043)."
var pUSPhone = "10 digit U.S. phone number (like 415 555 1212)."
var pWorldPhone = "international phone number."
var pSSN = "9 digit U.S. social security number (like 123 45 6789)."
var pEmail = "valid email address (like foo@bar.com)."
var pCreditCard = "valid credit card number."
var pDay = "day number between 1 and 31."
var pMonth = "month number between 1 and 12."
var pYear = "2 or 4 digit year number."
var defaultEmptyOK = false
function makeArray(n) {
   for (var i = 1; i <= n; i++) {
      this[i] = 0
   } 
   return this
}

var daysInMonth = makeArray(12);
daysInMonth[1] = 31;
daysInMonth[2] = 29;   
daysInMonth[3] = 31;
daysInMonth[4] = 30;
daysInMonth[5] = 31;
daysInMonth[6] = 30;
daysInMonth[7] = 31;
daysInMonth[8] = 31;
daysInMonth[9] = 30;
daysInMonth[10] = 31;
daysInMonth[11] = 30;
daysInMonth[12] = 31;

var USStateCodeDelimiter = "|";
var USStateCodes = "AL|AK|AS|AZ|AR|CA|CO|CT|DE|DC|FM|FL|GA|GU|HI|ID|IL|IN|IA|KS|KY|LA|ME|MH|MD|MA|MI|MN|MS|MO|MT|NE|NV|NH|NJ|NM|NY|NC|ND|MP|OH|OK|OR|PW|PA|PR|RI|SC|SD|TN|TX|UT|VT|VI|VA|WA|WV|WI|WY|AE|AA|AE|AE|AP"

function isEmpty(s)
{   return ((s == null) || (s.length == 0))
}

function right(s,n)
{
	return s.substring(s.length - n,s.length)
}

function isWhitespace (s)

{   var i;

    if (isEmpty(s)) return true;

    for (i = 0; i < s.length; i++)
    {   
        var c = s.charAt(i);

        if (whitespace.indexOf(c) == -1) return false;
    }

    return true;
}

function stripCharsInBag (s, bag)

{   var i;
    var rs = "";

    for (i = 0; i < s.length; i++)
    {   
        var c = s.charAt(i);
        if (bag.indexOf(c) == -1) rs += c;
    }

    return rs;
}

function stripCharsNotInBag (s, bag)

{   var i;
    var rs = "";
    for (i = 0; i < s.length; i++)
    {   
        var c = s.charAt(i);
        if (bag.indexOf(c) != -1) rs += c;
    }

    return rs;
}

function stripWhitespace (s)

{   return stripCharsInBag (s, whitespace)
}

function charInString (c, s)
{   for (i = 0; i < s.length; i++)
    {   if (s.charAt(i) == c) return true;
    }
    return false
}

function stripInitialWhitespace (s)

{   var i = 0;

    while ((i < s.length) && charInString (s.charAt(i), whitespace))
       i++;
    
    return s.substring (i, s.length);
}

function isLetter (c)
{   return ( ((c >= "a") && (c <= "z")) || ((c >= "A") && (c <= "Z")) )
}

function isDigit (c)
{   return ((c >= "0") && (c <= "9"))
}

function isLetterOrDigit (c)
{   return (isLetter(c) || isDigit(c))
}

function isInteger (s)

{   var i;

    if (isEmpty(s)) 
       if (isInteger.arguments.length == 1) return defaultEmptyOK;
       else return (isInteger.arguments[1] == true);

    for (i = 0; i < s.length; i++)
    {   
        var c = s.charAt(i);

        if (!isDigit(c)) return false;
    }

    return true;
}

function isSignedInteger (s)

{   if (isEmpty(s)) 
       if (isSignedInteger.arguments.length == 1) return defaultEmptyOK;
       else return (isSignedInteger.arguments[1] == true);

    else {
        var startPos = 0;
        var secondArg = defaultEmptyOK;

        if (isSignedInteger.arguments.length > 1)
            secondArg = isSignedInteger.arguments[1];

        // skip leading + or -
        if ( (s.charAt(0) == "-") || (s.charAt(0) == "+") )
           startPos = 1;    
        return (isInteger(s.substring(startPos, s.length), secondArg))
    }
}

function isPositiveInteger (s)
{   var secondArg = defaultEmptyOK;

    if (isPositiveInteger.arguments.length > 1)
        secondArg = isPositiveInteger.arguments[1];

    return (isSignedInteger(s, secondArg)
         && ( (isEmpty(s) && secondArg)  || (parseInt (s) > 0) ) );
}

function isNonnegativeInteger (s)
{   var secondArg = defaultEmptyOK;

    if (isNonnegativeInteger.arguments.length > 1)
        secondArg = isNonnegativeInteger.arguments[1];

    return (isSignedInteger(s, secondArg)
         && ( (isEmpty(s) && secondArg)  || (parseInt (s) >= 0) ) );
}

function isNegativeInteger (s)
{   var secondArg = defaultEmptyOK;

    if (isNegativeInteger.arguments.length > 1)
        secondArg = isNegativeInteger.arguments[1];

    return (isSignedInteger(s, secondArg)
         && ( (isEmpty(s) && secondArg)  || (parseInt (s) < 0) ) );
}

function isNonpositiveInteger (s)
{   var secondArg = defaultEmptyOK;

    if (isNonpositiveInteger.arguments.length > 1)
        secondArg = isNonpositiveInteger.arguments[1];

    return (isSignedInteger(s, secondArg)
         && ( (isEmpty(s) && secondArg)  || (parseInt (s) <= 0) ) );
}

function isFloat (s)

{   var i;
    var seenDecimalPoint = false;

    if (isEmpty(s)) 
       if (isFloat.arguments.length == 1) return defaultEmptyOK;
       else return (isFloat.arguments[1] == true);

    if (s == decimalPointDelimiter) return false;

    for (i = 0; i < s.length; i++)
    {   
        var c = s.charAt(i);

        if ((c == decimalPointDelimiter) && !seenDecimalPoint) seenDecimalPoint = true;
        else if (!isDigit(c)) return false;
    }
    return true;
}

function isSignedFloat (s)

{   if (isEmpty(s)) 
       if (isSignedFloat.arguments.length == 1) return defaultEmptyOK;
       else return (isSignedFloat.arguments[1] == true);

    else {
        var startPos = 0;
        var secondArg = defaultEmptyOK;

        if (isSignedFloat.arguments.length > 1)
            secondArg = isSignedFloat.arguments[1];

        if ( (s.charAt(0) == "-") || (s.charAt(0) == "+") )
           startPos = 1;    
        return (isFloat(s.substring(startPos, s.length), secondArg))
    }
}

function isAlphabetic (s)

{   var i;

    if (isEmpty(s)) 
       if (isAlphabetic.arguments.length == 1) return defaultEmptyOK;
       else return (isAlphabetic.arguments[1] == true);

    for (i = 0; i < s.length; i++)
    {   
        var c = s.charAt(i);

        if (!isLetter(c))
        return false;
    }

    return true;
}

function isAlphanumeric (s)

{   var i;

    if (isEmpty(s)) 
       if (isAlphanumeric.arguments.length == 1) return defaultEmptyOK;
       else return (isAlphanumeric.arguments[1] == true);

    for (i = 0; i < s.length; i++)
    {   
        var c = s.charAt(i);

        if (! (isLetter(c) || isDigit(c) ) )
        return false;
    }

    return true;
}

function reformat (s)

{   var arg;
    var sPos = 0;
    var resultString = "";

    for (var i = 1; i < reformat.arguments.length; i++) {
       arg = reformat.arguments[i];
       if (i % 2 == 1) resultString += arg;
       else {
           resultString += s.substring(sPos, sPos + arg);
           sPos += arg;
       }
    }
    return resultString;
}

function isSSN (s)
{   
	var sWork = s;
	if (isEmpty(sWork)) 
       if (isSSN.arguments.length == 1) return defaultEmptyOK;
       else return (isSSN.arguments[1] == true);
    return (isInteger(sWork) && sWork.length == digitsInSocialSecurityNumber)
}

function isUSPhoneNumber (s)
{   if (isEmpty(s)) 
       if (isUSPhoneNumber.arguments.length == 1) return defaultEmptyOK;
       else return (isUSPhoneNumber.arguments[1] == true);
    return (isInteger(s) && s.length == digitsInUSPhoneNumber)
}

function isInternationalPhoneNumber (s)
{   if (isEmpty(s)) 
       if (isInternationalPhoneNumber.arguments.length == 1) return defaultEmptyOK;
       else return (isInternationalPhoneNumber.arguments[1] == true);
    return (isPositiveInteger(s))
}

function isZIPCode (s)
{  if (isEmpty(s)) 
       if (isZIPCode.arguments.length == 1) return defaultEmptyOK;
       else return (isZIPCode.arguments[1] == true);
   return (isInteger(s) && 
            ((s.length == digitsInZIPCode1) ||
             (s.length == digitsInZIPCode2)))
}

function isStateCode(s)
{   if (isEmpty(s)) 
       if (isStateCode.arguments.length == 1) return defaultEmptyOK;
       else return (isStateCode.arguments[1] == true);
    return ( (USStateCodes.indexOf(s) != -1) &&
             (s.indexOf(USStateCodeDelimiter) == -1) )
}

function isEmail (s)
{   if (isEmpty(s)) 
       if (isEmail.arguments.length == 1) return defaultEmptyOK;
       else return (isEmail.arguments[1] == true);
   
    if (isWhitespace(s)) return false;
    var i = 1;
    var j = 1;
    var sLength = s.length;
    var re = / /i;

	if (s.search(re) != -1)	return false; 

    while ((i < sLength) && (s.charAt(i) != "@"))
    { i++
    }
    if ((i >= sLength) || (s.charAt(i) != "@")) return false;
    else i += 2;

    j = i - 1;
    while ((j < sLength) && (s.charAt(j) != "@"))
    { j++
    }
    if (s.charAt(j) == "@") return false;

    if ((s.charAt(0) == ".") || (s.charAt(i - 1) == ".") || (s.charAt(i - 3) == ".")) return false;

	while ((i < sLength) && (s.charAt(i) != "."))
	{ i++
	}
	if ((i >= sLength - 1) || (s.charAt(i) != ".")) return false;

    while (i < sLength)
    {
		while ((i < sLength) && (s.charAt(i) != "."))
		{ i++
		}
		if (((i >= sLength - 1) && (s.charAt(i) == ".")) || ((s.charAt(i+1) == ".") && (s.charAt(i) == "."))) return false;
		i++;
	}
	return true;
}

function isURL (s)
{   if (isEmpty(s)) 
       if (isURL.arguments.length == 1) return defaultEmptyOK;
       else return (isURL.arguments[1] == true);
   
    if (isWhitespace(s)) return false;
    
    var i = 1;
    var sLength = s.length;
    var re = / /i;

	if (s.search(re) != -1)	return false; 
	
	var n = 0;
	var L = sLength;
    while (L >= 0) 
    { 
		if (s.charAt(L) == ".")
		{
			n++
			var Y = sLength - L;
			var R = sLength - Y;
			L = -1;
		}
		L--;
    }
	if ((n >= 1) && (Y <= 5) && (Y > 1) && (R >= 1)) return true;
	else return false;
}

function isYear (s)
{   if (isEmpty(s)) 
       if (isYear.arguments.length == 1) return defaultEmptyOK;
       else return (isYear.arguments[1] == true);
    if (!isNonnegativeInteger(s)) return false;
    return ((s.length == 2) || (s.length == 4));
}

function isIntegerInRange (s, a, b)
{   if (isEmpty(s)) 
       if (isIntegerInRange.arguments.length == 1) return defaultEmptyOK;
       else return (isIntegerInRange.arguments[1] == true);

    if (!isInteger(s, false)) return false;

    var num = parseInt (s);
    return ((num >= a) && (num <= b));
}

function isMonth (s)
{   if (isEmpty(s)) 
       if (isMonth.arguments.length == 1) return defaultEmptyOK;
       else return (isMonth.arguments[1] == true);
    return isIntegerInRange (s, 1, 12);
}

function isDay (s)
{   if (isEmpty(s)) 
       if (isDay.arguments.length == 1) return defaultEmptyOK;
       else return (isDay.arguments[1] == true);   
    return isIntegerInRange (s, 1, 31);
}

function daysInFebruary (year)
{
    return (  ((year % 4 == 0) && ( (!(year % 100 == 0)) || (year % 400 == 0) ) ) ? 29 : 28 );
}

function isDate (year, month, day)
{   
    if (! (isYear(year, false) && isMonth(month, false) && isDay(day, false))) return false;
    var intYear = parseInt(year);
    var intMonth = parseInt(month);
    var intDay = parseInt(day);

    if (intDay > daysInMonth[intMonth]) return false; 

    if ((intMonth == 2) && (intDay > daysInFebruary(intYear))) return false;

    return true;
}
function isTime (s)
{   
    if (isWhitespace(s)) return true;
    var i = 0;
    var hour = 0;
    var minute = 0;
    var sLength = s.length;
    while (i < sLength) 
    { 
		while ((i < sLength) && (s.charAt(i) != ":") && (s.charAt(i) != " ") && (s.charAt(i) != "A") && (s.charAt(i) != "P") && (s.charAt(i) != "a") && (s.charAt(i) != "p"))
		{
			if (isInteger(s.charAt(i))) i++;
			else return false; 
		}
		if (s.charAt(i) == ":")
		{
			if ((i == 0) || (isInteger(s.charAt(i+1)) == false) || (isInteger(s.charAt(i+2)) == false) || (isInteger(s.charAt(i+3)) == true)) return false; // colon in first position (no hours)
			else 
			{
				hour = s.substring(0,i);
				minute = s.substring(i+1,i+3);
				if ((hour == 0) ||(hour > 12)) return false;
				if (minute > 59) return false;
				i++;
			}
		}
		else
		{
			if ((i == 0) || (i == sLength - 1)) return false; 
			else
			{
				if (s.charAt(i) == " ")
				{
					if (hour == 0)
					{
						hour = s.substring(0,i);
						if ((hour == 0) ||(hour > 12)) return false;
					}	
					if ((s.charAt(i+1) != "A") && (s.charAt(i+1) != "P") && (s.charAt(i+1) != "a") && (s.charAt(i+1) != "p")) return false;
					else i++;
				}
				if (hour == 0)
				{
					hour = s.substring(0,i);
					if ((hour == 0) ||(hour > 12)) return false;
				}	
				if ((s.charAt(i+1) == "m") || (s.charAt(i+1) == "M")) return true;
				else return false; 
			}
			return true;
		}
		return true;
    }
    return true;
}

function formatTime(s)
{
    var i = 0;
    var spaceflag = 0;
    var minuteflag = false;
    var returnstring = "";
    var sLength = s.length;
    
    s = s.toUpperCase();

	while ((i < sLength) && (s.charAt(i) != "A") && (s.charAt(i) != "P"))
	{ 
		if (s.charAt(i) == ":") minuteflag = true;
		if (s.charAt(i) == " ") spaceflag = true;
		i++;
	}
	if (minuteflag == false)
	{
		if (spaceflag == false)
		{
			returnstring = s.substring(0,i);
			returnstring = returnstring + ":00";
		}
		else
		{
			returnstring = s.substring(0,i-1);
			returnstring = returnstring + ":00 ";
		}
	}
	else returnstring = s.substring(0,i);
	if (spaceflag == false)
	{
		returnstring = returnstring + " ";
	}
	returnstring = returnstring + s.substring(i,sLength);
	return returnstring;
}

function sprompt (s)
{   window.status = s
}

function promptEntry (s)
{   window.status = pEntryPrompt + s
}

function warnEmpty (theField, s)
{   
    alert(mPrefix + s + mSuffix)
    return false
}

function warnInvalid (theField, s)
{   
    alert(s);
    return false;
}


function checkString (theField, s, emptyOK)
{   
	if (checkString.arguments.length == 2) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    if (isWhitespace(theField.value)) 
       return warnEmpty (theField, s);
    else return true;
}

function checkStateCode (theField, emptyOK)
{   if (checkStateCode.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    {  theField.value = theField.value.toUpperCase();
       if (!isStateCode(theField.value, false)) 
          return warnInvalid (theField, iStateCode);
       else return true;
    }
}

function reformatZIPCode (ZIPString)
{   if (ZIPString.length == 5) return ZIPString;
    else return (reformat (ZIPString, "", 5, "-", 4));
}

function checkZIPCode (theField, emptyOK)
{   if (checkZIPCode.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    { var normalizedZIP = stripCharsInBag(theField.value, ZIPCodeDelimiters)
      if (!isZIPCode(normalizedZIP, false)) 
         return warnInvalid (theField, iZIPCode);
      else 
      {  
         theField.value = reformatZIPCode(normalizedZIP)
         return true;
      }
    }
}

function reformatUSPhone (USPhone)
{   return (reformat (USPhone, "(", 3, ") ", 3, "-", 4))
}


function checkUSPhone (theField, emptyOK, silent)
{   if (checkUSPhone.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    {  var normalizedPhone = stripCharsInBag(theField.value, phoneNumberDelimiters)
       if (!isUSPhoneNumber(normalizedPhone, false)) 
          if (silent == true) return false;
			else return warnInvalid (theField, iUSPhone);
       else 
       {  
          theField.value = reformatUSPhone(normalizedPhone)
          return true;
       }
    }
}

function checkInternationalPhone (theField, emptyOK)
{   if (checkInternationalPhone.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    {  if (!isInternationalPhoneNumber(theField.value, false)) 
          return warnInvalid (theField, iWorldPhone);
       else return true;
    }
}
function checkEmail (theField, emptyOK)
{   if (checkEmail.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else if (!isEmail(theField.value, false)) 
       return warnInvalid (theField, iEmail);
    else return true;
}
function checkURL (theField, emptyOK)
{   if (checkURL.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else if (!isURL(theField.value, false)) 
       return warnInvalid (theField, iURL);
    else return true;
}
function reformatSSN (SSN)
{   return (reformat (SSN, "", 3, "-", 2, "-", 4))
}
function checkSSN (theField, emptyOK, silent)
{   
	var theFieldWork = theField;
	if (checkSSN.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theFieldWork.value))) return true;
    else
    {  var normalizedSSN = stripCharsInBag(theFieldWork.value, SSNDelimiters)
       if (!isSSN(normalizedSSN, false)) 
          if (silent == true) return false;
             else return  warnInvalid (theField, iSSN);
       else 
       {
          theField.value = reformatSSN(normalizedSSN);
          return true;
       }
    }
}
function checkYear (theField, emptyOK)
{   if (checkYear.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    if (!isYear(theField.value, false)) 
       return warnInvalid (theField, iYear);
    else return true;
}
function checkMonth (theField, emptyOK)
{   if (checkMonth.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    if (!isMonth(theField.value, false)) 
       return warnInvalid (theField, iMonth);
    else return true;
}
function checkDay (theField, emptyOK)
{   if (checkDay.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    if (!isDay(theField.value, false)) 
       return warnInvalid (theField, iDay);
    else return true;
}
function checkDate (yearField, monthField, dayField, labelString, OKtoOmitDay)
{
    if (checkDate.arguments.length == 4) OKtoOmitDay = false;
    if (!isYear(yearField.value)) return warnInvalid (yearField, iYear);
    if (!isMonth(monthField.value)) return warnInvalid (monthField, iMonth);
    if ( (OKtoOmitDay == true) && isEmpty(dayField.value) ) return true;
    else if (!isDay(dayField.value)) 
       return warnInvalid (dayField, iDay);
    if (isDate (yearField.value, monthField.value, dayField.value))
       return true;
    alert (iDatePrefix + labelString + iDateSuffix)
    return false
}
function getRadioButtonValue (radio)
{   for (var i = 0; i < radio.length; i++)
    {   if (radio[i].checked) { break }
    }
    return radio[i].value
}

function checkCreditCard (radio, theField)
{   var cardType = getRadioButtonValue (radio)
    var normalizedCCN = stripCharsInBag(theField.value, creditCardDelimiters)
    if (!isCardMatch(cardType, normalizedCCN)) 
       return warnInvalid (theField, iCreditCardPrefix + cardType + iCreditCardSuffix);
    else 
    {  theField.value = normalizedCCN
       return true
    }
}

function isCreditCard(st) {
  if (st.length > 19)
    return (false);

  sum = 0; mul = 1; l = st.length;
  for (i = 0; i < l; i++) {
    digit = st.substring(l-i-1,l-i);
    tproduct = parseInt(digit ,10)*mul;
    if (tproduct >= 10)
      sum += (tproduct % 10) + 1;
    else
      sum += tproduct;
    if (mul == 1)
      mul++;
    else
      mul--;
  }

  if ((sum % 10) == 0)
    return (true);
  else
    return (false);

} 
function isVisa(cc)
{
  if (((cc.length == 16) || (cc.length == 13)) &&
      (cc.substring(0,1) == 4))
    return isCreditCard(cc);
  return false;
} 
function isMasterCard(cc)
{
  firstdig = cc.substring(0,1);
  seconddig = cc.substring(1,2);
  if ((cc.length == 16) && (firstdig == 5) &&
      ((seconddig >= 1) && (seconddig <= 5)))
    return isCreditCard(cc);
  return false;

} 
function isAmericanExpress(cc)
{
  firstdig = cc.substring(0,1);
  seconddig = cc.substring(1,2);
  if ((cc.length == 15) && (firstdig == 3) &&
      ((seconddig == 4) || (seconddig == 7)))
    return isCreditCard(cc);
  return false;

} 


function isDinersClub(cc)
{
  firstdig = cc.substring(0,1);
  seconddig = cc.substring(1,2);
  if ((cc.length == 14) && (firstdig == 3) &&
      ((seconddig == 0) || (seconddig == 6) || (seconddig == 8)))
    return isCreditCard(cc);
  return false;
}

function isCarteBlanche(cc)
{
  return isDinersClub(cc);
}

function isDiscover(cc)
{
  first4digs = cc.substring(0,4);
  if ((cc.length == 16) && (first4digs == "6011"))
    return isCreditCard(cc);
  return false;

}

function isEnRoute(cc)
{
  first4digs = cc.substring(0,4);
  if ((cc.length == 15) &&
      ((first4digs == "2014") ||
       (first4digs == "2149")))
    return isCreditCard(cc);
  return false;
}


function isJCB(cc)
{
  first4digs = cc.substring(0,4);
  if ((cc.length == 16) &&
      ((first4digs == "3088") ||
       (first4digs == "3096") ||
       (first4digs == "3112") ||
       (first4digs == "3158") ||
       (first4digs == "3337") ||
       (first4digs == "3528")))
    return isCreditCard(cc);
  return false;

}


function isAnyCard(cc)
{
  if (!isCreditCard(cc))
    return false;
  if (!isMasterCard(cc) && !isVisa(cc) && !isAmericanExpress(cc) && !isDinersClub(cc) &&
      !isDiscover(cc) && !isEnRoute(cc) && !isJCB(cc)) {
    return false;
  }
  return true;

}

function isCardMatch (cardType, cardNumber)
{

	cardType = cardType.toUpperCase();
	var doesMatch = true;

	if ((cardType == "VISA") && (!isVisa(cardNumber)))
		doesMatch = false;
	if ((cardType == "MASTERCARD") && (!isMasterCard(cardNumber)))
		doesMatch = false;
	if ( ( (cardType == "AMERICANEXPRESS") || (cardType == "AMEX") )
                && (!isAmericanExpress(cardNumber))) doesMatch = false;
	if ((cardType == "DISCOVER") && (!isDiscover(cardNumber)))
		doesMatch = false;
	if ((cardType == "JCB") && (!isJCB(cardNumber)))
		doesMatch = false;
	if ((cardType == "DINERS") && (!isDinersClub(cardNumber)))
		doesMatch = false;
	if ((cardType == "CARTEBLANCHE") && (!isCarteBlanche(cardNumber)))
		doesMatch = false;
	if ((cardType == "ENROUTE") && (!isEnRoute(cardNumber)))
		doesMatch = false;
	return doesMatch;

}

function IsCC (st) {
    return isCreditCard(st);
}

function IsVisa (cc)  {
  return isVisa(cc);
}

function IsVISA (cc)  {
  return isVisa(cc);
}

function IsMasterCard (cc)  {
  return isMasterCard(cc);
}

function IsMastercard (cc)  {
  return isMasterCard(cc);
}

function IsMC (cc)  {
  return isMasterCard(cc);
}

function IsAmericanExpress (cc)  {
  return isAmericanExpress(cc);
}

function IsAmEx (cc)  {
  return isAmericanExpress(cc);
}

function IsDinersClub (cc)  {
  return isDinersClub(cc);
}

function IsDC (cc)  {
  return isDinersClub(cc);
}

function IsDiners (cc)  {
  return isDinersClub(cc);
}

function IsCarteBlanche (cc)  {
  return isCarteBlanche(cc);
}

function IsCB (cc)  {
  return isCarteBlanche(cc);
}

function IsDiscover (cc)  {
  return isDiscover(cc);
}

function IsEnRoute (cc)  {
  return isEnRoute(cc);
}

function IsenRoute (cc)  {
  return isEnRoute(cc);
}

function IsJCB (cc)  {
  return isJCB(cc);
}

function IsAnyCard(cc)  {
  return isAnyCard(cc);
}

function IsCardMatch (cardType, cardNumber)  {
  return isCardMatch (cardType, cardNumber);
}

function ValidateDate(MonthControl,DayControl,YearControl)
	{
		if (!((YearControl.value == "") && (MonthControl.value == "") && (DayControl.value == "")))
			{
			if ( isDate (YearControl.value,MonthControl.value,DayControl.value) == false )
				{
				alert("Not a valid date");
				//MonthControl.select();
				MonthControl.focus();
				return false;
				}
			}
	}
function ValidateType(control, sType)
//ValidateType(control,iRequired,sAnswerType,iAnswerLength)
	{
		var sAnswerType;

		sAnswerType = sType;

		//if ( IsRequired(control) )
		//if ( IsValidType(control) == true)
		//	alert('OK');
		//else
		//	alert('Not OK');
		//alert(iAnswerLength);
		if ( sAnswerType == "DATE" )
			{
				//if ( isDate (Year,Month,Day) == false )
				//	alert("Not a valid date");
				//	control.select();
				//	control.focus();
				//	return false;
			}
		else if ( sAnswerType == "DATE2" )
			{	
			if (control.value != "")
				{
				var re;
				re = /-/;
				control.value.replace(re, "/");
				var dDate = new Date(control.value);
				var sDate;
				
				if ( isNaN(dDate) )
					{
					alert("Not a valid Date!");
					//control.focus();
						control.focus();
						control.select();
						return false;
					}
				//else control.value = control.value;
				else 
					{
					//make sure SQL Server can handle the date range
					if ( dDate.getFullYear() < 1753 ) 
						{
						alert("Not a valid Date, year must be greater than 1753!");
						control.focus();
						control.select();
						return false;
						}
					else
						{
						var addyears = 0;
						if (right(control.value,3) < '/49')
						//if (right(control.value,3) == '/00' || right(control.value,3) == '-00')
							{
							addyears = 100;
							}
						//alert(right(control.value,3));
						
						sDate = (dDate.getMonth() + 1) + "/";
						sDate += dDate.getDate() + "/";
						sDate += (dDate.getFullYear() + addyears);
						control.value = sDate;
						}
					}
				}
			}
		else if ( sAnswerType == "DATE3" )  // DATE2 does not account for Leap year 2000
											// Bruce Nguyen 2/17/00
			{
			var myDate = control.value;	
			if (control.value != "")
				{
				var re;
				re = /-/;
				control.value.replace(re, "/");
				
				if( myDate=="2/29/00" || myDate=="02/29/00" )
					control.value = "2/29/2000"
				
				var dDate = new Date(control.value);
				var sDate;
				
				if ( isNaN(dDate) )
					{
					alert("Not a valid Date!");
					//control.focus();
						control.focus();
						control.select();
						return false;
					}
				//else control.value = control.value;
				else 
					{
					//make sure SQL Server can handle the date range
					if ( dDate.getFullYear() < 1753 ) 
						{
						alert("Not a valid Date, year must be greater than 1753!");
						control.focus();
						control.select();
						return false;
						}
					else
						{
						var tdate = right(control.value,3)
						//alert (tdate)
						var addyears = 0;
						if ((tdate < '/49') || (tdate == '/00'))
							{
							addyears = 100;
							}
						//alert(right(control.value,3));
							
						sDate = (dDate.getMonth() + 1) + "/";
						sDate += dDate.getDate() + "/";
						sDate += (dDate.getFullYear() + addyears);
						
						control.value = sDate;
						}
					}
				}
			}
			
			else if ( sAnswerType == "ROUTENUMBER" ) //Bank Information
			{
					if ( control.value.length != 9 && control.value.length != 0) 
						{
						alert("Not a valid Route Number.  Must be 9 digits.");
						control.focus();
						control.select();
						return false;
						}
			}
			
			else if ( sAnswerType == "YEAR" )
			{
				control.value = control.value.toUpperCase();
				if ( control.value < 1753 ) 
						{
						alert("Not a valid Date, year must be greater than 1753!");
						control.focus();
						control.select();
						return false;
						}
			}


		else if ( sAnswerType == "TIME" )
			{
				control.value = control.value.toUpperCase();
				if ( isTime (control.value) == false )
					{
					alert("Not a valid time!");
					//control.focus();
					control.select();
					return false;
					}
				else control.value = formatTime(control.value);
			}
			
		else if ( sAnswerType == "DATETIME" )
			{
				control.value = control.value.toUpperCase();
				if ( isTime (control.value) == false )
					{
					alert("Not a valid time!");
					//control.focus();
					control.select();
					return false;
					}
				else control.value = formatTime(control.value);
			}


		else if ( sAnswerType == "ALPHA" )
			{
				control.value = control.value.toUpperCase();
				if ( isInteger(control.value) == true )
					{
						alert("Value cannot be numeric.  Please enter text.");
						control.focus();
						control.select();
						return false;
					}
			}

		else if ( sAnswerType == "NUM" )
			{
				control.value = stripWhitespace(control.value);
				if ( isInteger(control.value,true) == false )
					{
						alert("This value must be numeric.  Please enter a non decimal number.");
						control.focus();
						//control.select();
						return false;
					}
			}

		else if ( sAnswerType == "FLOAT" )
			{
				control.value = stripWhitespace(control.value);
				if ( isFloat(control.value,true) == false )
					{
						alert("This value must be numeric.  Please enter a number.");
						control.focus();
						//control.select();
						return false;
					}
			}

		else if ( sAnswerType == "PHONE" )
			{
				if (checkUSPhone(control,true,false) == false)
				{
					control.focus();
					//control.select();
					return false;
				}
				
			}

		else if ( sAnswerType == "EMAIL" )
			{
				if (checkEmail(control,true,false) == false)
				{
					control.focus();
					//control.select();
					return false;
				}
				
			}
			
		else if ( sAnswerType == "ZIPCODE" )
			{
				if (checkZIPCode(control,true,false) == false)
				{
					control.focus();
					//control.select();
					return false;
				}
				
			}
		
		else if ( sAnswerType == "SSN" )
			{
				if (checkSSN(control,true,false) == false)
				{
					control.focus();
					//control.select();
					return false;
				}
				
			}
		else if ( sAnswerType == "URL" )
			{
				if (checkURL(control,true,false) == false)
				{
					control.focus();
					//control.select();
					return false;
				}
				
			}
			
		else if ( sAnswerType == "HOUR" )
			{
				control.value = stripWhitespace(control.value);
				if ( isInteger(control.value) == false )
					{
						alert("Value must be numeric.  Please enter a number.");
						control.focus();
						control.select();
						return false;
					}
				else
					{
						if (control.value > 24 )
						{
							alert("There are only 24 hours in a day.  Please enter a valid number.");
							control.focus();
							control.select();
							return false;
						}
					}
			}
			
		else if ( sAnswerType == "NAME" ) //Added by Anne Schwarz, 3/28/2000
			{
				if (checkDNSName(control,true,false) == false)
					{
						control.focus();
						//control.select();
						return false;
					}
				else
					{
						control.value = control.value.toUpperCase();
					}
			}
			
		else //if ( sAnswerType == "TEXT" )
				control.value = control.value.toUpperCase();

		//alert(control.name + " " + control.value + " " + iRequired + " " + sAnswerType  );	

			
	}

function IsRequired(control)
	{
		if ( control.required == 1 && isEmpty(control.value) )
			{
			//required control is empty, select control and inform user.
			alert("This is a required field.");
			control.focus();
			return false;
			}
		else if ( control.required == 1 && control.value == '-1' )
			{
			//required control is -1 and a listbox, select control and inform user.
			alert("This is a required field.");
			control.focus();
			return false;
			}
			
		else
			{
			//control is ok.
			return true;
			}
	}
function CheckRequired(inForm)
	{
	//loop all controls on the form passed in
	var docLen = inForm.elements.length;
	for ( var i=1; i <= (docLen); i=i+1 )
		{
		//ignore controls without .required property

		if (inForm.elements[i-1].required != null)
			{
			if (IsRequired(inForm.elements[i-1]) == false)
				{
				//kick out on first bad control
				return false;
				}
			}
		}
	//pass if all controls on form with .required = true have a value
	return true;
	}
	
function CheckFormats(inForm)
	{
	//alert("Running checkformats");
	//loop all controls on the form passed in
	var docLen = inForm.elements.length;
	var sAnwerType = ""
	for ( var i=1; i <= (docLen); i=i+1 )
		{
		//ignore controls without .required property
		if (inForm.elements[i-1].required != null)
			{
			//alert(inForm.elements[i-1].name + " " + inForm.elements[i-1].value + " " + inForm.elements[i-1].answertype );	
			
			sAnswerType = inForm.elements[i-1].answertype
			if ( sAnswerType == "DATE" )
				{
				}
			else if ( sAnswerType == "TIME" )
				{
				}
			else if ( sAnswerType == "DATETIME" )
				{
				}
			else if ( sAnswerType == "ID" )
				{
				}
			else if ( sAnswerType == "TEXT" )
				{
				}
			else if ( sAnswerType == "ALPHA" )
				{
				}
			else if ( sAnswerType == "NUM" )
				{
				}
			else if ( sAnswerType == "PHONE" )
				{
					if (checkUSPhone(inForm.elements[i-1],true,true) == false)
						return false;
				}
			else if ( sAnswerType == "SSN" )
				{
					if (checkSSN(inForm.elements[i-1],true,true) == false)
						return false;
				}
			else if ( sAnswerType == "HOUR" )
				{
				}	
			}
		}
	//pass if all controls on form with .required = true have a value
	return true;
	}

// checkDNSName (TEXTFIELD theField [, BOOLEAN emptyOK==false])
//
// Check that string theField.value contains no characters that are illegal in a DNS name.
// Added by Anne Schwarz, 3/28/2000
function checkDNSName (theField, emptyOK)
 {   
	if (checkDNSName.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    {	
		var iDNSName = "The name you entered cannot be used to create a valid Web address for your Agent Plus home pages. \n"
		iDNSName += "Please include only letters, numbers and hyphen ('-')."
		var validDNSChars = digits + lowercaseLetters + uppercaseLetters + "-"
		var cleanName = stripCharsNotInBag(theField.value, validDNSChars )
		if ( theField.value != cleanName ) 
			return warnInvalid (theField, iDNSName);
		else 
		{  
			return true;
		}
    }
 }