﻿/*  --------------------------------------------------------------------------------------------------------------------------------------- */
	function fnModalWindow(strURL, intYSize, intXSize){
		//written  by eddiesoh2@yahoo.com 
		//purpose: to open a new window
		var strFeatures	= '';
		var strBrowser	= navigator.appName;

		
		if(intYSize == ''){
			intYSize = '400px';
		}//end if intYSize == ''
		
		if(intXSize == ''){
			intXSize = '400px';
		}//end if intXSize == ''
		
		if(strBrowser == 'Microsoft Internet Explorer'){
			//strFeatures = 'dialogHeight:' + intYSize + 'px; dialogWidth:' + intXSize +'px; center:yes; resizable:yes; status:yes; scroll:yes';
			
			strFeatures = strFeatures + 'dialogHeight:' + intYSize + 'px;';
			strFeatures = strFeatures + 'dialogWidth: ' + intXSize + 'px;';
			strFeatures = strFeatures + 'resizable:no;';
			strFeatures = strFeatures + 'status: no;';
			strFeatures = strFeatures + 'scroll: no;';
			strFeatures = strFeatures + 'toolbar:no;';
			window.showModalDialog(strURL, '', strFeatures);
			
		}else{
			//non IE specs and window dialog
			
			strFeatures = strFeatures + 'height='+ intYSize + ',';
			strFeatures = strFeatures + 'width=' + intXSize + ',';
			strFeatures = strFeatures + 'toolbar=no,';
			strFeatures = strFeatures + 'directories=no,';
			strFeatures = strFeatures + 'status=no,';
			strFeatures = strFeatures + 'menubar=no,';
			strFeatures = strFeatures + 'scrollbars=no,';
			strFeatures = strFeatures + 'resizable=no,';
			strFeatures = strFeatures + 'modal=yes,';
			strFeatures = strFeatures + 'center=yes';
			
			window.open(strURL, '', strFeatures);
		}//if strBrowser == 'Microsoft Internet Explorer'
		
		
	}//end fnModalWindow (strURL, intYSize, intXSize)	


/*  --------------------------------------------------------------------------------------------------------------------------------------- */
	function GetXMLElementByTag(strXML, strTagName, intElement){
		/*
			Author:		Eddie Soh, 10/1/03
			Purpose: 	to return a value of a pre xml string
			strXML:		raw xml string
			strTagName: the tag to look for
			intElement: which tag element
		*/
		var strReturnVal;
		var xmlDoc;
		
		try{
			//this version is MS IE and compatible only
			xmlDoc	= new ActiveXObject("Microsoft.XMLDOM");
			
			try{
				xmlDoc.async = "false";
				xmlDoc.loadXML(strXML);
				strReturnVal = xmlDoc.getElementsByTagName(strTagName).item(intElement).text;
				
			}catch(e2){
				alert('Error encountered when loading documents. e2' + e2);
			}//end try e2
		
		}catch(e1){
			//attempt for Non IE compatable browser
			var vParser = new DOMParser();
			
			try{
				xmlDoc	= vParser.parseFromString(strXML, "text/xml");
				
				if(xmlDoc == null){
					alert('Your browser is not up to date. Please use Internet Explorer 5.x or higher.');
				}else{
					if(xmlDoc.getElementsByTagName(strTagName)[intElement].hasChildNodes()){
						strReturnVal = xmlDoc.getElementsByTagName(strTagName)[intElement].firstChild.nodeValue;
					}else{
						strReturnVal = ''
					}//end check if there is childnode
					
				}//end if xmlDoc == null
				
				
			}catch(e3){
				alert('Error encountered when Initalising XML objects. e3: ' + e3);
			}//end try e3
			
		}//end 
		
		return strReturnVal;
	}//end function GetXMLElementByTag(strXML, strTagName, intElement)
	
	
/*  --------------------------------------------------------------------------------------------------------------------------------------- */
	function fnAddOptions2List(strValue, strLabel, strFieldName){
		//author: 	esoh 7/29/03
		//purpose:	add the value/label to strFieldName
	
		var optNew = document.createElement("OPTION");
		optNew.value	= strValue;
		optNew.text	= strLabel;
		
		//document.frmOrder.strContacts.options.add(optNew);		
		document.getElementById(strFieldName).options.add(optNew);
		
	}//AddOptions2List(strValue, strLabel, strFieldName)
	
	
	function fnClearOptionList(strFieldName){
		try{
			var x = document.getElementById(strFieldName).options.length;
			if(x >0){
				for (var i = 0; i < x; i++)	{
					document.getElementById(strFieldName).remove(0);
				}
			}
		}catch(e){
			alert("Error: Unable to clear contact list: " + e);
		}
	}//end function ClearOptionList(strFieldName)	
	
	
