var root_url = location.href.substring(0,location.href.indexOf('/', 14)) + '/';
var http_request = false;
//*****************MAIN GET OBJECT FUNCTION*****************************
function getXMLHttpObject() {
	var xmlHttp = false;
	//Use IE's ActiveX items to load the file.
	if (typeof ActiveXObject != 'undefined') {
		try {xmlHttp = new ActiveXObject("Msxml2.XMLHTTP");}
		catch (e) {
			try {xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");}
			catch (E) {xmlHttp = false;}
		}
	//If ActiveX is not available, use the XMLHttpRequest of Firefox/Mozilla etc. to load the document.
	} else if (XMLHttpRequest) {
		try {xmlHttp = new XMLHttpRequest();}
		catch (ee) {xmlHttp = false;}
	}
	return xmlHttp;
}
//*****************MAIN SHOW HIDE ANY ID OR OBJECT FUNCTION****************************
//ELE CAN BE ANY ID OR OBJECT SH CAN BE *SHOW*HIDE*BOTH*LAST*
var last_showhide = "";
function showhide(sh,ele)  {
	if (typeof ele == "string")  {  ele = document.getElementById(ele);  }
	if (ele.className === "display" && sh !== "show")  { ele.className="hidden"; } 
	else if (ele.className === "hidden" && sh !== "hide")  { ele.className="display"; }
if (sh == "last")  {
if (last_showhide !== ele)  {
showhide_last();
}
last_showhide = ele;
}
}
//*****************RESET LAST SHOWHIDE FUNCTION****************************
function showhide_last()  {
if (last_showhide !== "")  {
last_showhide.className = "hidden";
}
}
//*****************PARSE JAVASCRIPT FROM AJAX RESPONSE*****************************
function parse_script(_source) {
		var source = _source;
		var scripts=[];
		// Strip out tags
		while(source.indexOf("<script") > -1 || source.indexOf("</script") > -1) {
			var s = source.indexOf("<script");
			var s_e = source.indexOf(">", s);
			var e = source.indexOf("</script", s);
			var e_e = source.indexOf(">", e);
			//Add to scripts array
			scripts.push(source.substring(s_e+1, e));
			//Strip from source
			source = source.substring(0, s) + source.substring(e_e+1);
		}
//Loop through every script collected and eval it
		for(var i=0; i<scripts.length; i++) {
			try {
				eval(scripts[i]);
			}
			catch(ex) {
			alert(source);	// do what you want here when a script fails
			}
		}
		// Return the cleaned source
		return source;
}
//*****************MAIN GET POST FORM FUNCTION*****************************
function makeRequest(url,g_container,parameters,method,operations) {
  var xmlHttp = getXMLHttpObject();
  xmlHttp.onreadystatechange = function()
  {
    if(xmlHttp.readyState < 4 && xmlHttp.readyState > 0)  {
	ol_launch('ol_loading_id',250,150,'ol_fade_layer_2');
      showhide('show',"main_loading_id");
    }
	if(xmlHttp.readyState === 4 && xmlHttp.status === 200)  {
     load_content(xmlHttp.responseText,g_container);
	ol_close('ol_loading_id','ol_fade_layer_2');
      showhide('hide',"main_loading_id");
    }
  }; 
//SEND EXTRA COMMANDS FOR PHP
	parameters += operations + "&rnd=" + Math.random();
	if (method === "GET")  {
      xmlHttp.open('GET', url + parameters, true);
      xmlHttp.send(null);
	}  else  {
      xmlHttp.open('POST', url, true);
      xmlHttp.setRequestHeader("Content-type", "application/x-www-form-urlencoded");
      xmlHttp.setRequestHeader("Content-length", parameters.length);
      xmlHttp.setRequestHeader("Connection", "close");
      xmlHttp.send(parameters);
	}
   }
//*****************GET NAMES AND VALUES FROM FORM*****************************
function get(obj,url,g_container,method,operations) {
	var getstr = "";
		if (method === "GET")  {
		getstr = "?";
		}
  for (i=0; i<obj.getElementsByTagName("input").length; i++) {
        if (obj.getElementsByTagName("input")[i].type === "submit") {
           getstr += submit_btn_name + "=" + "selected" + "&";
        }
        if (obj.getElementsByTagName("input")[i].type === "text") {
           getstr += obj.getElementsByTagName("input")[i].name + "=" + 
                   escape(encodeURI(obj.getElementsByTagName("input")[i].value)) + "&";
        }
        if (obj.getElementsByTagName("input")[i].type === "hidden") {
           getstr += obj.getElementsByTagName("input")[i].name + "=" + 
                   escape(encodeURI(obj.getElementsByTagName("input")[i].value)) + "&";
        }
        if (obj.getElementsByTagName("input")[i].type === "checkbox") {
           if (obj.getElementsByTagName("input")[i].checked) {
              getstr += obj.getElementsByTagName("input")[i].name + "=" + 
                   escape(encodeURI( obj.getElementsByTagName("input")[i].value)) + "&";
           } else {
              getstr += obj.getElementsByTagName("input")[i].name + "=&";
           }
        }
        if (obj.getElementsByTagName("input")[i].type === "radio") {
           if (obj.getElementsByTagName("input")[i].checked) {
              getstr += obj.getElementsByTagName("input")[i].name + "=" + 
                   escape(encodeURI( obj.getElementsByTagName("input")[i].value)) + "&";
           }
     }  

  }
  for (i=0; i<obj.getElementsByTagName("select").length; i++) {
        var sel = obj.getElementsByTagName("select")[i];
		if (sel.selectedIndex != -1)  {
	        getstr += sel.name + "=" + escape(encodeURI(sel.options[sel.selectedIndex].value)) + "&";
		}
     }
  for (i=0; i<obj.getElementsByTagName("textarea").length; i++) {
           getstr += obj.getElementsByTagName("textarea")[i].name + "=" + 
                   escape(encodeURI(obj.getElementsByTagName("textarea")[i].value)) + "&";
        }
  makeRequest(url,g_container,getstr,method,operations);
}
//*************GET AND SHOW MOUSE COORDS*******************
function checkwhere(m) {
    if (document.layers){
        xCoord = m.x;
        yCoord = m.y;
	}
        else if (document.all){
        xCoord = event.clientX;
        yCoord = event.clientY;
	}
        else if (document.getElementById){
        xCoord = m.clientX;
        yCoord = m.clientY;
	}
		if (document.getElementById('coords_x_id') !== null)  {
			document.getElementById('coords_x_id').value = "X= "+ xCoord; 
			document.getElementById('coords_y_id').value = "Y= " + yCoord; 
		        self.status = "X= "+ xCoord + "  Y= " + yCoord; 
		}
	}
	document.onmousemove = checkwhere;
	if(document.captureEvents) {document.captureEvents(Event.MOUSEMOVE);}
//*************GET AND SPLIT URL QUERY STRING*******************
function getUrlVars() {
	var map = {};
	var parts = window.location.search.replace(/[?&]+([^=&]+)(=[^&]*)?/gi, function(m,key,value) {
		map[key] = (value === undefined) ? true : value.substring(1);
	});
return map;
}
//*************LOAD IMAGE MANAGER IF GROUPS ARE ON*******************
function init() {
	var map = getUrlVars();
	if (map.groups === "on")  {
		ol_launch('ol_1',700,550,'ol_fade_layer_1');
	}
}
window.onload = init; 
//*****************SHOW HIDE IMAGE BLOCKS FUNCTION****************************
//ELE CAN BE ANY *ID*
function showhide_image_blocks(ele)  {
	var i = 0;
	var x = 1;
	while (x <= 8) {
		if (ele.options[ele.selectedIndex].value > i)  { document.getElementById('image_block_id['+ x +']').className="display"; }
		else  { document.getElementById('image_block_id['+ x +']').className="hidden"; }
	x++;
	i++;
	}
}
//*****************ACTIONS TO PERFORM AFTER FILE UPLOAD****************************
function stopUpload(success,file_link,message)  {
	message = unescape(message.replace(/\+/g,' '));
	file_link = unescape(file_link.replace(/\+/g,' '));
	//alert(message);
	var result = '';
	      if (success == 1)  {
	         document.getElementById('result').innerHTML = '<p class=\"adminmsg\"><img src=\"themes/icons/icon_success.png\" class=\"valign\"  alt=\"success\" /> The file was uploaded successfully!<br/><a href="#upload_results" onclick="ol_launch(\'ol_2\',700,700,\'\'); return false;">Click Here to View Detailed Results</a><\/p><br/><br/>' + file_link;
	         document.getElementById('ol_window_sub_3').innerHTML = message;
	      }  else  {
	         document.getElementById('result').innerHTML = message;
		ol_close('ol_loading_id','ol_fade_layer_2');
	}
      return true;   
}
//*****************DETERMINE BROWSER DIMENSIONS****************************
function get_browser_dimen()  {
	var winWidth = 0, winHeight = 0;
	if( typeof( window.innerWidth ) === 'number' )  {
		//Non-IE
		winWidth = window.innerWidth;
		winHeight = window.innerHeight;
	} else if( document.documentElement && ( document.documentElement.clientWidth || document.documentElement.clientHeight ) )  {
		//IE 6+ in 'standards compliant mode'
		winWidth = document.documentElement.clientWidth;
		winHeight = document.documentElement.clientHeight;
	} else if( document.body && ( document.body.clientWidth || document.body.clientHeight ) )  {
		//IE 4 compatible
		winWidth = document.body.clientWidth;
		winHeight = document.body.clientHeight;
	}
	return {width:winWidth, height:winHeight};
}
//**************START LOADING****************
function loading_start (loading_id)  {
	if (typeof loading_id == 'undefined')  { loading_id = ''; }
	if (loading_id === "1" || loading_id === "3" || loading_id === "")  {  ol_launch('ol_loading_id',250,150,'ol_fade_layer_1');  }
	if (loading_id === "2" || loading_id === "3")  {  showhide('show',"main_loading_id");  }
	if (loading_id != "" && loading_id != "1" && loading_id != "2" && loading_id != "3")  {  showhide('show',loading_id);  }
}
//**************END LOADING****************
function loading_end (loading_id)  {
	if (typeof loading_id == 'undefined')  { loading_id = ''; }
	if (loading_id === "1" || loading_id === "3" || loading_id === "")  {  ol_close('ol_loading_id','ol_fade_layer_1');  }
	if (loading_id === "2" || loading_id === "3")  {  showhide('hide',"main_loading_id");  }
	if (loading_id != "" && loading_id != "1" && loading_id != "2" && loading_id != "3")  {  showhide('hide',loading_id);  }
}
//**************CONFIRMATION DIALOG BOX**********************
function cont_cancel(msg,cont,canc)  {
 var where_to = confirm(msg);
 if (where_to === true)  {
   cont
 }  else  {
	canc
  }
}
//*****************RELOAD CONTENT_LEFT USING MAIN_CONTENT AJAX RESPONSE*****************************
function load_content(response,set_container,mod)  {
	var er = 0;
	if (mod)  {
		if (set_container == 'overlay' || set_container == '' || typeof set_container == 'undefined')  {
			var ol_check = "";
			ol_check = document.getElementById("ol_1_sub_1").innerHTML;
			if (ol_check == "")  {
				set_container = "ol_1_sub_1";
				ol_launch("ol_1",mod.width,mod.height,'');
				ol_focus("ol_1");
				document.getElementById("ol_1_module").innerHTML = mod.name;
				document.getElementById("ol_1_title").innerHTML = mod.title;
			}  else  {
				ol_check = document.getElementById("ol_2_sub_1").innerHTML;
				if (ol_check == "")  {
					set_container = "ol_2_sub_1";
					ol_launch("ol_2",mod.width,mod.height,'');
					ol_focus("ol_2");
					document.getElementById("ol_2_module").innerHTML = mod.name;
					document.getElementById("ol_2_title").innerHTML = mod.title;
				}  else  {
					ol_check = document.getElementById("ol_3_sub_1").innerHTML;
					if (ol_check == "")  {
						set_container = "ol_3_sub_1";
						ol_launch("ol_3",mod.width,mod.height,'');
						ol_focus("ol_3");
						document.getElementById("ol_3_module").innerHTML = mod.name;
						document.getElementById("ol_3_title").innerHTML = mod.title;
					}  else  {
						ol_check = document.getElementById("ol_4_sub_1").innerHTML;
						if (ol_check == "")  {
							set_container = "ol_4_sub_1";
							ol_launch("ol_4",mod.width,mod.height,'');
							ol_focus("ol_4");
							document.getElementById("ol_4_module").innerHTML = mod.name;
							document.getElementById("ol_4_title").innerHTML = mod.title;
						}  else  {
							ol_check = document.getElementById("ol_5_sub_1").innerHTML;
							if (ol_check == "")  {
								set_container = "ol_5_sub_1";
								ol_launch("ol_5",mod.width,mod.height,'');
								ol_focus("ol_5");
								document.getElementById("ol_5_module").innerHTML = mod.name;
								document.getElementById("ol_5_title").innerHTML = mod.title;
								}  else  {
									alert("maximum open windows reached. 5");
									er = 1;
							}
						}
					}
				}
			}
		}
	} //END CHECK FOR MOD
	if (er != 1)  {
		if (document.getElementById(set_container).className === "hidden")  {
			document.getElementById(set_container).className = "display";
		}
		document.getElementById(set_container).innerHTML = parse_script(response);
		if (mod)  {
			if (document.getElementById(mod.query_id))  {
				document.getElementById(mod.query_id).value = mod.query;
			}
		}  //END CHECK FOR MOD
	}
}
//*****************RUN AJAX MODULE SCRIPT*****************************
function moduleCall(mod_name,set_container,mod_loading,mod_param,mod_hash)  {
	if (typeof set_container == "undefined") { set_container = ""; }
	if (typeof mod_loading == "undefined") { mod_loading = ""; }
	if (typeof mod_param == "undefined") { mod_param = ""; }
	var mod = new module(mod_name,mod_param);
			if (mod_hash != 0)  {  window.location.hash = mod.query;  }
		if (mod.error_count == 0 && mod.loaded != 1)  {
			var xmlHttp = getXMLHttpObject();
			xmlHttp.onreadystatechange = function()  {
			    if (xmlHttp.readyState < 4 && xmlHttp.readyState > 0)  {
					loading_start(mod_loading);
				}
				if (xmlHttp.readyState === 4 && xmlHttp.status === 200)  {
					load_content(xmlHttp.responseText,set_container,mod);
					loading_end(mod_loading);
				}
			};
		var url = mod.root + mod.file + "?c_container=" + set_container + "&" + mod.query + "&rnd=" + Math.random(); 
		xmlHttp.open("GET", url, true);
		xmlHttp.send(null);
	}
	if (mod.loaded == 1 && mod.error_count == 0)  {
		ol_maximize(mod.container.id);
	}
}
//*****************AJAX CONTENT WITH AUTO PAGINATION FOR MAIN_CONTENT*****************************
function sqlCall(set_mod,set_table,set_container,mod_loading,param)  {
	var xmlHttp = getXMLHttpObject();
		xmlHttp.onreadystatechange = function()  {
		    if (xmlHttp.readyState < 4 && xmlHttp.readyState > 0)  {
				loading_start(mod_loading);
			}
			if (xmlHttp.readyState === 4 && xmlHttp.status === 200)  {
				load_content(xmlHttp.responseText,set_container);
				loading_end(mod_loading);
			}
		};
	var url = root_url + "system/core/content_loader.php?set_mod=" + set_mod + "&set_table=" + set_table + "&set_container=" + set_container + "&" + param + "&rnd=" + Math.random(); 
	xmlHttp.open("GET", url, true);
	xmlHttp.send(null);
}


//***MODULE FILE LIST  MAKE THESE SCANABLE FINDABLE AND AUTOMATIC
//** PICK OPTIONS IN O STORE IN SYS O DB AND PRINTCREATE VAR MOD FILE 
//****SELECT MOD FUNCTION****
function module(mod_name,mod_query)  {
//GLOBALS AND DEFAULTS
	this.title = "Error Detecteted, Please Report";
	this.width = 600;
	this.height = 450;
	this.name = mod_name;
	this.query = mod_query;
	this.query_id = mod_name + "_query";
	this.loaded_id = mod_name + "_loaded";
	this.root = root_url;
	this.error_count = 0;
	this.loaded = 0;
	this.syntax = "module(mod_name) where mod_name is module system keyword";
	this.help = "see syntax";
if (typeof this.query  == "undefined")  { this.query = ""; }
	if (/\S/.test(mod_name))  {
		switch (mod_name)  {
			case "memos":
				this.title = "Memo Manager";
				this.version = "3 alpha";
				this.methods = "ajax,php,javascript";
				this.type = "O";
				this.file = "employees/administration/memos/ajax.php";
			break;
			case "maintmemos":
				this.title = "Maintenance Memo Manager";
				this.version = "3 alpha";
				this.methods = "ajax,php,javascript";
				this.type = "O";
				this.file = "employees/administration/maintmemos/ajax.php";
			break;
			default:
		this.error_count++;
		this.error = "Programming Error - Module Name \"" + mod_name + "\" Unrecognized\r";
		}
	}  else  {
		this.error_count++;
		this.error = "Programming Error - \"mod_name\" Required\r";
	}
	if  (this.error_count == 0)  {
		this.error = "No Errors Detected";
	}  else  {
	alert('Errors: ' + this.error_count + '\r' + this.error);
	}
}







/**
this script was
originally released with, at:

http://www.nsftools.com/tips/NotesTips.htm#datepicker


version 1.5
December 4, 2005
Julian Robichaux -- http://www.nsftools.com

HISTORY
--  version 1.0 (Sept. 4, 2004):
Initial release.

--  version 1.1 (Sept. 5, 2004):
Added capability to define the date format to be used, either globally (using the
defaultDateSeparator and defaultDateFormat variables) or when the displayDatePicker
function is called.

--  version 1.2 (Sept. 7, 2004):
Fixed problem where datepicker x-y coordinates weren't right inside of a table.
Fixed problem where datepicker wouldn't display over selection lists on a page.
Added a call to the datePickerClosed function (if one exists) after the datepicker
is closed, to allow the developer to add their own custom validation after a date
has been chosen. For this to work, you must have a function called datePickerClosed
somewhere on the page, that accepts a field object as a parameter. See the
example in the comments of the updateDateField function for more details.

--  version 1.3 (Sept. 9, 2004)
Fixed problem where adding the <div> and <iFrame> used for displaying the datepicker
was causing problems on IE 6 with global variables that had handles to objects on
the page (I fixed the problem by adding the elements using document.createElement()
and document.body.appendChild() instead of document.body.innerHTML += ...).

--  version 1.4 (Dec. 20, 2004)
Added "targetDateField.focus();" to the updateDateField function (as suggested
by Alan Lepofsky) to avoid a situation where the cursor focus is at the top of the
form after a date has been picked. Added "padding: 0px;" to the dpButton CSS
style, to keep the table from being so wide when displayed in Firefox.

-- version 1.5 (Dec 4, 2005)
Added display=none when datepicker is hidden, to fix problem where cursor is
not visible on input fields that are beneath the date picker. Added additional null
date handling for date errors in Safari when the date is empty. Added additional
error handling for iFrame creation, to avoid reported errors in Opera. Added
onMouseOver event for day cells, to allow color changes when the mouse hovers
over a cell (to make it easier to determine what cell you're over). Added comments
in the style sheet, to make it more clear what the different style elements are for.
*/

var datePickerDivID = "datepicker";
var iFrameDivID = "datepickeriframe";

var dayArrayShort = new Array('Su', 'Mo', 'Tu', 'We', 'Th', 'Fr', 'Sa');
var dayArrayMed = new Array('Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat');
var dayArrayLong = new Array('Sunday', 'Monday', 'Tuesday', 'Wednesday', 'Thursday', 'Friday', 'Saturday');
var monthArrayShort = new Array('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec');
var monthArrayMed = new Array('Jan', 'Feb', 'Mar', 'Apr', 'May', 'June', 'July', 'Aug', 'Sept', 'Oct', 'Nov', 'Dec');
var monthArrayLong = new Array('January', 'February', 'March', 'April', 'May', 'June', 'July', 'August', 'September', 'October', 'November', 'December');
 
// these variables define the date formatting we're expecting and outputting.
// If you want to use a different format by default, change the defaultDateSeparator
// and defaultDateFormat variables either here or on your HTML page.
var defaultDateSeparator = "-";        // common values would be "/" or "."
var defaultDateFormat = "ymd"    // valid values are "mdy", "dmy", and "ymd"
var dateSeparator = defaultDateSeparator;
var dateFormat = defaultDateFormat;

/**
This is the main function you'll call from the onClick event of a button.
Normally, you'll have something like this on your HTML page:

Start Date: <input name="StartDate">
<input type=button value="select" onclick="displayDatePicker('StartDate');">

That will cause the datepicker to be displayed beneath the StartDate field and
any date that is chosen will update the value of that field. If you'd rather have the
datepicker display beneath the button that was clicked, you can code the button
like this:

<input type=button value="select" onclick="displayDatePicker('StartDate', this);">

So, pretty much, the first argument (dateFieldName) is a string representing the
name of the field that will be modified if the user picks a date, and the second
argument (displayBelowThisObject) is optional and represents an actual node
on the HTML document that the datepicker should be displayed below.

In version 1.1 of this code, the dtFormat and dtSep variables were added, allowing
you to use a specific date format or date separator for a given call to this function.
Normally, you'll just want to set these defaults globally with the defaultDateSeparator
and defaultDateFormat variables, but it doesn't hurt anything to add them as optional
parameters here. An example of use is:

<input type=button value="select" onclick="displayDatePicker('StartDate', false, 'dmy', '.');">

This would display the datepicker beneath the StartDate field (because the
displayBelowThisObject parameter was false), and update the StartDate field with
the chosen value of the datepicker using a date format of dd.mm.yyyy
*/
function displayDatePicker(dateFieldName, displayBelowThisObject, dtFormat, dtSep)
{
  var targetDateField = document.getElementsByName (dateFieldName).item(0);
 
  // if we weren't told what node to display the datepicker beneath, just display it
  // beneath the date field we're updating
  if (!displayBelowThisObject)
    displayBelowThisObject = targetDateField;
 
  // if a date separator character was given, update the dateSeparator variable
  if (dtSep)
    dateSeparator = dtSep;
  else
    dateSeparator = defaultDateSeparator;
 
  // if a date format was given, update the dateFormat variable
  if (dtFormat)
    dateFormat = dtFormat;
  else
    dateFormat = defaultDateFormat;
 
  var x = displayBelowThisObject.offsetLeft;
  var y = displayBelowThisObject.offsetTop + displayBelowThisObject.offsetHeight ;
 
  // deal with elements inside tables and such
  var parent = displayBelowThisObject;
  while (parent.offsetParent) {
    parent = parent.offsetParent;
    x += parent.offsetLeft;
    y += parent.offsetTop ;
  }
 
  drawDatePicker(targetDateField, x, y);
}


/**
Draw the datepicker object (which is just a table with calendar elements) at the
specified x and y coordinates, using the targetDateField object as the input tag
that will ultimately be populated with a date.

This function will normally be called by the displayDatePicker function.
*/
function drawDatePicker(targetDateField, x, y)
{
  var dt = getFieldDate(targetDateField.value );
 
  // the datepicker table will be drawn inside of a <div> with an ID defined by the
  // global datePickerDivID variable. If such a div doesn't yet exist on the HTML
  // document we're working with, add one.
  if (!document.getElementById(datePickerDivID)) {
    // don't use innerHTML to update the body, because it can cause global variables
    // that are currently pointing to objects on the page to have bad references
    //document.body.innerHTML += "<div id='" + datePickerDivID + "' class='dpDiv'></div>";
    var newNode = document.createElement("div");
    newNode.setAttribute("id", datePickerDivID);
    newNode.setAttribute("class", "dpDiv");
    newNode.setAttribute("style", "visibility: hidden;");
    document.body.appendChild(newNode);
  }
 
  // move the datepicker div to the proper x,y coordinate and toggle the visiblity
  var pickerDiv = document.getElementById(datePickerDivID);
  pickerDiv.style.position = "absolute";
  pickerDiv.style.left = x + "px";
  pickerDiv.style.top = y + "px";
  pickerDiv.style.visibility = (pickerDiv.style.visibility == "visible" ? "hidden" : "visible");
  pickerDiv.style.display = (pickerDiv.style.display == "block" ? "none" : "block");
  pickerDiv.style.zIndex = 10000;
 
  // draw the datepicker table
  refreshDatePicker(targetDateField.name, dt.getFullYear(), dt.getMonth(), dt.getDate());
}


/**
This is the function that actually draws the datepicker calendar.
*/
function refreshDatePicker(dateFieldName, year, month, day)
{
  // if no arguments are passed, use today's date; otherwise, month and year
  // are required (if a day is passed, it will be highlighted later)
  var thisDay = new Date();
 
  if ((month >= 0) && (year > 0)) {
    thisDay = new Date(year, month, 1);
  } else {
    day = thisDay.getDate();
    thisDay.setDate(1);
  }
 
  // the calendar will be drawn as a table
  // you can customize the table elements with a global CSS style sheet,
  // or by hardcoding style and formatting elements below
  var crlf = "\r\n";
  var TABLE = "<table cols=7 class='dpTable'>" + crlf;
  var xTABLE = "</table>" + crlf;
  var TR = "<tr class='dpTR'>";
  var TR_title = "<tr class='dpTitleTR'>";
  var TR_days = "<tr class='dpDayTR'>";
  var TR_todaybutton = "<tr class='dpTodayButtonTR'>";
  var xTR = "</tr>" + crlf;
  var TD = "<td class='dpTD' onMouseOut='this.className=\"dpTD\";' onMouseOver=' this.className=\"dpTDHover\";' ";    // leave this tag open, because we'll be adding an onClick event
  var TD_title = "<td colspan=5 class='dpTitleTD'>";
  var TD_buttons = "<td class='dpButtonTD'>";
  var TD_todaybutton = "<td colspan=7 class='dpTodayButtonTD'>";
  var TD_days = "<td class='dpDayTD'>";
  var TD_selected = "<td class='dpDayHighlightTD' onMouseOut='this.className=\"dpDayHighlightTD\";' onMouseOver='this.className=\"dpTDHover\";' ";    // leave this tag open, because we'll be adding an onClick event
  var xTD = "</td>" + crlf;
  var DIV_title = "<div class='dpTitleText'>";
  var DIV_selected = "<div class='dpDayHighlight'>";
  var xDIV = "</div>";
 
  // start generating the code for the calendar table
  var html = TABLE;
 
  // this is the title bar, which displays the month and the buttons to
  // go back to a previous month or forward to the next month
  html += TR_title;
  html += TD_buttons + getButtonCode(dateFieldName, thisDay, -1, "&lt;") + xTD;
  html += TD_title + DIV_title + monthArrayLong[ thisDay.getMonth()] + " " + thisDay.getFullYear() + xDIV + xTD;
  html += TD_buttons + getButtonCode(dateFieldName, thisDay, 1, "&gt;") + xTD;
  html += xTR;
 
  // this is the row that indicates which day of the week we're on
  html += TR_days;
  for(i = 0; i < dayArrayShort.length; i++)
    html += TD_days + dayArrayShort[i] + xTD;
  html += xTR;
 
  // now we'll start populating the table with days of the month
  html += TR;
 
  // first, the leading blanks
  for (i = 0; i < thisDay.getDay(); i++)
    html += TD + "&nbsp;" + xTD;
 
  // now, the days of the month
  do {
    dayNum = thisDay.getDate();
    TD_onclick = " onclick=\"updateDateField('" + dateFieldName + "', '" + getDateString(thisDay) + "');\">";
    
    if (dayNum == day)
      html += TD_selected + TD_onclick + DIV_selected + dayNum + xDIV + xTD;
    else
      html += TD + TD_onclick + dayNum + xTD;
    
    // if this is a Saturday, start a new row
    if (thisDay.getDay() == 6)
      html += xTR + TR;
    
    // increment the day
    thisDay.setDate(thisDay.getDate() + 1);
  } while (thisDay.getDate() > 1)
 
  // fill in any trailing blanks
  if (thisDay.getDay() > 0) {
    for (i = 6; i > thisDay.getDay(); i--)
      html += TD + "&nbsp;" + xTD;
  }
  html += xTR;
 
  // add a button to allow the user to easily return to today, or close the calendar
  var today = new Date();
  var todayString = "Today is " + dayArrayMed[today.getDay()] + ", " + monthArrayMed[ today.getMonth()] + " " + today.getDate();
  html += TR_todaybutton + TD_todaybutton;
  html += "<button class='dpTodayButton' onClick='refreshDatePicker(\"" + dateFieldName + "\");'>this month</button> ";
  html += "<button class='dpTodayButton' onClick='updateDateField(\"" + dateFieldName + "\");'>close</button>";
  html += xTD + xTR;
 
  // and finally, close the table
  html += xTABLE;
 
  document.getElementById(datePickerDivID).innerHTML = html;
  // add an "iFrame shim" to allow the datepicker to display above selection lists
  adjustiFrame();
}


/**
Convenience function for writing the code for the buttons that bring us back or forward
a month.
*/
function getButtonCode(dateFieldName, dateVal, adjust, label)
{
  var newMonth = (dateVal.getMonth () + adjust) % 12;
  var newYear = dateVal.getFullYear() + parseInt((dateVal.getMonth() + adjust) / 12);
  if (newMonth < 0) {
    newMonth += 12;
    newYear += -1;
  }
 
  return "<button class='dpButton' onClick='refreshDatePicker(\"" + dateFieldName + "\", " + newYear + ", " + newMonth + ");'>" + label + "</button>";
}


/**
Convert a JavaScript Date object to a string, based on the dateFormat and dateSeparator
variables at the beginning of this script library.
*/
function getDateString(dateVal)
{
  var dayString = "00" + dateVal.getDate();
  var monthString = "00" + (dateVal.getMonth()+1);
  dayString = dayString.substring(dayString.length - 2);
  monthString = monthString.substring(monthString.length - 2);
 
  switch (dateFormat) {
    case "dmy" :
      return dayString + dateSeparator + monthString + dateSeparator + dateVal.getFullYear();
    case "ymd" :
      return dateVal.getFullYear() + dateSeparator + monthString + dateSeparator + dayString;
    case "mdy" :
    default :
      return monthString + dateSeparator + dayString + dateSeparator + dateVal.getFullYear();
  }
}


/**
Convert a string to a JavaScript Date object.
*/
function getFieldDate(dateString)
{
  var dateVal;
  var dArray;
  var d, m, y;
 
  try {
    dArray = splitDateString(dateString);
    if (dArray) {
      switch (dateFormat) {
        case "dmy" :
          d = parseInt(dArray[0], 10);
          m = parseInt(dArray[1], 10) - 1;
          y = parseInt(dArray[2], 10);
          break;
        case "ymd" :
          d = parseInt(dArray[2], 10);
          m = parseInt(dArray[1], 10) - 1;
          y = parseInt(dArray[0], 10);
          break;
        case "mdy" :
        default :
          d = parseInt(dArray[1], 10);
          m = parseInt(dArray[0], 10) - 1;
          y = parseInt(dArray[2], 10);
          break;
      }
      dateVal = new Date(y, m, d);
    } else if (dateString) {
      dateVal = new Date(dateString);
    } else {
      dateVal = new Date();
    }
  } catch(e) {
    dateVal = new Date();
  }
 
  return dateVal;
}


/**
Try to split a date string into an array of elements, using common date separators.
If the date is split, an array is returned; otherwise, we just return false.
*/
function splitDateString(dateString)
{
  var dArray;
  if (dateString.indexOf("/") >= 0)
    dArray = dateString.split("/");
  else if (dateString.indexOf(".") >= 0)
    dArray = dateString.split(".");
  else if (dateString.indexOf("-") >= 0)
    dArray = dateString.split("-");
  else if (dateString.indexOf("\\") >= 0)
    dArray = dateString.split("\\");
  else
    dArray = false;
 
  return dArray;
}

/**
Update the field with the given dateFieldName with the dateString that has been passed,
and hide the datepicker. If no dateString is passed, just close the datepicker without
changing the field value.

Also, if the page developer has defined a function called datePickerClosed anywhere on
the page or in an imported library, we will attempt to run that function with the updated
field as a parameter. This can be used for such things as date validation, setting default
values for related fields, etc. For example, you might have a function like this to validate
a start date field:

function datePickerClosed(dateField)
{
  var dateObj = getFieldDate(dateField.value);
  var today = new Date();
  today = new Date(today.getFullYear(), today.getMonth(), today.getDate());
 
  if (dateField.name == "StartDate") {
    if (dateObj < today) {
      // if the date is before today, alert the user and display the datepicker again
      alert("Please enter a date that is today or later");
      dateField.value = "";
      document.getElementById(datePickerDivID).style.visibility = "visible";
      adjustiFrame();
    } else {
      // if the date is okay, set the EndDate field to 7 days after the StartDate
      dateObj.setTime(dateObj.getTime() + (7 * 24 * 60 * 60 * 1000));
      var endDateField = document.getElementsByName ("EndDate").item(0);
      endDateField.value = getDateString(dateObj);
    }
  }
}

*/
function updateDateField(dateFieldName, dateString)
{
  var targetDateField = document.getElementsByName (dateFieldName).item(0);
  if (dateString)
    targetDateField.value = dateString;
 
  var pickerDiv = document.getElementById(datePickerDivID);
  pickerDiv.style.visibility = "hidden";
  pickerDiv.style.display = "none";
 
  adjustiFrame();
  targetDateField.focus();
 
  // after the datepicker has closed, optionally run a user-defined function called
  // datePickerClosed, passing the field that was just updated as a parameter
  // (note that this will only run if the user actually selected a date from the datepicker)
  if ((dateString) && (typeof(datePickerClosed) == "function"))
    datePickerClosed(targetDateField);
}


/**
Use an "iFrame shim" to deal with problems where the datepicker shows up behind
selection list elements, if they're below the datepicker. The problem and solution are
described at:

http://dotnetjunkies.com/WebLog/jking/archive/2003/07/21/488.aspx
http://dotnetjunkies.com/WebLog/jking/archive/2003/10/30/2975.aspx
*/
function adjustiFrame(pickerDiv, iFrameDiv)
{
  // we know that Opera doesn't like something about this, so if we
  // think we're using Opera, don't even try
  var is_opera = (navigator.userAgent.toLowerCase().indexOf("opera") != -1);
  if (is_opera)
    return;
  
  // put a try/catch block around the whole thing, just in case
  try {
    if (!document.getElementById(iFrameDivID)) {
      // don't use innerHTML to update the body, because it can cause global variables
      // that are currently pointing to objects on the page to have bad references
      //document.body.innerHTML += "<iframe id='" + iFrameDivID + "' src='javascript:false;' scrolling='no' frameborder='0'>";
      var newNode = document.createElement("iFrame");
      newNode.setAttribute("id", iFrameDivID);
      newNode.setAttribute("src", "javascript:false;");
      newNode.setAttribute("scrolling", "no");
      newNode.setAttribute ("frameborder", "0");
      document.body.appendChild(newNode);
    }
    
    if (!pickerDiv)
      pickerDiv = document.getElementById(datePickerDivID);
    if (!iFrameDiv)
      iFrameDiv = document.getElementById(iFrameDivID);
    
    try {
      iFrameDiv.style.position = "absolute";
      iFrameDiv.style.width = pickerDiv.offsetWidth;
      iFrameDiv.style.height = pickerDiv.offsetHeight ;
      iFrameDiv.style.top = pickerDiv.style.top;
      iFrameDiv.style.left = pickerDiv.style.left;
      iFrameDiv.style.zIndex = pickerDiv.style.zIndex - 1;
      iFrameDiv.style.visibility = pickerDiv.style.visibility ;
      iFrameDiv.style.display = pickerDiv.style.display;
    } catch(e) {
    }
 
  } catch (ee) {
  }
 
}