// JavaScript Document

//# getObject( sID )
//# getCollection( sID, sTagName )
//# getCollectionByObject( oObj, sTagName )
//#	trim( sString )
//#	leftTrim( sString )
//#	rightTrim( sString )
//#	encode( sValue )
//#	decode( sValue )
//# htmlentities( sValue );
//# removeHTMLFormatting( sValue );
//#	getCharArray( value )
//#	substrCount( value , thing )
//#	inArray( value, array )
//# display( array, keys, name ) 
//#	throwException( file_name, line_num, ex, msg )

//# 08-18-07 : getSelectedValues( oSelect ); returns a comma-delimited list of selected values
//# 08-18-07 : replaceOptions( value_array, text_array, id, keep_first ); replaces options of id with arrays
//# 08-18-07 : getValues( oSelect ); returns selected OPTIONS as a comma-delimited list
//# 08-18-07 : getTableCellWidths( oTable ); returns the cell widths of a table object. 

//# 08-26-07 : createChildObject( c_id, p_id, tag_name ); creates and appends a new object (c_id) to a parent (p_id)

//# 09-01-07 : getScrollOffsetTop(); returns the measure from the top of the client window to the topmost of the document
//# 09-01-07 : getScrollOffsetLeft(); returns the measure from the left of the client window to the leftmost of the document

//# 10-16-07 : ucwords(); destroys planets.

function getObject( sID ){
	
	try{
			
		return document.getElementById( sID );
			
	}catch(e){ throwException( 'process_scripts.js : getObject()', e.lineNumber, e, e.message ); }
		
}

function getCollectionById( sID, sTagName ){
	
	try{
			
		return document.getElementById( sID  ).getElementsByTagName( sTagName );
			
	}catch(e){ throwException( 'process_scripts.js : getCollection()', e.lineNumber, e, e.message ); }
		
}

function getCollectionByObject( oObj, sTagName ){
	
	try{
			
		return oObj.getElementsByTagName( sTagName );
			
	}catch(e){ throwException( 'process_scripts.js : getCollectionByObject()', e.lineNumber, e, e.message ); }
		
}



function trim( sString ){
	
	try{
			
		if( sString.length > 0 ){

			sString = leftTrim( sString );
			sString = rightTrim( sString );
		
		}
		
		return sString;
			
	}catch(e){ return sString; }
	
}

//trim spaces: Front
function leftTrim( sString ){
	
	try{
			
		if( sString.length > 0 ){
			
			var i = 0;
			var charHere = sString.charAt(0);

			while ( charHere == ' ' || charHere == "\t" ){ //first, strip any SPACES
				i++;	
				charHere = sString.charAt(i);
			}
			
			sString = sString.substring( i, sString.length );
		}
		
		return sString;
			
	}catch(e){ return sString; }
	
}

//trim spaces: BACK
function rightTrim( sString ){
	
	try{
		
		if( sString.length > 0 ){
			
			var i = 0;
			var charHere = sString.charAt( sString.length + i -1);

			while ( charHere == ' ' || charHere == "\t" ){ //first, strip any SPACES
				i--;	
				charHere = sString.charAt( sString.length + i -1 );
			}
			
			sString = sString.substring( 0, sString.length + i );
			
		}
	
		return sString;
		
	}catch(e){ return sString; }
	
}


