// ENTRY VALIDATION & FORMATTING

// 11/10/97 - TJS Added functions
// 01/21/99 - SCC Added function isUniqueItem
// 02/11/99 - TJS Tweaked number formatting functions
// 03/22/99 - TJS Added scrub_beds & baths
// 04/12/99 - ANK Changed scrab_Beds, scrab_String and replace_Char
// 05/20/99 - ANK Added scrub_select_mult(elem, maxn)
// 05/20/2000 - JRP Added checkPostal(object)

function popupIsEmpty(theMenuObj) {
	var theSelection = theMenuObj.selectedIndex;
	if (theSelection <= 0) {
		return true;
	} else {
		return false;
    }
}

//--------------------------------------------------------------------------------------------------------------

function isUniqueItem (list,thisItemCode,delimChar,caseSensitive) {
// RETURNS TRUE IF thisItemCode IS NOT IN list, FALSE OTHERWISE. //
// DEFAULT FOR delimChar (OPTIONAL) IS COMMA, DEFAULT FOR caseSensitive (OPTIONAL) is FALSE. //
	if (list == '' || list == undefined || thisItemCode == '' || thisItemCode == undefined)
		return true;
	if (caseSensitive == undefined || caseSensitive == false) { // just convert both to upper case //
		list = list.toUpperCase();
		thisItemCode = thisItemCode.toUpperCase();
	}
	if (delimChar == undefined || delimChar == '')  // Assumes carriage return delim, will replace with ',' //
		delimChar = ',';
	
	if (list.charAt(0) != delimChar)				// In case the delimiter is not at the beginning //
		list = delimChar + list;
	if (list.charAt(list.length - 1) != delimChar)	// or end of the list //
		list = list + delimChar;
		
	thisItemCode = delimChar + thisItemCode + delimChar;
	
	var foundIndex = list.indexOf(thisItemCode);
	if (foundIndex == -1) 
		return true;
	else 
		return false;
}

function scrub_RollNum(theNum,otherAllowed,minWildcardPosition) {
// REMOVE ALL NON-NUMERIC CHARS EXCEPT FOR PROGRAMMER SPECIFIED 'OTHER' ALLOWABLE CHARS
	var result = "";
	var allowed = "";
	otherAllowed +="-ABCDEFGHIJKLMNOPQRSTUVWXYZ";
	if (otherAllowed == 'undefined')
		otherAllowed = "";
	allowed = "0123456789"+ otherAllowed;
        theNum = theNum.toUpperCase();
	result = scrub_String(theNum,allowed);
	
	// remove commas from the end of the string
	for(i=result.length-1; i>=0; i--) {
		if(result.charAt(i) != ",")
			break;
		result = result.substring(0,i);
	}

	if (minWildcardPosition)
		result = parse_Wildcards (result,minWildcardPosition);

	return result;
}

function scrub_String(theStr,charsAllowed,charsAllowedOnce) {
	// eliminate all unwanted chars
	var result = "";
	var specialCharAt = -1;
	var specialChar = "";
	for(i=0;i<=theStr.length;i++) {
		theChar = theStr.charAt(i);
		if (charsAllowed.indexOf(theChar) != -1)
 			result +=theChar;
 		else if (charsAllowedOnce){
 			specialCharAt = charsAllowedOnce.indexOf(theChar);
 		 	if (specialCharAt != -1) {
 				result += theChar;
 				// remove the char from the list so it will not be allowed
				charsAllowedOnce = charsAllowedOnce.substring(0,specialCharAt) 
					+ charsAllowedOnce.substring(specialCharAt+1,charsAllowedOnce.length);
// specialChar = charsAllowedOnce.charAt(specialCharAt-1);      
// charsAllowedOnce = charsAllowedOnce.replace(specialChar,""); 
 			}
 		}
	}
	return result;
}

function scrub_Beds(theStr) {
	// Check baths entry
	var result = "";

	while ((x=theStr.indexOf(".")) != -1) {
//		x = theStr.indexOf(".");
		theStr = theStr.substring(0,x) + '+' + theStr.substring(x+1,theStr.length);
	}	
// theStr = theStr.replace(".","+"); 

	// eliminate all unwanted chars
	result = scrub_String(theStr,"0123456789","+")
	
	// don't start off the string with a plus
	if(result.charAt(0) == "+")
		result = result.substring(1);
	// don't end the string with a plus
	if(result.charAt(result.length-1) == "+")
		result = result.substring(0,result.length-1);
	return result;
}

