//This function checks for field entries
function cktext(fname,msg){
	if (fname.value == "")
		{alert(msg); return 1;}
}

//This function checks for a certain length
function ckexlen(fname,msg,flength){
	if (fname.value.length != flength)
		{alert(msg);return 1;}
}

//This function checks for within a length
function cklen(fname,msg,flength) {
  if (fname.value.length > flength) {
     alert(msg);
    return 1;
  }
}

//This funciton checks for number entries
function ckNumber(fname,msg) {
  var l = fname.value.length;
  var str = fname.value
  for (j=0; j<l; j++)
	{
		if ((str.charAt(j) < "0") || (str.charAt(j) > "9"))
			{alert(msg);return 1;}
	}
  return;
 }
 
 //This function checks to make sure a valid float/currency amount
//was entered, however, no "$" signs can be included in the field...
function checkDecimals(fname,msg) {
	if (isNaN(fname.value) || fname.value == "")
		{alert(msg);return 1;}
	else
		{
			if (fname.value.indexOf('.') == -1) fname.value += ".";
			dectext = fname.value.substring(fname.value.indexOf('.')+1, fname.value.length);

			if (dectext.length > 2)
				{alert(msg);return 1;}
   }
}

//This function checks for valid emails
function ckEmail(fname,msg){
	var str = fname.value;
	var isEmail = ((str.indexOf("@") != -1) & (str.indexOf(".") != -1));
	if (fname.value == ""){alert(msg);fname;return 1;}
	if (isEmail){return false;}alert(msg);fname;return 1;}

//This function will switch focus on phone and fax number fields
//once the max. num. of numbers has been entered
function switchfocus(fname1,fname2,flength) {
	var fm = document.frmDetails
	if (fm.elements[fname1].value.length > flength)
		{fm.elements[fname2].focus();}
	}
	
//This function sets the website to the domain name
//after the user enters in their email address
function setWebsite() {
	var fm = document.frmDetails
	var email = fm.Email.value;
			
	if (email.indexOf('@') != -1 && fm.Website.value.length==0) {
		var spos=email.indexOf('@')+1;
		var website='www.'+email.substring(spos);
		fm.Website.value=website;
		fm.Website.select();
	}
}	


//Counts the characters entered into a textarea
//and displays a number of characters left to type...
function textCounter(field, countfield, maxlimit) {
	if (field.value.length > maxlimit)
		field.value = field.value.substring(0, maxlimit);
	else 
		countfield.value = maxlimit - field.value.length;
}


//The following functions perform a date check
function checkdate(fname, msg) {
	var datefield = fname;
	if (datefield.value=="") {return;}
	
	if (datefield.value.length<6) {
			alert(msg);
			return 1;
	}
	else {
		if (chkdate(fname) == false) {
			alert(msg);
			return 1;
		}
	}
}

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);
		}
	}
	if (strYear.length == 2) {
		strYear = '20' + strYear;
	}
	
	// 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) || intYear < 1900 ) {
		err = 4;
		return false;
	}
	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;
		}
	}
	}
	
	// this code will change the date to a proper format.
	//if (strDatestyle == "US") {
	//	datefield.value = strMonthArray[intMonth-1] + " " + intday+" " + strYear;
	//}
	//else {
	//	datefield.value = intday + " " + strMonthArray[intMonth-1] + " " + strYear;
	//	alert(datefield.value);
	//	}
	
	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)) {return;}
	else {
		if (from.value == "" || to.value == "")
			{alert("You must enter a valid date range");from.focus();return 1;}
		else 
		{alert("To Start Date must occur before the End Date.");from.focus();return 1;}
	}
}

//This function checks for valid begin and end date ranges
function ckbothdates(sDate, eDate, msg) {

	if (sDate.value=="" && eDate.value=="") {return;}
	if (sDate.value==""){alert(msg);sDate.focus();return 1;}
	if (eDate.value==""){alert(msg);eDate.focus();return 1;}
	
}





//This function will be called by any input field on this form
//and set the isDirty value to 1 which we can use to check on
//before we submit the form and also use to turn "Apply" buttons on/off
function DataChange(){	
	
	//Find out what key is pressed
	vKey = event.keyCode;
	
	//Keys that don't make data "dirty" e.g.
	//arrow keys etc.
	arrLeft = 37;
	arrUp = 38;
	arrRight = 39;
	arrDwn = 40;
	vAlt = 18;
	vCtrl = 17;
	vShift = 16;
	vCaps = 20;
	vEsc = 27;
	
	
	//Skip this code if a "non-dirty" key was pressed
	//otherwise set the isDirty variable and enable the "Apply" button
	switch(vKey)
		{
			case arrLeft:
			case arrUp:
			case arrRight:
			case arrDwn:
			case vCtrl:
			case vShift:
			case vCaps:
			case vAlt:
			case vEsc:
				break;
			default:				
			
				//Set the isDirty variable
				isDirty = 1;
	
				//Make the "Apply" button show...
				document.all["Apply"].disabled = 0;
		}
}


//This function gets called when the user clicks on "Cancel"... 
//It will first check if any data has been changed and if so
//then throws up a vbScript message box and reacts in proper
//windows fashion to the users response...
function CloseWindow(){
	//Ask the user to save first if the isDirty is 1
	if (isDirty == 1)
		{
			//Calls the vbScript function that throws up
			//a dialog box giving the user three options
			var iAns = vbsMessage('Do you want to save your changes before closing?',3+48, "WebApp - Reminder");
			
			//Evaluate the users response
			switch(iAns)
				{
					case 6: //OK
						//Call the Checkfields function
						Check = CheckFields();
						break;
					case 2: //Cancel
						//Do nothing
						break;
					case 7: //No
						//The user doesn't want to save the changes
						window.close();
						break;					
				}
		}
	else
		{
			//Close the window since no data was changed
			window.close();
		}		
}