//### encode( sValue )
//##
//#	  encodes special characters to a given their HTML or URL code
function encodeQuotes( sValue ){
	try{
		
		sValue = sValue.replace( /'/g, ''' );
		sValue = sValue.replace( /"/g, '"' );
		return sValue;
		
	}catch(e){ return sValue; }
}
function decodeQuotes( sValue ){
	try{
		
		sValue = sValue.replace( /'/g, "'" );
		sValue = sValue.replace( /"/g, '"' );
		return sValue;
		
	}catch(e){ return sValue; }
}

function encode( sValue ){
	
	try{
		
		sValue = sValue.replace( /'/g, ''' );
		sValue = sValue.replace( /"/g, '"' );
		sValue = sValue.replace( /:/g, ":" );
		sValue = sValue.replace( /,/g, "," );
		sValue = sValue.replace( /'/g, "'" );
		sValue = sValue.replace( /"/g, '"' );
		sValue = sValue.replace( /</g, "&lt;" );
		sValue = sValue.replace( />/g, '&gt;' );
		sValue = sValue.replace( /<script/g, '...' );
		sValue = sValue.replace( /<style/g, '...' );

		return sValue;
		
	}catch(e){ return sValue; }
	
}

function urlEncode( sValue ){

	try{
		
		sValue = sValue.replace( / /g, "%20" );
		sValue = sValue.replace( /&/g, "%26" );
		//sValue = sValue.replace( /'/g, '%27' );
		sValue = sValue.replace( /"/g, '%22' );
		sValue = sValue.replace( /#/g, "%23" );
		sValue = sValue.replace( /\//g, "%2F" );
		
		return sValue;
		
	}catch(e){ return sValue; }
	
}

//### decode( sValue )
//##
//#	  decodes special characters from their HTML or URL code
function decode( sValue ){
	
	try{

		sValue = sValue.replace( /%20/g, " " );
		sValue = sValue.replace( /%26/g, "&" );
		sValue = sValue.replace( /%27/g, "'" );
		sValue = sValue.replace( /%22/g, '"' );
		sValue = sValue.replace( /%23/g, "#" );
		sValue = sValue.replace( /%2F/g, "/" );
		
		sValue = sValue.replace( /&#58;/g, ":" );
		sValue = sValue.replace( /&#44;/g, "," );
		sValue = sValue.replace( /&amp;/g, "&" );
		sValue = sValue.replace( /&#039;/g, "'" );
		sValue = sValue.replace( /&quot;/g, '"' );
		sValue = sValue.replace( /&lt;/g, "<" );
		sValue = sValue.replace( /&gt;/g, '>' );
		
		return sValue;
		
	}catch(e){ return sValue; }
	
}

function htmlentities(sValue){
	
	try{
		sValue = sValue.replace( /</g, "&lt;" );
		sValue = sValue.replace( />/g, "&gt;" );
			
		return sValue;
		
	}catch(e){ return sValue; }
	
}

function removeHTMLFormatting(sValue){
	
	try{
		sValue = sValue.replace( /<b>/g, "" );
		sValue = sValue.replace( /<i>/g, "" );
		sValue = sValue.replace( /<strong>/g, "" );
		sValue = sValue.replace( /<em>/g, "" );
		sValue = sValue.replace( /<\/b>/g, "" );
		sValue = sValue.replace( /<\/i>/g, "" );
		sValue = sValue.replace( /<\/strong>/g, "" );
		sValue = sValue.replace( /<\/em>/g, "" );
			
		return sValue;
		
	}catch(e){ return sValue; }
	
}


function addSlashes( sValue ){
	
	try{
		
		return sValue.replace( /'/g, "\\'" );
		
	}catch(e){ return sValue; }
	
}
function removeSlashes( sValue ){
	
	try{
		
		return sValue.replace( /\\'/g, "'" );
			
	}catch(e){ return sValue; }
	
}


//### getCharArray( value )
//##
//#
function getCharArray( value ){
	
	try{
		
		var char_array = new Array();
		for( i = 0; i < value.length; i++ ){
			char_array[i] = value.charAt(i);
		}
		return char_array;
		
	}catch(e){ return value; }
	
}
	

function substrCount( value , thing ){
	
	try{
		
		var count = 0;
		
		for( i = 0; i < value.length; i++ ){
		
			if( value.charAt(i) == thing ){ count++; }
			
		}
		
		return count;
		
	}catch(e){ return 0; }
			
}


function inArray( value, array ){
	
	try{
		
		for( zzzzz = 0; zzzzz < array.length; zzzzz++ ){
			
			if( array[zzzzz] == value ){
				return true;
			}
			
		}
		
		return false;

	}catch(e){ throwException( 'process_scripts.js : inArray()', e.lineNumber, e, e.message ); }

}


function display( array, keys, name ){
	
	try{
		
		var str = "";
		var key = 0;
		
		var count = 0;
		switch( name ){
			
			case "facilities_array":
				count = 5;
			break;
			
		}
		
		if( typeof array == "string" ){
			str += array;
		}else if( typeof array == "object" ){
			
			str += "Array(){\n";
			
			for( i = 0; i < array.length; i++ ){
				
				if( typeof array[i] == "string" ){
					
					key = ( keys == "" )? i : ( typeof keys[0] == "string" )? keys[i] : i ;
					
					str += "\t"+name+"["+key+"] = "+htmlentities(array[key])+"\r\n";
					
				}else if( typeof array[i] == "object" ){
					
					str += "\tArray(){\n";
					
					this_count = ( count > 0 )? count : array[i].length ;
					for( j = 0; j < this_count; j++ ){
						
						key = ( keys == "" )? j : ( typeof keys[0][0] == "string" )? keys[0][j] : j ;
						
						str += "\t\t"+name+"["+i+"]["+key+"] = "+htmlentities(array[i][key])+"\r\n";
						
					}
					
					str += "\t}\n";
					
				}
				
			}
			
			str += "}\n";
		}
		
		return "<pre>"+str+"</pre>";
			
	}catch(e){ throwException( 'main_library.js : display()', e.lineNumber, e, e.message ); }
		
}

function displaySelect( oSelect ){
	
	var str = "Array(){\n";
	for( zzz = 0; zzz < oSelect.length; zzz++ ){
		str += "\t"+oSelect.id+"[value] = "+oSelect[zzz].value+"\r\n";
		str += "\t"+oSelect.id+"[text] = "+oSelect[zzz].text+"\r\n";
	}
	str += "}\n";
	
	return "<pre>"+str+"</pre>";
}



//### throwException( file_name, line_num, ex, msg )
//##
//#	  function that gives file LINE NUMBER when a JS Exception is thrown
function throwException( file_name, line_num, ex, msg ){
	
	var msg = "Error in FILE: " +file_name+ " LINE: " +line_num+ "\n\nTYPE: " +ex+ "\n\n" +msg+ "\n\n" +ex.stack;
	
	if( getObject('error_div') ){
		getObject('error_div').innerHTML = "<pre class=\"error\">"+msg+"</pre>";
	}else{
		alert( msg );
	}

}


function getSelectedValues( oSelect ){
	
	var list = "";
	for( zzz = 0; zzz < oSelect.length; zzz++ ){
		if( oSelect[zzz].selected ){
			list += ( list != "" )? "," : "" ;
			list += oSelect[zzz].value;
		}
	}
	
	return list;
	
}

function getValues( oSelect, del ){
	
	var list = "";
	for( zzz = 0; zzz < oSelect.length; zzz++ ){
		list += ( list != "" )? del : "" ;
		list += oSelect[zzz].value;
	}
	
	return trim( list );

}

function replaceOptions( aValue, aText, sSelectId, bKeepFirst, iSelectedIndex ){
	
	try{
		
		if(aValue.length == 0){ return; }
		
		oOptionToAdd = (arguments[5] ? arguments[5] : null );
		
		var oSelect = getObject(sSelectId);
		
		oSelect.length = (bKeepFirst)? 1 : 0 ;
		var first = oSelect.length;
		
		for( i = first; i < (aValue.length + first); i++ ){
			
			var no = new Option();
				no.value = aValue[i - first];
				no.text = aText[i - first];
					
			oSelect[i] = no;
			oSelect[i].selected = ( i == iSelectedIndex )? true : false ;
		
		}
		
		
		//###firefox bug? When messing with select options, an extra "undefined" option is tacked on.
		for( var i = 0; i < oSelect.length; i++ ){
			
			if( oSelect[i].text == "undefined" ){
				oSelect.removeChild(oSelect[i]);
			}
		
		}
		
		
		//# if we included a new OPTION to add (oOptionToAdd) to the select menu we get to play some fancy fanciness
		//# to add and sort (or is that sort, then add?), courtesy of MoveSelectedOptions()
		if(oOptionToAdd)
		{
			MoveSelectedOptions( "add_object", null, sSelectId, oOptionToAdd );
		}
		
	}catch(e){ throwException( 'main_librasry.js : replaceOptions()', e.lineNumber, e, e.message ); }

}


function replaceOptions2D( value_array, id, keep_first, selected_index ){
	
	try{
		
		var oSelect = getObject(id);
		
		oSelect.length = (keep_first)? 1 : 0 ;
		var first = oSelect.length;
		
		if( value_array.length > 0 )
		{
			for( i = first; i < (value_array.length + first); i++ ){
				
				var no = new Option();
					no.value = value_array[i - first][0];
					no.text = value_array[i - first][1];
			
				//alert( typeof no.value );
				
				oSelect[i] = no;
				oSelect[i].selected = ( i == selected_index )? true : false ;
			
			}
			
			//###firefox bug? When messing with select options, an extra "undefined" option is tacked on.
			if( oSelect[oSelect.length-1].value == "undefined" ){
				oSelect.length = oSelect.length - 1;
			}
		}
		
	}catch(e){ throwException( 'main_librasry.js : replaceOptions()', e.lineNumber, e, e.message ); }

}


function getTableCellWidths( oTable ){
	
	var tr = getCollectionByObject( oTable, "TR" )[0];
	var td = getCollectionByObject( tr, "TD" );
	
	var w = "";
	var total = 0 ;
	for( bb = 0; bb < td.length; bb++ ){
		
		w += ( w == "" )? "" : "," ;
		w += td[bb].clientWidth;
		
		total += td[bb].clientWidth;
		
	}
	
	return w+":"+total;
	
}



function error( value ){
	
//	var ele = ( typeof(error_div.tagName == 'undefined' ) )
//		? createChildObject( "div", "error_div", "body_tag", true )
//		: getObject('error_div')
//	;
	
	getObject('error_div').innerHTML = "<pre>"+value+"</pre>";	
	
}


function getScrollOffsetTop(){
	try{
		
		var pos = 0;
		
		if (window.innerHeight){ pos = window.pageYOffset; }
		else if (document.documentElement && document.documentElement.scrollTop){ pos = document.documentElement.scrollTop; }
		else if (document.body){ pos = document.body.scrollTop ; }
		
		return pos;
		
	}catch(e){ throwException( 'main_librasry.js : getScrollOffsetHeight()', e.lineNumber, e, e.message ); }
}

function getScrollOffsetLeft(){
	try{
		
		var pos = 0;
		
		if (window.innerWidth){ pos = window.pageXOffset; }
		else if (document.documentElement && document.documentElement.scrollLeft){ pos = document.documentElement.scrollLeft; }
		else if (document.body){ pos = document.body.scrollLeft ; }
		
		return pos;
		
	}catch(e){ throwException( 'main_librasry.js : getScrollOffsetHeight()', e.lineNumber, e, e.message ); }
}


function getObjScrollOffsetTop( oObj ){
	try{
		
		var pos = oObj.scrollHeight;
		
//		if (window.innerHeight){ pos = oObj.YOffset; }
//		else if (document.documentElement && document.documentElement.scrollTop){ pos = oObj.documentElement.scrollTop; }
//		else if (document.body){ pos = oObj.scrollTop ; }
		
		return pos;
		
	}catch(e){ throwException( 'main_librasry.js : getScrollOffsetHeight()', e.lineNumber, e, e.message ); }
}

function getObjScrollOffsetLeft( oObj ){
	try{
		
		var pos = 0;
		
		if (window.innerWidth){ pos = window.pageXOffset; }
		else if (document.documentElement && document.documentElement.scrollLeft){ pos = document.documentElement.scrollLeft; }
		else if (document.body){ pos = document.body.scrollLeft ; }
		
		return pos;
		
	}catch(e){ throwException( 'main_librasry.js : getScrollOffsetHeight()', e.lineNumber, e, e.message ); }
}



function ucwords( sValue ){
	try{
		
		sValue = trim(sValue);
		
		if( sValue.indexOf(" ") != -1 ){
			var word_array = sValue.split(" ");
			
			for( var i = 0; i < word_array.length; i++ ){
				
				if( word_array[i] != "" ){
					word_array[i] = ucChar( word_array[i] );
				}
				
			}
			
			sValue = word_array.join(" ");
			
		}else{
			
			sValue = ucChar( sValue );	
			
		}
		
		return sValue;
		
	}catch(e){ return sValue; }
}

function ucChar( sValue ){
	try{
		
		var uc_char = sValue.charAt(0).toUpperCase();
		
		sValue = uc_char + sValue.substring( 1 );
		
		return sValue;
		
	}catch(e){ return sValue; }
}


function addslashes( value ){
	try{
		
		value = value.replace( /'/g, "\\'" );
		return value;
		
	}catch(e){ return value; }
}

function stripslashes( value ){
	try{
		
		value = value.replace( /\\/g, "" );
		return value;
		
	}catch(e){ return value; }
}


function isArray( oObj ){
	try{
		return ( oObj.length > -1 );
	}
	catch(e)
	{
		return false;
	}
}










function DelayFunctionCall( oFunction, iDelay )
{//# a quaint little function to delay calls via setTimeout(); 
 //# oFunction is passed as funtion(){ FuncitonToBeDelayed(parameters) }
	setTimeout( oFunction, iDelay );
}







/* ### BETA FUNCTIONS AND METHODS ... ### */

function ListProperties(obj) { //dumpProps()
	var obj_props = "";
	// Go through all the properties of the passed-in object
	for (var i in obj) {
		
		// if a parent (2nd parameter) was passed in, then use that to
		// build the message. Message includes i (the object's property name)
		// then the object's property value on a new line
		if (arguments[1]) { var msg = arguments[1] + "." + i + " : " + obj[i]; } else { var msg = i + " : " + obj[i]; }
		obj_props += msg + "\n";
		
		// Display the message. If the user clicks "OK", then continue. If they
		// click "CANCEL" then quit this level of recursion
		//if (!confirm(msg)) { return; }
		
		// If this property (i) is an object, then recursively process the object
		if (typeof obj[i] == "object") {
			if (arguments[1]) { ListProperties(obj[i], parent + "." + i); } else { ListProperties(obj[i], i); }
		}
	}
	
	return obj_props;
	//return obj.getAttribute('al-filepath');
	
}




// written by Dean Edwards, 2005
// with input from Tino Zijdel, Matthias Miller, Diego Perini

// http://dean.edwards.name/weblog/2005/10/add-event/
// element	= the OBJECT to attach the event to
// type		= the type of EVENT; i.e. load, click
// handler	= the FUNCTION to call
function addEvent(element, type, handler) {
	if (element.addEventListener) {
		element.addEventListener(type, handler, false);
	} else {
		// assign each event handler a unique ID
		if (!handler.$$guid) handler.$$guid = addEvent.guid++;
		// create a hash table of event types for the element
		if (!element.events) element.events = {};
		// create a hash table of event handlers for each element/event pair
		var handlers = element.events[type];
		if (!handlers) {
			handlers = element.events[type] = {};
			// store the existing event handler (if there is one)
			if (element["on" + type]) {
				handlers[0] = element["on" + type];
			}
		}
		// store the event handler in the hash table
		handlers[handler.$$guid] = handler;
		// assign a global event handler to do all the work
		element["on" + type] = handleEvent;
	}
};
// a counter used to create unique IDs
addEvent.guid = 1;

function removeEvent(element, type, handler) {
	if (element.removeEventListener) {
		element.removeEventListener(type, handler, false);
	} else {
		// delete the event handler from the hash table
		if (element.events && element.events[type]) {
			delete element.events[type][handler.$$guid];
		}
	}
};

function handleEvent(event) {
	var returnValue = true;
	// grab the event object (IE uses a global event object)
	event = event || fixEvent(((this.ownerDocument || this.document || this).parentWindow || window).event);
	// get a reference to the hash table of event handlers
	var handlers = this.events[event.type];
	// execute each event handler
	for (var i in handlers) {
		this.$$handleEvent = handlers[i];
		if (this.$$handleEvent(event) === false) {
			returnValue = false;
		}
	}
	return returnValue;
};

function fixEvent(event) {
	// add W3C standard event methods
	event.preventDefault = fixEvent.preventDefault;
	event.stopPropagation = fixEvent.stopPropagation;
	return event;
};
fixEvent.preventDefault = function() {
	this.returnValue = false;
};
fixEvent.stopPropagation = function() {
	this.cancelBubble = true;
};

// This little snippet fixes the problem that the onload attribute on the body-element will overwrite
// previous attached events on the window object for the onload event
if (!window.addEventListener)
{
	document.onreadystatechange = function()
	{
		if (window.onload && window.onload != handleEvent)
		{
			addEvent(window, 'load', window.onload);
			window.onload = handleEvent;
		}
	}
}








var ns4 = document.layers;
var op5 = (navigator.userAgent.indexOf("Opera 5")!=-1) 
	||(navigator.userAgent.indexOf("Opera/5")!=-1);
var op6 = (navigator.userAgent.indexOf("Opera 6")!=-1) 
	||(navigator.userAgent.indexOf("Opera/6")!=-1);
var agt=navigator.userAgent.toLowerCase();
var mac = (agt.indexOf("mac")!=-1);
var ie = (agt.indexOf("msie") != -1); 
var mac_ie = mac && ie;
function FindPos(obj) 
{
	var curleft = curtop = 0;
	if (obj.offsetParent) 
	{
		do 
		{
			curleft += obj.offsetLeft;
			curtop += obj.offsetTop;
		} while (obj = obj.offsetParent);
		return [curleft,curtop];
	}
}


function GetDimensions(sId) 
{
	var elem;
	if (ns4) 
	{
		elem = getObjNN4(document, sId);
		return [elem.clip.width,elem.clip.height];
	} 
	else 
	{
		if(document.getElementById) {
			elem = document.getElementById(sId);
		} else if (document.all){
			elem = document.all[sId];
		}
		if(elem)
		{
			if (op5) { 
				return [elem.style.pixelWidth,elem.style.pixelHeight];
			} else {
				return [elem.offsetWidth,elem.offsetHeight];
			}
		}
	} 
}
function GetObjectDimensions(oObj) {
	if(oObj)
	{
		if (op5) { 
			return [oObj.style.pixelWidth,oObj.style.pixelHeight];
		} else {
			return [oObj.offsetWidth,oObj.offsetHeight];
		}
	}
}