function scrub_Baths(theStr) {
	// Check baths entry
	var result = "";
	
	// eliminate all unwanted chars
	result = scrub_String(theStr,"0123456789",".")
	
	// if decimal, last char must be 5
	var decAt = result.indexOf(".");
	if (decAt > -1) {
		lastChar = result.charAt(result.length-1);
		result = result.substring(0,decAt); // just the integer
		if (lastChar == "5")
			result += ".5";
	}
	return result;
}


function scrub_Beds_and_Baths(theNum) {
// Check beds and baths entry
	var result = "";
	var theChar = "";
	var allowed = "0123456789";
	for(i=0;i<=theNum.length;i++) {
		theChar = theNum.charAt(i);
		if (theChar=='.') {
			result = result + theChar;
			if (allowed.lastIndexOf(theNum.charAt(i+1)) != -1)
				result = result + theNum.charAt(i+1);
			else
				result = result + '0';
			return result;
		}
		if(allowed.lastIndexOf(theChar) != -1)
 			result = result + theChar;
	}
	return result;
}



function filterNum(theNum) {
	var minusStr = "";
	var result = "";

	if (theNum.indexOf("-") != -1)
		minusStr = "-";

 	result = scrub_String(theNum,"0123456789",".")

 	if (result == "")
 		return "";
	else
		return minusStr + result;
}

function commaFmt(numEle) {
	var tempStr = ""+numEle;
	
	// already has commas
	var charCheck = tempStr.indexOf(",");
	if ((charCheck+0) >= 0) {
		return numEle;
	}

	// separate the decimal from the whole number
	var decStr = "";
	var decInt = tempStr.indexOf(".");
	if (decInt!=-1) {
		decStr = tempStr.substring(decInt,tempStr.length);
		tempStr = tempStr.substring(0,decInt);
	}

	// if negative - save sign
	var isNeg = false;
	if (tempStr.indexOf("-")!=-1) {
		isNeg=true;
        tempStr=tempStr.substring(1,tempStr.length);
	}

	// short - no commas needed
	if (tempStr.length<=3) { 
		return numEle;
	}

	// add commas
	var newStr = "";
	var jInt = 0;
	for (var iInt=tempStr.length-1;iInt>=0;iInt--) {
		jInt++;
		newStr = tempStr.charAt(iInt) + newStr;
		if (jInt%3==0) {
			if (iInt-1>=0) {
				newStr = ","+newStr;
			}
		}
	}

	// re-assemble the parts
	if (decInt!=-1)
		newStr = newStr + decStr;
	if (isNeg)
		newStr = "-"+newStr;

	return newStr;
}

function formatRealNum(theNum,decplaces) {
// *** STOP USING THIS ***
// USE format_Real
// FORMAT A REAL NUMBER TO THE DESIRED DECIMAL PLACE
	var str = Math.round(parseFloat(filterNum(theNum.value)) * Math.pow(10,decplaces));
	str = ""+str;
	while (str.length <= decplaces) {
		str = "0" + str;
	}
	var decpoint = str.length - decplaces;
	return str.substring(0,decpoint) + "." + str.substring(decpoint,str.length);
}

function formatInteger(theNum) {
// *** STOP USING THIS ***
// USE format_Integer
// FORMAT AN INTEGER
	var str = Math.round(parseFloat(filterNum(theNum.value)));
	str = ""+str;
	return str;
}

function formatNum(theNum,decplaces,addcommas) {
// *** STOP USING THIS ***
// USE format_NUMBER
// FORMAT NUMERIC DATA

	var str = ""+theNum.value;
	if ((str == "") || (str == "null")) {
		theNum.value = "";
		return false;
	}
	if (decplaces == 0) {
		var fmtdnum = formatInteger(theNum,decplaces);
	} else {
		var fmtdnum = formatRealNum(theNum,decplaces);
	}
	if (addcommas) {
		fmtdnum = commaFmt(fmtdnum);
	}
	theNum.value = fmtdnum;
	return true
}

