function checkdate(objName) {
var datefield = objName;
	if (objName.value != "") {
		if (chkdate(objName) == false) {
		datefield.select();
		alert("That date is invalid.  Please try again.");
		datefield.focus();
		return false;
		} else {
			return true;
		}
	} else {
		return true;
	}
}
function chkdate(objName) {
var strDatestyle = "US"; //United States date style
//var strDatestyle = "EU";  //European date style
var strDate;
var strDateArray;
var strDay;
var strMonth;
var strYear;
var intday;
var intMonth;
var intYear;
var booFound = false;
var datefield = objName;
var strSeparatorArray = new Array("-"," ","/",".");
var intElementNr;
var err = 0;
var strMonthArray = new Array(12);
strMonthArray[0] = "Jan";
strMonthArray[1] = "Feb";
strMonthArray[2] = "Mar";
strMonthArray[3] = "Apr";
strMonthArray[4] = "May";
strMonthArray[5] = "Jun";
strMonthArray[6] = "Jul";
strMonthArray[7] = "Aug";
strMonthArray[8] = "Sep";
strMonthArray[9] = "Oct";
strMonthArray[10] = "Nov";
strMonthArray[11] = "Dec";
strDate = datefield.value;
if (strDate.length < 1) {
return true;
}
for (intElementNr = 0; intElementNr < strSeparatorArray.length; intElementNr++) {
	if (strDate.indexOf(strSeparatorArray[intElementNr]) != -1) {
		strDateArray = strDate.split(strSeparatorArray[intElementNr]);
		if (strDateArray.length != 3) {
			err = 1;
			return false;
		}
	else {
		strDay = strDateArray[0];
		strMonth = strDateArray[1];
		strYear = strDateArray[2];
	}
	booFound = true;
   }
}
if (booFound == false) {
if (strDate.length>5) {
strDay = strDate.substr(0, 2);
strMonth = strDate.substr(2, 2);
strYear = strDate.substr(4);
   }
}
// US style
if (strDatestyle == "US") {
strTemp = strDay;
strDay = strMonth;
strMonth = strTemp;
}
intday = parseInt(strDay, 10);
if (isNaN(intday)) {
err = 2;
return false;
}
intMonth = parseInt(strMonth, 10);
if (isNaN(intMonth)) {
for (i = 0;i<12;i++) {
if (strMonth.toUpperCase() == strMonthArray[i].toUpperCase()) {
intMonth = i+1;
strMonth = strMonthArray[i];
i = 12;
   }
}
if (isNaN(intMonth)) {
err = 3;
return false;
   }
}
intYear = parseInt(strYear, 10);
if (isNaN(intYear)) {
err = 4;
return false;
}

if (strYear.length <= 2) {
	strYear = ZeroPad(strYear, 2)
	if (strYear < '90') {strYear = '20' + strYear};
	if (strYear > '90') {strYear = '19' + strYear};
}
if (intMonth>12 || intMonth<1) {
err = 5;
return false;
}
if ((intMonth == 1 || intMonth == 3 || intMonth == 5 || intMonth == 7 || intMonth == 8 || intMonth == 10 || intMonth == 12) && (intday > 31 || intday < 1)) {
err = 6;
return false;
}
if ((intMonth == 4 || intMonth == 6 || intMonth == 9 || intMonth == 11) && (intday > 30 || intday < 1)) {
err = 7;
return false;
}
if (intMonth == 2) {
if (intday < 1) {
err = 8;
return false;
}
if (LeapYear(intYear) == true) {
if (intday > 29) {
err = 9;
return false;
}
}
else {
if (intday > 28) {
err = 10;
return false;
}
}
}
if (strDatestyle == "US") {
datefield.value = ZeroPad(intMonth, 2) + "/" + ZeroPad(intday, 2)+"/" + strYear;
//datefield.value = strMonthArray[intMonth-1] + " " + intday+" " + strYear;
}
else {
datefield.value = intday + " " + strMonthArray[intMonth-1] + " " + strYear;
}
return true;
}
function LeapYear(intYear) {
if (intYear % 100 == 0) {
if (intYear % 400 == 0) { return true; }
}
else {
if ((intYear % 4) == 0) { return true; }
}
return false;
}
function doDateCheck(from, to) {
if (Date.parse(from.value) <= Date.parse(to.value)) {
alert("The dates are valid.");
}
else {
if (from.value == "" || to.value == "") 
alert("Both dates must be entered.");
else 
alert("To date must occur after the from date.");
   }
}

function ZeroPad(intNum, intZeros) {
	var strTmp;
	for (x=1; x<=intZeros; x++) {
		strTmp = strTmp + "0";
	}
	strTmp = strTmp + intNum;
	return strTmp.substr(strTmp.length - intZeros, strTmp.length);
}

