// These constants will be returned by the various functions contained herein
var DATE_VALID = 0
var DATE_INVALID_FORMAT = 1
var DATE_MONTH_OUT_OF_RANGE = 2
var DATE_DAY_OUT_OF_RANGE = 3
var DATE_DATEONE_INVALID = 4
var DATE_DATETWO_INVALID = 5
var DATE_DATEONE_EQUAL_DATETWO = 6
var DATE_DATEONE_LESS_DATETWO = 7
var DATE_DATEONE_GREATER_DATETWO = 8
var DATE_YEAR_OUT_OF_RANGE = 9

var MONTH_NAMES=new Array('January','February','March','April','May','June','July','August','September','October','November','December','Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');
var DAY_NAMES=new Array('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday','Sun','Mon','Tue','Wed','Thu','Fri','Sat');
function LZ(x) {return(x<0||x>9?"":"0")+x}

// ------------------------------------------------------------------
// isDate ( date_string, format_string )
// Returns true if date string matches format of format string and
// is a valid date. Else returns false.
// It is recommended that you trim whitespace around the value before
// passing it to this function, as whitespace is NOT ignored!
// ------------------------------------------------------------------



function formatDate(date,format) {
	format=format+"";
	var result="";
	var i_format=0;
	var c="";
	var token="";
	var y=date.getFullYear()+"";
	var M=date.getMonth()+1;
	var d=date.getDate();
	var E=date.getDay();
	var H=date.getHours();
	var m=date.getMinutes();
	var s=date.getSeconds();
	var yyyy,yy,MMM,MM,dd,hh,h,mm,ss,ampm,HH,H,KK,K,kk,k;
	// Convert real date parts into formatted versions
	var value=new Object();
	if (y.length < 4) {y=""+(y-0+1900);}
	value["y"]=""+y;
	value["yyyy"]=y;
	value["yy"]=y.substring(2,4);
	value["M"]=M;
	value["MM"]=LZ(M);
	value["MMM"]=MONTH_NAMES[M-1];
	value["NNN"]=MONTH_NAMES[M+11];
	value["d"]=d;
	value["dd"]=LZ(d);
	value["E"]=DAY_NAMES[E+7];
	value["EE"]=DAY_NAMES[E];
	value["H"]=H;
	value["HH"]=LZ(H);
	if (H==0){value["h"]=12;}
	else if (H>12){value["h"]=H-12;}
	else {value["h"]=H;}
	value["hh"]=LZ(value["h"]);
	if (H>11){value["K"]=H-12;} else {value["K"]=H;}
	value["k"]=H+1;
	value["KK"]=LZ(value["K"]);
	value["kk"]=LZ(value["k"]);
	if (H > 11) { value["a"]="PM"; }
	else { value["a"]="AM"; }
	value["m"]=m;
	value["mm"]=LZ(m);
	value["s"]=s;
	value["ss"]=LZ(s);
	while (i_format < format.length) {
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		if (value[token] != null) { result=result + value[token]; }
		else { result=result + token; }
		}
	return result;
	}






function DateCheck(FieldToCheck) {
//*********************************************************************************
/*
	Inputs:
		FieldToCheck:		field to check (validation is to see if format equals mm/dd/yyyy)
	
	Outputs:
		ReturnValue		see constants
	
	Example Calls:

		intReturnValue = DateCheck ("01/01/2001")
			intReturnValue would equal DATE_VALID

		intReturnValue = DateCheck ("02/29/2001")
			intReturnValue would equal DATE_DAY_OUT_OF_RANGE

		intReturnValue = DateCheck ("13/01/2001")
			intReturnValue would equal DATE_MONTH_OUT_OF_RANGE

		intReturnValue = DateCheck ("01/01/001")
			intReturnValue would equal DATE_INVALID_FORMAT

*/
//*********************************************************************************
	var rgxDate, blnFormatValid, intMonth, intDay, intYear
	
	rgxDate = /^([0-9]{1,2})\/([0-9]{1,2})\/([0-9]{4})$/i
	if (rgxDate.test(FieldToCheck)) {
		blnFormatValid = true
	}
	else {
		blnFormatValid = false
	}
	if (!blnFormatValid) {
		return DATE_INVALID_FORMAT
	}
	else {
		intMonth = RegExp.$1
		intDay = RegExp.$2
		intYear = RegExp.$3
	}

	if (intMonth < 1 || intMonth > 12) {
		return DATE_MONTH_OUT_OF_RANGE
	}

	if (intDay < 1 || intDay > 31) {
		return DATE_DAY_OUT_OF_RANGE
	}

	if (intMonth == 4 || intMonth == 6 || intMonth == 9 || intMonth == 11) {
		if (intDay > 30) {
			return DATE_DAY_OUT_OF_RANGE
		}
	}

	if (intMonth == 2) {
		if (intDay > 29) {
			return DATE_DAY_OUT_OF_RANGE
		}
		if (intDay == 29) {
			if (!(IsLeapYear(intYear))) {
				return DATE_DAY_OUT_OF_RANGE
			}
		}
	}
	
	if (intYear < 1754 || intYear > 9999) {
	    return DATE_YEAR_OUT_OF_RANGE;
	}
	
	return DATE_VALID

}