function format_Real(theNum,decplaces) {
// FORMAT A REAL NUMBER TO THE DESIRED DECIMAL PLACE
	var str = filterNum(theNum);
	str = Math.round(parseFloat(str) * Math.pow(10,decplaces));
	str = ""+str;
	while (str.length <= decplaces) {
		str = "0" + str;
	}
	var decpoint = str.length - decplaces;
	return str.substring(0,decpoint) + "." + str.substring(decpoint,str.length);
}

function format_Integer(theNum) {
// FORMAT AN INTEGER
	var str = filterNum(theNum);
	str = Math.round(parseFloat(str));
	return ""+str;
}

function format_Number(theNum,decplaces,addcommas) {
// FORMAT NUMERIC DATA
	var str = ""+theNum;
	if ((str == "") || (str == "null"))
		return "";

	if (decplaces == 0)
		var fmtdnum = format_Integer(str,decplaces);
	else
		var fmtdnum = format_Real(str,decplaces);
		
	if (addcommas) 
		fmtdnum = commaFmt(fmtdnum);
//	if (isNaN(fmtdnum))
//		return ""; 
	return fmtdnum;
}

function validateNum(theNum,decplaces,min,max,addcommas) {
// VALIDATE & FORMAT USER INUPT
	var str = filterNum(theNum.value);
	if ((str == "") || (str == "null")) {
		theNum.value = "";
		return false;
	}
	var tmpFloat = parseFloat(filterNum(theNum.value));
	
	if (tmpFloat < min || tmpFloat > max) {
		alert("Please enter a number between " + min + " and " + max + ".");
		theNum.value = "";
		theNum.focus();
		return false;
	}
	if (decplaces == 0) {
		var fmtdnum = formatInteger(theNum,decplaces);
	} else {
		var fmtdnum = formatRealNum(theNum,decplaces);
	}
	if (addcommas) {
		fmtdnum = commaFmt(fmtdnum);
	}
	theNum.value = fmtdnum;
	return true
}

function validatePrice(theNum,min,max,addcommas) {
// VALIDATE & FORMAT USER INUPT
	var str = filterNum(theNum.value);
	if ((str == "") || (str == "null")) {
		theNum.value = "";
		return false;
	}
	var tmpFloat = parseFloat(filterNum(theNum.value));
	
	if (tmpFloat < min || tmpFloat > max) {
		alert("Please enter a number between " + min + " and " + max + ".");
		theNum.value = "";
		theNum.focus();
		return false;
	}
	if (tmpFloat < 100) {
		decplaces = 2;
	} else {
		decplaces = 0;
	}
	
	if (decplaces == 0) {
		var fmtdnum = formatInteger(theNum,decplaces);
	} else {
		var fmtdnum = formatRealNum(theNum,decplaces);
	}
	if (addcommas) {
		fmtdnum = commaFmt(fmtdnum);
	}
	theNum.value = fmtdnum;
	return true
}

// SUBMIT VALIDATION

function replace_Char (unwantedChar,wantedChar,theStr) {
	while ((x=theStr.indexOf(unwantedChar)) != -1) {
		theStr = theStr.substring(0,x) + wantedChar 
			+ theStr.substring(x+unwantedChar.length,theStr.length);
	}	
	return theStr;
}

function parse_Wildcards (theStr,minWildcardPosition) {
	theStr = scrub_String_Unwanted(theStr,"%_");
	if (minWildcardPosition == 0) {
		if (theStr.indexOf("*") != -1 || theStr.indexOf("?") != -1 ) {
			alert("Wildcards are not allowed in this field.");
			theStr = replace_Char("*","",theStr);
			theStr = replace_Char("?","",theStr);
		}
	} else {
		var tmpStr = theStr.substring(0,minWildcardPosition);
		if (tmpStr.indexOf("*") != -1 || tmpStr.indexOf("?") != -1 ) {
			alert("A wildcard can only be used after character " + minWildcardPosition 
				+ " in this field.");
			theStr = replace_Char("*","",theStr);
			theStr = replace_Char("?","",theStr);
		} else {
			var x = theStr.indexOf("*");
			if (x != -1) {
				tmpStr = theStr.substring(x+1,theStr.length);
				if (tmpStr.indexOf("*") != -1 ) {
					alert("Only one * wildcard is allowed in this field.");
					theStr = replace_Char("*","",theStr);
					theStr = replace_Char("?","",theStr);
				}
			}
		}
	}
	return theStr;
}


