// Formck.js 02/16/2000
var reWhitespace = /^\s+$/
var reLetter = /^[a-zA-Z]$/
var reAlphabetic = /^[a-zA-Z]+$/
var reAlphanumeric = /^[a-zA-Z0-9]+$/
var reDigit = /^\d/
var reLetterOrDigit = /^([a-zA-Z]|\d)$/
var reInteger = /^\d+$/
//var reSignedInteger = /^(+|-)?\d+$/
var reFloat = /^((\d+(\.\d*)?)|((\d*\.)?\d+))$/
//var reSignedFloat = /^(((+|-)?\d+(\.\d*)?)|((+|-)?(\d*\.)?\d+))$/
var reEmail = /^.+\@.+\..+$/
var reFile = /^[a-zA-Z0-9\\:\.]+$/
var digits = "0123456789";
var digitsInDate1 = 6;
var digitsInDate2 = 8;
var lowercaseLetters = "abcdefghijklmnopqrstuvwxyz"
var uppercaseLetters = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
var whitespace = " \t\n\r";
var phoneNumberDelimiters = "()- ";
var moneyDelimiters = "-,. ";
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 DateDelimiters = "/ ";
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 07652). Please reenter it now."
var iUSPhone = "This field must be a 10 digit U.S. phone number (like 201 599 2811). 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 pds@pascackdata.com). Please reenter it now."
var iFile = "This field must be a valid filename (like C:\\MyReports\\Report1). 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 iMoney = "This field must be dollar amount like 999,999.00.  Please reenter it now."
var iNumber = "This field must be a positive integer number.  Please reenter it now."
var iFloat = "This field must be a positive decimal number.  Please reenter it now."
var iAlpha = "This field must be name, consisting of letters.  Please reenter it now."
var iDate = "This field must be a 6 or 8 digit Date (like 02/15/00). Please reenter it now."
var iDay = "Day must be a number between 1 and 31.  Please reenter it now."
var iMonth = "Month must be a number between 1 and 12.  Please reenter it now."
var iYear = "Year must be a 2 or 4 digit year number.  Please reenter it now."
var iDatePrefix = "The Day, Month, and Year for "
var iDateSuffix = " This entry does not form a valid Day, Month, and Year.  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 07652)."
var pUSPhone = "10 digit U.S. phone number (like 201 599 2811)."
var pWorldPhone = "international phone number."
var pSSN = "9 digit U.S. social security number (like 123 45 6789)."
var pEmail = "valid email address (like pds@pascackdata.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;   // must programmatically check this
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 isWhitespace (s)
{   
    return (isEmpty(s) || reWhitespace.test(s));
}

function stripCharsInRE (s, bag)
{       return s.replace(bag, "")
}

function stripCharsInBag (s, bag)
{   var i;
    var returnString = "";

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

function stripCharsNotInBag (s, bag)
{   var i;
    var returnString = "";

    // Search through string's characters one by one.
    // If character is in bag, append to returnString.

    for (i = 0; i < s.length; i++)
    {   
        // Check that current character isn't whitespace.
        var c = s.charAt(i);
        if (bag.indexOf(c) != -1) returnString += c;
    }

    return returnString;
}

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 reLetter.test(c)
}

function isDigit (c)
{   return reDigit.test(c)
}

function isLetterOrDigit (c)
{   return reLetterOrDigit.test(c)
}

function isInteger (s)
{   var i;

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

    return reInteger.test(s)
}

function isLogical (s,v1,v2)
{   var i;

    if (isEmpty(s)) 
       if (isLogical.arguments.length == 1) return defaultEmptyOK;
       else return (isLogical.arguments[1] == true);
    v1 = v1.toLowerCase();
    v2 = v2.toLowerCase();
    if (v1 == "") {
	v1 = "y";
	v2 = "n";
    }
    return ((s == v1) || (s == v2));
}

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

    
    else {
       return reSignedInteger.test(s)
    }
}

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)
{   if (isEmpty(s)) 
       if (isFloat.arguments.length == 1) return defaultEmptyOK;
       else return (isFloat.arguments[1] == true);

    return reFloat.test(stripCharsInBag (s, ",-"))
}

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

    else {
       return reSignedFloat.test(s)
    }
}

function isAlphabetic (s)
{   var i;

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

    else {
       return reAlphabetic.test(s)
    }
}

function isAlphanumeric (s)
{   var i;

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

    else {
       return reAlphanumeric.test(s)
    }
}

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 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 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);
    
    else {
       return reEmail.test(s)
    }
}

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

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 prompt (s)
{   window.status = s
}

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

function warnEmpty (theWindow, theField, s)
{   theField.focus()
    theWindow.alert(mPrefix + s + mSuffix)
    theField.select()
    theField.focus()
    return false
}

function warnInvalid (theWindow, theField, s)
{       
    theWindow.alert(s);
    theField.focus();
    theField.select();
    return false;
}

function checkInteger(theWindow, theField, emptyOK)
{
if (checkInteger.arguments.length == 2) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    { if (!isInteger(theField.value)) return warnInvalid (theWindow, theField, iNumber);
	else return true;
    }
}

function checkLogical(theWindow, theField, v1, v2, emptyOK)
{
if (checkLogical.arguments.length <= 4) emptyOK = defaultEmptyOK;
   if ((emptyOK == true) && (isEmpty(theField.value))) return true;
   else
   { 
   theField.value = theField.value.toLowerCase();
   if (!isLogical(theField.value, v1, v2)) return warnInvalid (theWindow, theField, "This Field must be equal to \"" + v1 + "\" or \"" + v2 + "\".  Please reenter it now.");
	else return true;
}
}