function IsLeapYear (YearToCheck) {
//*********************************************************************************
/*
	Inputs:
		YearToCheck:		four digit year to check
	
	Outputs:
		ReturnValue		true or false
	
	Example Calls:

		blnReturnValue = IsLeapYear ("1996")
			blnReturnValue would equal true

		blnReturnValue = IsLeapYear ("2000")
			blnReturnValue would equal true

		blnReturnValue = IsLeapYear ("3000")
			blnReturnValue would equal false

		blnReturnValue = IsLeapYear ("1997")
			blnReturnValue would equal false

		blnReturnValue = IsLeapYear ("997")
			blnReturnValue would equal false

*/
//*********************************************************************************
	var rgxDate
	
	rgxDate = /^[0-9]{4}$/i
	if (!(rgxDate.test(YearToCheck))) {
		return false
	}

	// x % y returns the remainder
	if (YearToCheck % 4 == 0) {
		if (YearToCheck % 100 == 0) {
			if (!(YearToCheck % 400 == 0)) {
				return false
			}
		}
	}
	else {
		return false
	}
	
	return true

}

function CompareDates (DateOne, DateTwo, ValidateDates) {
//*********************************************************************************
/*
	Inputs:
		DateOne:			first date to compare (format mm/dd/yyyy)
		DateTwo:			secound date to compare (format mm/dd/yyy)
		ValidateDates:	should the two fields be validated BEFORE the comparison
	
	Outputs:
		ReturnValue		see constants
	
	Example Calls:

		intReturnValue = CompareDates ("01/01/2001", "01/01/2001", false)
			intReturnValue would equal DATE_DATEONE_EQUAL_DATETWO
			
		intReturnValue = CompareDates ("01/02/2001", "01/01/2001", false)
			intReturnValue would equal DATE_DATEONE_GREATER_DATETWO
			
		intReturnValue = CompareDates ("01/01/2001", "01/02/2001", false)
			intReturnValue would equal DATE_DATEONE_LESS_DATETWO
			
		intReturnValue = CompareDates ("01/01/001", "01/01/2001", true)
			intReturnValue would equal DATE_DATEONE_INVALID
			
		intReturnValue = CompareDates ("01/01/2001", "19/01/2001", true)
			intReturnValue would equal DATE_DATETWO_INVALID

*/
//*********************************************************************************
	var datOne, datTwo
	
	if (ValidateDates) {
		if (DateCheck(DateOne) != DATE_VALID) {
			return DATE_DATEONE_INVALID
		}
		if (DateCheck(DateTwo) != DATE_VALID) {
			return DATE_DATETWO_INVALID
		}
	}
	
	datOne = new Date(DateOne)
	datTwo = new Date(DateTwo)

	if (datOne.getVarDate() < datTwo.getVarDate()) {
		return DATE_DATEONE_LESS_DATETWO
	}
	if (datOne.getVarDate() > datTwo.getVarDate()) {
		return DATE_DATEONE_GREATER_DATETWO
	}
	return DATE_DATEONE_EQUAL_DATETWO

}


function GetMessage(ErrorNumber){ 
	switch(ErrorNumber){ 
		case DATE_INVALID_FORMAT: 
			validMsg = "Invalid Date Format" 
			break 
		case DATE_MONTH_OUT_OF_RANGE : 
			validMsg = "Date month out of range" 
			break 
		case DATE_DAY_OUT_OF_RANGE: 
			validMsg = "Date day out of range" 
			break 
	    case DATE_YEAR_OUT_OF_RANGE:
	        validMsg = "Date year out of range"
	        break
		case DATE_DATEONE_GREATER_DATETWO: 
			validMsg = "DATE_DATEONE_GREATER_DATETWO" 
			break
		case DATE_DATEONE_EQUAL_DATETWO: 
			validMsg = "DATE_DATEONE_EQUAL_DATETWO" 
			break 
		default: 
			validMsg = "" 
			break 
	} 
		return validMsg 
} 