function scrub_String_Unwanted(theStr,charsUnwanted) {
	// eliminate all unwanted chars
	var result = "";
	var theChar = "";
	var ok = true;
	var i = 0;
	for(i=0;i<=theStr.length;i++) {
		theChar = theStr.charAt(i);
		if (theChar == '"') // really bad ones
			result += "`"
		else if (theChar == "'")
			result += "`"
//		else if (theChar == "`")
//			theChar = ""
		else if (charsUnwanted.indexOf(theChar) == -1)
 			result += theChar;
	}
	return result;
}


function scrub_Text (theStr,makeUpper,minWildcardPosition,allowQuotes) {
// strip spaces off ends of string
	theStr += "";
	if (theStr == "null" || theStr == "")
		return "";
	for(var i=0; i<theStr.length; i++) {
		if(theStr.charAt(0) != " ")
			break;
		theStr = theStr.substring(1,theStr.length);
	}
	for(i=theStr.length-1; i>=0; i--) {
		if(theStr.charAt(i) != " ")
			break;
		theStr = theStr.substring(0,i);
	}

	var perc = "";
	if (makeUpper) {
		theStr = theStr.toUpperCase();
		perc = "%_";
	}
	if (allowQuotes != 'true')
		theStr = scrub_String_Unwanted(theStr,perc);

//	if (allowQuotes == 'undefined' || allowQuotes != 'true')
//		theStr = scrub_String_Unwanted(theStr,"");
//
//	if (makeUpper)
//		theStr = theStr.toUpperCase();

	if (minWildcardPosition && minWildcardPosition > '')
		theStr = parse_Wildcards (theStr,minWildcardPosition);

	return theStr;
}

function str_Empty (theFormObj){
	if (theFormObj.value+"" == "null")
		return true;
	else if (theFormObj.value == "")
		return true;
	return false;
}

function popup_Empty(theMenuObj) {
	var theSelection = theMenuObj.selectedIndex;
	if (theSelection == -1)
		return true;
	else if (theMenuObj.options[theSelection].value == '')
		return true;
	else
		return false;
}

function field_Empty (theFormObj){
	if (!theFormObj) {
		//alert("Please report this to systems support.\nUNKOWN FORM OBJECT"+theFormObj);
		//return false;
		return false;
	}
//	alert("field_Empty: " + theFormObj.name + " / " + theFormObj.type);
	var theType = theFormObj.type;
	if (theType.indexOf('select') != -1)
		return popup_Empty(theFormObj)
	else
		return str_Empty (theFormObj)
}



function list_Empty(theMenuObj) {
	var isEmpty = true;
	for(i=1;i<theMenuObj.length;i++) {
		if (theMenuObj.options[i].selected)
			isEmpty = false;
	}
	return isEmpty;
}

function dateOK(dayObj,monthObj,yearObj) {
	var dayEmpty = popup_Empty(dayObj);
	var monthEmpty = popup_Empty(monthObj);
	var yearEmpty = popup_Empty(yearObj);
	if (dayEmpty&&monthEmpty&&yearEmpty)
		return true;
	if (!dayEmpty&&!monthEmpty&&!yearEmpty)
		return true;
	return false;
}

function dateRange_OK(fromDayObj,fromMonthObj,fromYearObj,toDayObj,toMonthObj,toYearObj)
{
	var fromDay = fromDayObj.options[fromDayObj.selectedIndex].value ;
	var fromMonth =fromMonthObj.options[fromMonthObj.selectedIndex].value;
	var fromYear = fromYearObj.options[fromYearObj.selectedIndex].value;
	var toDay = toDayObj.options[toDayObj.selectedIndex].value;
	var toMonth = toMonthObj.options[toMonthObj.selectedIndex].value;
	var toYear = toYearObj.options[toYearObj.selectedIndex].value;
	if (toDay.length == 1)
		toDay = '0'+toDay;
	if (toMonth.length == 1)
		toMonth = '0'+toMonth;
	if (fromDay.length == 1)
		fromDay = '0'+fromDay;
	if (fromMonth.length == 1)
		fromMonth = '0'+fromMonth;
	var fromDate = fromYear+""+fromMonth+""+fromDay;
	var toDate = toYear+""+toMonth+""+toDay;
	if (parseInt(fromDate) > parseInt(toDate))
		return false;
	return true;
}