function checkMoney(theWindow, theField, emptyOK)
{   if (checkMoney.arguments.length == 2) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    {  var normalizedMoney = stripCharsInBag(theField.value, "-");
       for(i = normalizedMoney.length; i >= 0; i--) {
	if ((normalizedMoney.charAt(i) == ".") && ((normalizedMoney.length - i) != 3))
		return warnInvalid (theWindow, theField, iMoney);
       }	
	var normalizedMoney = stripCharsInBag(theField.value, moneyDelimiters);
        if (!isInteger(normalizedMoney)) return warnInvalid (theWindow, theField, iMoney);
        else return true;
    }
}

function checkIntLength(theWindow, theField, emptyOK, nDigits) {
	if ((emptyOK == true) && (isEmpty(theField.value))) return true;
	if (checkInteger(theWindow, theField, emptyOK)) {
	   if (theField.value.length != nDigits) {
	     var s = "This field should be " + nDigits + " digit integer number!  Please reenter it now.";
	     warnInvalid(theWindow, theField, s);
	   }
	   else return true;
	}
}

function checkFloat(theWindow, theField, emptyOK)
{

if (checkFloat.arguments.length == 2) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    { if (!isFloat(theField.value)) return warnInvalid (theWindow, theField, iFloat);
	else return true;
}
}

function checkAlphabetic(theWindow, theField, emptyOK)
{

if (checkAlphabetic.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    { if (!isAlphabetic(theField.value)) return warnInvalid (theWindow, theField, iAlpha);
	else return true;
}
}

function checkString (theWindow, theField, s, emptyOK)
{   // Next line is needed on NN3 to avoid "undefined is not a number" error
    // in equality comparison below.
    if (checkString.arguments.length == 2) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    if (isWhitespace(theField.value)) 
       return warnEmpty (theWindow, theField, s);
    else return true;
}

function checkStateCode (theWindow, 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 (theWindow, theField, iStateCode);
       else return true;
    }
}

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

function checkZIPCode (theWindow, 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 (theWindow, theField, iZIPCode);
      else 
      {  // if you don't want to insert a hyphen, comment next line out
         theField.value = reformatZIPCode(normalizedZIP)
         return true;
      }
    }
}

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

function checkUSPhone (theWindow, theField, emptyOK)
{   if (checkUSPhone.arguments.length == 2) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    {  var normalizedPhone = stripCharsInBag(theField.value, phoneNumberDelimiters)
       if (!isUSPhoneNumber(normalizedPhone, false)) 
          return warnInvalid (theWindow, theField, iUSPhone);
       else 
       {  // if you don't want to reformat as (123) 456-789, comment next line out
          theField.value = reformatUSPhone(normalizedPhone)
          return true;
       }
    }
}

function checkEmail (theWindow, 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 (theWindow, theField, iEmail);
    else return true;
}

function checkFile (theWindow, theField, emptyOK)
{   if (checkFile.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else 
    {  
	for(i = 0; i <= theField.value.length; i++) {
	  if (((theField.value.charAt(i) == ":") && (i != 1)) 
|| ((theField.value.charAt(i) == "\\") && (theField.value.charAt(i+1) == "\\")) 
|| ((theField.value.charAt(1) == ":") && !(reLetter.test(theField.value.charAt(0)) && (theField.value.charAt(2) == "\\"))))
		return warnInvalid (theWindow, theField, iFile);
	}
	if (!isFile(theField.value, false)) 
       		return warnInvalid (theWindow, theField, iFile);
    	else return true;
    }
}

function reformatDate (Date)
{   return (reformat (Date, "", 2, "/", 2, "/", 4))
}

function checkDate (theWindow, theField, emptyOK)
{   
if (checkDate.arguments.length == 1) emptyOK = defaultEmptyOK;
    if ((emptyOK == true) && (isEmpty(theField.value))) return true;
    else
    {  var normalizedDate = stripCharsInBag(theField.value, DateDelimiters)
      if (!(isInteger(normalizedDate) && (normalizedDate.length == digitsInDate1 || normalizedDate.length == digitsInDate2 ))) 
          return warnInvalid (theWindow, theField, iDate);
       else 
       {  
	  var yearField = normalizedDate.substring(4,8);
	  var monthField = normalizedDate.substring(0,2);
	  var dayField = normalizedDate.substring(2,4);

          if (normalizedDate.charAt(0) == "0") var monthField = normalizedDate.charAt(1);
	  else var monthField = normalizedDate.substring(0,2);
	  if (normalizedDate.charAt(2) == "0") var dayField = normalizedDate.charAt(3);
	  else var dayField = normalizedDate.substring(2,4);

	  var intYear = parseInt(yearField);
          var intMonth = parseInt(monthField);
    	  var intDay = parseInt(dayField);


          if ((!isInteger(intYear)) || (!yearField.length == 2) || (!yearField.length == 4))
return warnInvalid (theWindow, theField, iYear);
    	  if (!isIntegerInRange (intMonth, 1, 12)) 
		return warnInvalid (theWindow, theField, iMonth);
    	  if (!isIntegerInRange (intDay, 1, 31)) 
		return warnInvalid (theWindow, theField, iDay);

    	  if ((intDay > daysInMonth[intMonth]) || ((intMonth == 2) && (intDay > ((intYear % 4 == 0) ? 29 : 28)))) return (warnInvalid(theWindow, theField, iDateSuffix));

          theField.value = reformatDate(normalizedDate);
          return true;
       }
    }
}

function getRadioButtonValue (radio)
{   for (var i = 0; i < radio.length; i++)
    {   if (radio[i].checked) { break }
    }
    return radio[i].value
}