function emailCheck (passedObj) {
	emailStr = passedObj.value;
	if (emailStr =="") return true;
	/* The following pattern is used to check if the entered e-mail address
		 fits the user@domain format.  It also is used to separate the username
	   from the domain. */
	var emailPat=/^(.+)@(.+)$/
	/* The following string represents the pattern for matching all special
		 characters.  We don't want to allow special characters in the address. 
		 These characters include ( ) < > @ , ; : \ " . [ ]    */
	var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]"
	/* The following string represents the range of characters allowed in a 
		 username or domainname.  It really states which chars aren't allowed. */
	var validChars="\[^\\s" + specialChars + "\]"
	/* The following pattern applies if the "user" is a quoted string (in
     which case, there are no rules about which characters are allowed
     and which aren't; anything goes).  E.g. "jiminy cricket"@disney.com
     is a legal e-mail address. */
	var quotedUser="(\"[^\"]*\")"
	/* The following pattern applies for domains that are IP addresses,
		 rather than symbolic names.  E.g. joe@[123.124.233.4] is a legal
		 e-mail address. NOTE: The square brackets are required. */
	var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
	/* The following string represents an atom (basically a series of
		 non-special characters.) */
	var atom=validChars + '+'
	/* The following string represents one word in the typical username.
		 For example, in john.doe@somewhere.com, john and doe are words.
		 Basically, a word is either an atom or quoted string. */
	var word="(" + atom + "|" + quotedUser + ")"
	// The following pattern describes the structure of the user
	var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
	/* The following pattern describes the structure of a normal symbolic
		 domain, as opposed to ipDomainPat, shown above. */
	var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")


	/* Finally, let's start trying to figure out if the supplied address is
		 valid. */

	/* Begin with the coarse pattern to simply break up user@domain into
   different pieces that are easy to analyze. */
	var matchArray=emailStr.match(emailPat)
	if (matchArray==null) {
		/* Too many/few @'s or something; basically, this address doesn't
			 even fit the general mould of a valid e-mail address. */
		alert("Email address seems incorrect (check @ and .'s)")
		BadMail(passedObj);
		return false	
	}
	var user=matchArray[1]
	var domain=matchArray[2]

	// See if "user" is valid 
	if (user.match(userPat)==null) {
    // user is not valid
    alert("The username doesn't seem to be valid.")
		BadMail(passedObj);
    return false
	}

	/* if the e-mail address is at an IP address (as opposed to a symbolic
		 host name) make sure the IP address is valid. */
	var IPArray=domain.match(ipDomainPat)
	if (IPArray!=null) {
	  // this is an IP address
	  for (var i=1;i<=4;i++) {
	    if (IPArray[i]>255) {
	        alert("Destination IP address is invalid!")
					BadMail(passedObj);
					return false
	    }
    }
    return true
	}

	// Domain is symbolic name
	var domainArray=domain.match(domainPat)
	if (domainArray==null) {
		alert("The domain name doesn't seem to be valid.")
		BadMail(passedObj);
		return false
	}

	/* domain name seems valid, but now make sure that it ends in a
		 three-letter word (like com, edu, gov) or a two-letter word,
		 representing country (uk, nl), and that there's a hostname preceding 
     the domain or country. */

	/* Now we need to break up the domain to get a count of how many atoms
    it consists of. */
	var atomPat=new RegExp(atom,"g")
	var domArr=domain.match(atomPat)
	var len=domArr.length
	if (domArr[domArr.length-1].length<2 || 
    domArr[domArr.length-1].length>3) {
    // the address must end in a two letter or three letter word.
    alert("The address must end in a three-letter domain, or two letter country.")
		BadMail(passedObj);
    return false
	}

	// Make sure there's a host name preceding the domain.
	if (len<2) {
   alert("This address is missing a hostname!")
	 BadMail(passedObj);
   return false
	}

	// If we've gotten this far, everything's valid!
	return true;
}

function BadMail(passedObj) {
		passedObj.select();
		passedObj.focus();
		return true;
}

function MaxSize(passedObj, intMaxSize) {
	if (passedObj.value.length <= intMaxSize) {
		return true;
	} else {
		alert("This input has a maximum length of " + intMaxSize + ".\nPlease reduce the amount of text.");
		return false;
	}
}

function CheckTextAreaLength(passedObject, length, fieldName){
  if (passedObject.value != "") {	
  	if ((passedObject.value.length > length)) {
		alert(fieldName + " can only be " + length + " characters long.");
		passedObject.focus();
	}
  }	
}

function LimitTextArea(field, maxlimit) {
//Use function onkeyup and onkeydown to limit the textarea length
	if (field.value.length > maxlimit) {
	    // if too long...trim it!
		field.value = field.value.substring(0, maxlimit);
		alert("You have reached the " + maxlimit + " character limit.");
	}
}