function numberRange_OK(fromNumObj,toNumObj)
{
	if (fromNumObj.value == "" || toNumObj.value == "")
		return true;
		
	var tmpFromFloat = parseFloat(filterNum(fromNumObj.value));
	var tmpToFloat = parseFloat(filterNum(toNumObj.value));
	if (tmpToFloat < tmpFromFloat) {
		alert(toNumObj.name+"  is greater than  "+toNumObj.name+"   Please re-enter");
		fromNumObj.value = "";
		toNumObj.value = "";
		fromNumObj.focus();
		return false;
	}
	return true;
}

function wildcard_Alert () {
	alert('Wildcard Search Enabled\n  "?" - Searches for any single character.\n'
		+ '  "*" - Searches for any characters of any length.');
}

function scrub_multi_value_field(fieldContents,minWildcardPosition) {
// Scrub fields that allow for multiple comma delimited values for queries
	var result = "";
	if (fieldContents == "" || fieldContents=='undefined')
		return "";
	if (minWildcardPosition == "" || minWildcardPosition=='undefined')
		minWildcardPosition = 0;

	fieldContents = scrub_Text (fieldContents,true);
	if (fieldContents.indexOf(",") == -1) {
			result = parse_Wildcards (fieldContents,minWildcardPosition);
	}
	else {
		var fieldContents_Array = fieldContents.split(",");
	
		for(var sc_x=0;sc_x < fieldContents_Array.length; sc_x++) {
	  		if (fieldContents_Array[sc_x] == "") 
	  			continue;
	  		if(fieldContents_Array[sc_x].charAt(0) == " ")
				fieldContents_Array[sc_x] = fieldContents_Array[sc_x].substring(1,fieldContents_Array[sc_x].length);
	  		if(fieldContents_Array[sc_x].charAt(fieldContents_Array[sc_x].length - 1) == " ")
				fieldContents_Array[sc_x] = fieldContents_Array[sc_x].substring(0,fieldContents_Array[sc_x].length - 1);
			result = result + parse_Wildcards (fieldContents_Array[sc_x],minWildcardPosition);
			result = result + ",";
		}
		// remove commas from the end of the string
		for(sc_i=result.length-1; sc_i>=0; sc_i--) {
			if(result.charAt(sc_i) != ",")
				break;
			result = result.substring(0,sc_i);
		}
	}
	return result;
}

// onChange='return scrub_select_mult(this, 5);' //
function scrub_select_mult(elem, maxn) { 
	var valid = true;
	var cnt = 0;
	for (var i=0; i<elem.options.length; i++) {
		if (valid) {
			if (elem.options[i].selected) { 
				cnt ++;
				if (cnt > maxn) { 
					valid = false;
					alert("You can select only " + maxn + " items in the list"); 
					elem.options[i].selected = false; 
				}
			}
		} else {
			elem.options[i].selected = false; 
		}
	}
	return valid; 
}

/* Function: check_CriteriaCount
 * Desc: To determine if sufficient fields have been selected to continue
 * Criteria:
 *        nMinimum: Minimum number of elements that must be selected
 *        sIgnore: Comma delimited list of fields to ignore - eg: "sortorder,sortname,"
 *        sAutoAccept: Comma delimited list of fields to autoaccept if they are filled in
 */