function dateMask(keyPressedCode, currentValue, theControl){	
	var loc = "2,5";
	var delim = "/";
	var locs = loc.split(',');
	var numericPattern;
	var newValue = "";
	
	
	var selectedText, myValue

	selectedText = document.selection.createRange().text
	if (selectedText.length == 0) {
		myValue = currentValue + String.fromCharCode(keyPressedCode)
	}
	else {
		if (currentValue.length == selectedText.length) {
			myValue = String.fromCharCode(keyPressedCode)
		}
		else {
			//this currently does not handle the ability to check 'what if the selected text was replaced with the key pressed'
			myValue = String.fromCharCode(keyPressedCode)
		}
	}
	
	if (myValue.length > 10) return false;
	
	numericPattern = new RegExp("^[0-9]*$","i");
	if (!numericPattern.test(String.fromCharCode(keyPressedCode))) return false;
	
	for (var i = 0; i <= locs.length; i++){
		for (var k = 0; k <= myValue.length; k++){
			if (k == locs[i]){
				if (myValue.substring(k, k+1) != delim){
					if (event.keyCode != 8){ //backspace
						myValue = myValue.substring(0,k) + delim + myValue.substring(k,myValue.length);
						theControl.value = myValue;
						return false;
					}
				}
			}
		}
	}
}

function dateMaskClipboard(){	
	
	var currentValue = window.clipboardData.getData("Text");
	intReturnValue = DateCheck (currentValue)
	if (intReturnValue == 0) {
		return true;
	} else {
		return false;	
	}
}

function addMonth(d,month){ 
   t  = new Date (d); 
   t.setMonth(d.getMonth()+ month) ; 
   if (t.getDate() < d.getDate()) 
   { 
      t.setDate(0); 
   } 
   return t;
} 

function fixDate(date, myCtrl) {
	var cutoffYear=50;

	if (date.substr(6,4).search(/\d{4}/) != -1) {
		//do nothing - Four digit year
	} else {
		if (date.substr(6,2).search(/\d{2}/) != -1) {
			// Two digit year.

			var intYear=parseInt(date.substr(6,2),10);
			if (intYear>=cutoffYear) {
				intYear+=1900;
			}
			else {
				intYear+=2000;
			}
			myCtrl.value = date.substr(0,6) + intYear;	
		}
	}
}

// ------------------------------------------------------------------
// parseDate( date_string [, prefer_euro_format] )
//
// This function takes a date string and tries to match it to a
// number of possible date formats to get the value. It will try to
// match against the following international formats, in this order:
// y-M-d   MMM d, y   MMM d,y   y-MMM-d   d-MMM-y  MMM d
// M/d/y   M-d-y      M.d.y     MMM-d     M/d      M-d
// d/M/y   d-M-y      d.M.y     d-MMM     d/M      d-M
// A second argument may be passed to instruct the method to search
// for formats like d/M/y (european format) before M/d/y (American).
// Returns a Date object or null if no patterns match.
// ------------------------------------------------------------------


function parseDate(val) {
	var preferEuro=(arguments.length==2)?arguments[1]:false;
	generalFormats=new Array('y-M-d','MMM d, y','MMM d,y','y-MMM-d','d-MMM-y','MMM d');
	monthFirst=new Array('M/d/y','M-d-y','M.d.y','MMM-d','M/d','M-d');
	dateFirst =new Array('d/M/y','d-M-y','d.M.y','d-MMM','d/M','d-M');
	var checkList=new Array('generalFormats',preferEuro?'dateFirst':'monthFirst',preferEuro?'monthFirst':'dateFirst');
	var d=null;
	for (var i=0; i<checkList.length; i++) {
		var l=window[checkList[i]];
		for (var j=0; j<l.length; j++) {
			d=getDateFromFormat(val,l[j]);
			if (d!=0) { return new Date(d); }
			}
		}
	return null;
}