/*  --------------------------------------------------------------------------------------------------------------------------------------- */
	function rtclickcheck(keyp){ 
		var message = "function disabled"; 

		if (navigator.appName == "Netscape" && keyp.which == 3){ 	
			alert(message); 
			return false; 
		} 

		if (navigator.appVersion.indexOf("MSIE") != -1 && event.button == 2) { 	
			alert(message); 	
			return false; 
		} 
		
	} //end function function rtclickcheck(keyp)


/*  --------------------------------------------------------------------------------------------------------------------------------------- */
/*  --------------------------------------------------------------------------------------------------------------------------------------- */
/*  --------------------------------------------------------------------------------------------------------------------------------------- */
//------------------------------------------------------------------------------------------------------------------------------------------------------
//******************************************************************************************************************************************************

var dtCh= "/";
var minYear=1900;
var maxYear=2100;

function isInteger(s){
	var i;
    for (i = 0; i < s.length; i++){   
        // Check that current character is number.
        var c = s.charAt(i);
        if (((c < "0") || (c > "9"))) return false;
    }
    // All characters are numbers.
    return true;
}

function stripCharsInBag(s, bag){
	var i;
    var returnString = "";
    // Search through string's characters one by one.
    // If character is not in bag, append to returnString.
    for (i = 0; i < s.length; i++){   
        var c = s.charAt(i);
        if (bag.indexOf(c) == -1) returnString += c;
    }
    return returnString;
}

function daysInFebruary (year){
	// February has 29 days in any year evenly divisible by four,
    // EXCEPT for centurial years which are not also divisible by 400.
    return (((year % 4 == 0) && ( (!(year % 100 == 0)) || (year % 400 == 0))) ? 29 : 28 );
}
function DaysArray(n) {
	for (var i = 1; i <= n; i++) {
		this[i] = 31
		if (i==4 || i==6 || i==9 || i==11) {this[i] = 30}
		if (i==2) {this[i] = 29}
   } 
   return this
}

function isDate(dtStr){
	var strErrMsg	= '';
	var daysInMonth = DaysArray(12)
	var pos1		= dtStr.indexOf(dtCh)
	var pos2		= dtStr.indexOf(dtCh,pos1+1)
	var strMonth	= dtStr.substring(0,pos1)
	var strDay		= dtStr.substring(pos1+1,pos2)
	var strYear		= dtStr.substring(pos2+1)
	
	strYr = strYear
	
	if (strDay.charAt(0)=="0" && strDay.length>1) strDay=strDay.substring(1);
	
	if (strMonth.charAt(0)=="0" && strMonth.length>1) strMonth=strMonth.substring(1);
	
	for (var i = 1; i <= 3; i++) {
		if (strYr.charAt(0)=="0" && strYr.length>1) strYr=strYr.substring(1)
	}
	
	month 	= parseInt(strMonth)
	day		= parseInt(strDay)
	year	= parseInt(strYr)
	
	if (pos1==-1 || pos2==-1){
		strErrMsg = ("The date format should be : mm/dd/yyyy")
		return false
	}
	if (strMonth.length<1 || month<1 || month>12){
		strErrMsg = ("Please enter a valid month")
		return false
	}
	if (strDay.length<1 || day<1 || day>31 || (month==2 && day>daysInFebruary(year)) || day > daysInMonth[month]){
		strErrMsg = ("Please enter a valid day")
		return false
	}
	if (strYear.length != 4 || year==0 || year<minYear || year>maxYear){
		strErrMsg = ("Please enter a valid 4 digit year between "+minYear+" and "+maxYear)
		return false
	}
	if (dtStr.indexOf(dtCh,pos2+1)!=-1 || isInteger(stripCharsInBag(dtStr, dtCh))==false){
		strErrMsg = ("Please enter a valid date")
		return false
	}
	
	return true
} //end function isDate(dtStr)


//******************************************************************************************************************************************************
//------------------------------------------------------------------------------------------------------------------------------------------------------