/*
function check_CriteriaCount(nMinimum, sIgnore, sAutoAccept) {
	var form = document.forms[0];	
	
	// get the minimum number of fields that must be selected
	var nMin = Number(nMinimum);
	var nCriteriaCount = 0;

	for (var nCounter = 0; nCounter < form.elements.length; nCounter++) {
		// first check if we are to ignore this element
		if (sIgnore.indexOf(form.elements[nCounter].name + ",") > -1)
			continue;
		switch(form.elements[nCounter].type) {
			case "text":
				// check if the field was filled
				if (form.elements[nCounter].value != "") {
					// now check if we auto accept it
					if (sAutoAccept.indexOf(form.elements[nCounter].name + ",") > -1) {
						nCriteriaCount = nMinimum;
					} else {
						nCriteriaCount++;
					}
				}				
				break;
				
			case "select-one":
				// check if the field was filled
				if (form.elements[nCounter].selectedIndex != 0) {
					// now check if we auto accept it
					if (sAutoAccept.indexOf(form.elements[nCounter].name + ",") > -1) {
						nCriteriaCount = nMinimum;
					} else {
						nCriteriaCount++;
					}
				}				
				break;
				
			case "select-multiple":
				// check if the field was filled
				if (form.elements[nCounter].selectedIndex != -1) {
					// now check if we auto accept it
					if (sAutoAccept.indexOf(form.elements[nCounter].name + ",") > -1) {
						nCriteriaCount = nMinimum;
					} else {
						nCriteriaCount++;
					}
				}				
				break;
			case "hidden":
				// we can ignore these
				break;
			default:
				// we can ignore any other types of tags
		}
		if (nCriteriaCount >= nMin) 
			break;
	}

	if (nCriteriaCount < nMin) {
		alert("You must select a least "+ nMin +" search criteria.");
			return false;
	}

	return true;
}
*/

// Postal Code Check and Scrub space
function checkPostal(theObject,removeSpace) {
	var a = theObject.value;
	var b = "";
	var u = "";
	var numString="1234567890";
	var failed = false;

	a = scrub_Text(a,true);
	a = scrub_String_Unwanted(a," ");
	if (a.length < 1)
		return true;
		
	for(i=0;i<=5;i++) {
		var u = a.charAt(i);
		
		if (i==1||i==3||i==5) {
			if (!isNum(u)) 
				failed=true;
		} 
		else {
			if (isChar(u)) 
				u=u.toUpperCase();
			else 
				failed=true;
		}
		var b = b + u;
	}
	if (!removeSpace)
	  b = b.substring(0,3)+" "+b.substring(3,6);

	theObject.value = b;

	return !(failed);
}

function isNum(inString)  {
	if(inString.length!=1) 
		return false;
	var refString="1234567890";
	if (refString.indexOf(inString,0) == -1) 
		return false;
	return true;
}

function isChar(inString)  {
	if(inString.length!=1) 
		return false;
	var refString="abcdefghijklmnopqrstuvwxyzABCEDFGHIJKLMNOPQRSTUVWXYZ";
	if (refString.indexOf(inString,0) == -1) 
		return false;
	return true;
}

// Date & Time Entry and Formating

// May 12, 1999 - ANK Created

function format_date(d) {
	if (!d.getTime())  return "Invalid Date";
	var y = d.getFullYear();
	var m = d.toString().substring(4,7);
	var a = d.getDate(); 
	return a + "-" + m.toUpperCase() + "-" + y;
//	return m + " " + a + ", " + y;
}

function format_time(d) {
	if (!d.getTime())  return "Invalid Time";
	var h = d.getHours();    h = (h<10)?("0"+h):(""+h);
	var m = d.getMinutes();  m = (m<10)?("0"+m):(""+m);
	var s = d.getSeconds();  s = (s<10)?("0"+s):(""+s);
	return h + ":" + m + ":" + s;
}

/*
function join_date(date, time, type, def_date) {
	if ((!date)&&(!time)) return "";

	if (!date) { 
		var d;
		if (def_date) d = new Date(def_date);
			else      d = new Date(); 
		date = format_date(d); 
	}
	if (!time) {
		switch (type) {
			case "start":   time = "00:00:00"; break;
			case "end":     time = "23:59:59"; break;
		    case "current": time = format_time(new Date()); break;
		    case "default": time = format_time(new Date(def_date)); break;
		    default:        return "";
		}
	}
	return date + "  " + time;
}
*/