// ------------------------------------------------------------------
// getDateFromFormat( date_string , format_string )
//
// This function takes a date string and a format string. It matches
// If the date string matches the format string, it returns the 
// getTime() of the date. If it does not match, it returns 0.
// ------------------------------------------------------------------
function getDateFromFormat(val,format) {
	val=val+"";
	format=format+"";
	var i_val=0;
	var i_format=0;
	var c="";
	var token="";
	var token2="";
	var x,y;
	var now=new Date();
	var year=now.getYear();
	var month=now.getMonth()+1;
	var date=1;
	var hh=now.getHours();
	var mm=now.getMinutes();
	var ss=now.getSeconds();
	var ampm="";
	
	while (i_format < format.length) {
		// Get next token from format string
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		// Extract contents of value based on format token
		if (token=="yyyy" || token=="yy" || token=="y") {
			if (token=="yyyy") { x=4;y=4; }
			if (token=="yy")   { x=2;y=2; }
			if (token=="y")    { x=2;y=4; }
			year=_getInt(val,i_val,x,y);
			if (year==null) { return 0; }
			i_val += year.length;
			if (year.length==2) {
				if (year > 70) { year=1900+(year-0); }
				else { year=2000+(year-0); }
				}
			}
		else if (token=="MMM"||token=="NNN"){
			month=0;
			for (var i=0; i<MONTH_NAMES.length; i++) {
				var month_name=MONTH_NAMES[i];
				if (val.substring(i_val,i_val+month_name.length).toLowerCase()==month_name.toLowerCase()) {
					if (token=="MMM"||(token=="NNN"&&i>11)) {
						month=i+1;
						if (month>12) { month -= 12; }
						i_val += month_name.length;
						break;
						}
					}
				}
			if ((month < 1)||(month>12)){return 0;}
			}
		else if (token=="EE"||token=="E"){
			for (var i=0; i<DAY_NAMES.length; i++) {
				var day_name=DAY_NAMES[i];
				if (val.substring(i_val,i_val+day_name.length).toLowerCase()==day_name.toLowerCase()) {
					i_val += day_name.length;
					break;
					}
				}
			}
		else if (token=="MM"||token=="M") {
			month=_getInt(val,i_val,token.length,2);
			if(month==null||(month<1)||(month>12)){return 0;}
			i_val+=month.length;}
		else if (token=="dd"||token=="d") {
			date=_getInt(val,i_val,token.length,2);
			if(date==null||(date<1)||(date>31)){return 0;}
			i_val+=date.length;}
		else if (token=="hh"||token=="h") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>12)){return 0;}
			i_val+=hh.length;}
		else if (token=="HH"||token=="H") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>23)){return 0;}
			i_val+=hh.length;}
		else if (token=="KK"||token=="K") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>11)){return 0;}
			i_val+=hh.length;}
		else if (token=="kk"||token=="k") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>24)){return 0;}
			i_val+=hh.length;hh--;}
		else if (token=="mm"||token=="m") {
			mm=_getInt(val,i_val,token.length,2);
			if(mm==null||(mm<0)||(mm>59)){return 0;}
			i_val+=mm.length;}
		else if (token=="ss"||token=="s") {
			ss=_getInt(val,i_val,token.length,2);
			if(ss==null||(ss<0)||(ss>59)){return 0;}
			i_val+=ss.length;}
		else if (token=="a") {
			if (val.substring(i_val,i_val+2).toLowerCase()=="am") {ampm="AM";}
			else if (val.substring(i_val,i_val+2).toLowerCase()=="pm") {ampm="PM";}
			else {return 0;}
			i_val+=2;}
		else {
			if (val.substring(i_val,i_val+token.length)!=token) {return 0;}
			else {i_val+=token.length;}
			}
		}
	// If there are any trailing characters left in the value, it doesn't match
	if (i_val != val.length) { return 0; }
	// Is date valid for month?
	if (month==2) {
		// Check for leap year
		if ( ( (year%4==0)&&(year%100 != 0) ) || (year%400==0) ) { // leap year
			if (date > 29){ return 0; }
			}
		else { if (date > 28) { return 0; } }
		}
	if ((month==4)||(month==6)||(month==9)||(month==11)) {
		if (date > 30) { return 0; }
		}
	// Correct hours value
	if (hh<12 && ampm=="PM") { hh=hh-0+12; }
	else if (hh>11 && ampm=="AM") { hh-=12; }
	var newdate=new Date(year,month-1,date,hh,mm,ss);
	return newdate.getTime();
}

// ------------------------------------------------------------------
// Utility functions for parsing in getDateFromFormat()
// ------------------------------------------------------------------
function _isInteger(val) {
	var digits="1234567890";
	for (var i=0; i < val.length; i++) {
		if (digits.indexOf(val.charAt(i))==-1) { return false; }
		}
	return true;
}

function _getInt(str,i,minlength,maxlength) {
	for (var x=maxlength; x>=minlength; x--) {
		var token=str.substring(i,i+x);
		if (token.length < minlength) { return null; }
		if (_isInteger(token)) { return token; }
		}
	return null;
}