function scrub_Date(theStr, def_date) {
	var str = String(theStr);
	if ((!str)||(str == "")) { return ""; }

	var p;
	while((p=str.indexOf("-")) >= 0)
		str = str.substring(0,p) + " " + str.substring(p+1,str.length);

	var c;
	if (def_date) c = new Date(def_date);
		else      c = new Date();
	var d = new Date(str);
	if (!d.getTime()) { d = new Date(str + " " + c.getFullYear()); }
	if (!d.getTime()) {	d = new Date((c.getMonth()+1) + "/" + str + " " + c.getFullYear()); }

	if (d.getTime()) {
		var x = c.getFullYear();
		var y = d.getFullYear();
		if (y < x-10) { d.setFullYear(x-10); }
		if (y > x+10) { d.setFullYear(x+10); }
		return format_date(d);
	} else {
//		alert('Invalid date: "' + theStr +'"\n \n'
//			+ 'Please use one of the following formats:\n'
//			+ '"May 31 1999", "05/31/1999", "May 31" or "31"');
		return "";
	}
}

function date_format_help() {
    alert('Date: \n \n'
		+ 'Please use one of the following formats:\n'
		+ '"31-MAY-1999" or\n'
		+ '"May 31 1999", "05/31/1999", "May 31", "31"');
}

function scrub_Time(theStr) {
	var str = String(theStr);
	if ((!str)||(str == "")) { return ""; }
	
	var p, pm="";
	str = str.toUpperCase();
	if ((p=str.indexOf("PM")) >= 0) { pm = "PM"; str = str.substring(0,p); }
	if ((p=str.indexOf("AM")) >= 0) { pm = "AM"; str = str.substring(0,p); }

	while((p=str.indexOf(" :")) >= 0)
		str = str.substring(0,p) + str.substring(p+1,str.length);
	while(str.charAt(str.length-1) == " ")
		str = str.substring(0,str.length-1);

	var d = new Date("Jan 1, 1970 " + str + " " + pm);
	if (!d.getTime()) { d = new Date("1/1/1970 " + str + ":00" + " " + pm); }
	if (d.getTime()) {
		if ((pm=="AM") && (d.getHours()==12)) d.setHours(0);
		if ((pm=="PM") && (d.getHours()==0)) d.setHours(12);
		return format_time(d);
	} else {
		alert("Invalid time: " + theStr +"\n \n"
			+ "Please use one of the following formats:\n"
			+ "14:15:00,  14:15,  14  or  2 PM");
		return "";
	}
}

//------ New style Functions --------------------------------------------------

function _not_ready(elem, msg) {
	elem.form._relem = elem;
	elem.form._ready = false;
	setTimeout("alert('" + msg + "');", 1);
}

function try_to_submit(fm) {
	for (var i=0; i<fm.length; i++) {
		if (fm.elements[i].blur) { 
			fm.elements[i].blur(); // triggers onChange() before submit() (for IE)
		} 
	}
	if (!fm._ready) {
		fm._relem.focus();
		return;
	}
	fm.submit();
}

function scrubDate(elem) {
	var x = scrub_Date(elem.value);
	if (x == '' && elem.value != '') {
		_not_ready(elem, 'Invalid date format: "' + elem.value +'"\\n \\n'
			+ 'Please use one of the following formats:\\n'
			+ '"31-MAY-1999" or\\n'
			+ '"May 31 1999", "05/31/1999", "May 31", "31"');
	}
	elem.value = x;
}

function scrubText(elem) {
	elem.value = scrub_Text(elem.value,false);
}
function scrubUpperText(elem) {
	elem.value = scrub_Text(elem.value,true);
}
    
function scrubLongText(elem, numb) {
    numb = Number(numb);
	var res = scrub_Text(elem.value, false);
	if (res.length > numb) { 
		res = res.substring(0,numb); 
		_not_ready(elem, 'The text was longer than '+ numb +' characters. It has been truncated.'); 
	}
    elem.value = res;
}

function scrubSearchText(elem) {
    var v_text = scrub_Text(elem.value,true);
    var v_char = v_text.substring(0,1);
    var numbers = '01234567890 ';
    var hasNumb = false;
    while (v_char != "" && numbers.indexOf(v_char) >= 0) {
        v_text = v_text.substring(1, v_text.length);
    	v_char = v_text.substring(0,1); 
        hasNumb = true;
    }
    if (hasNumb) {
    	_not_ready(elem, 'Leading numbers in Company field will be ignored in the search');
    }
    elem.value = scrub_String_Unwanted(v_text,'/');
}