/*
    * This function will not return until (at least)
    * the specified number of milliseconds have passed.
    * It does a busy-wait loop.
    */
    function pause(numberMillis) {
        var now = new Date();
        var exitTime = now.getTime() + numberMillis;
        while (true) {
            now = new Date();
            if (now.getTime() > exitTime)
                return;
        }
    }



function lookup(look1, look2, display1, display2, classID, winName, path, multi) {
	window.look1Field = look1;
	window.look2Field = look2;
	window.display1Field = display1;
	window.display2Field = display2;
	if ( winName==null || winName=="" )
		winName = "_blank";
	if (path==null) path = "";
	if ( multi==null ) multi = false;
	
	var pageName, listMode;
	if (multi) {
		pageName = path+"SearchListMultiPick.jsp";
		listMode = "LOOKUPMULT";
	} else {
		pageName = path+"SearchList.jsp";
		listMode = "LOOKUP";
	}

	newWin = window.open(pageName+"?classid="+classID+"&objectid="+look1.value+"&objecttitle="+look2.value+"&listmode="+listMode, winName);
	newWin.focus();
}

function updateLookup(look1, look2, display1, display2, autoRefresh) {
        if( !window || !window.opener )
            pause(1250);
	if (window && window.opener && window.opener.lookField)
		window.opener.lookField.value = look1;
	if (window && window.opener && window.opener.look1Field)
		window.opener.look1Field.value = look1;
	if (window && window.opener && window.opener.look2Field)
		window.opener.look2Field.value = look2;
	if (window && window.opener && window.opener.displayField)
		window.opener.displayField.value = display1;
	if (window && window.opener && window.opener.display1Field)
		window.opener.display1Field.value = display1;
	if (window && window.opener && window.opener.display2Field)
		window.opener.display2Field.value = display2;
	if (autoRefresh) {
		if (window.opener.refresh) {
			window.opener.refresh();
		} else {
			window.opener.form1.action = window.opener.document.URL;
			window.opener.form1.target = "";
			window.opener.form1.submit();
		}
	}
}

function dateToString(date) {
	var result = "";
	result = result + date.getFullYear() + "-";
	var month = date.getMonth()+1;
	if (month<10)
		result = result+"0"+month+"-";
	else
		result = result+month+"-";
	var dayNum = date.getDate();
	if (dayNum<10)
		result = result+"0"+dayNum;
	else
		result = result+dayNum;
	return result;
}

function stringToDate(s) {
	var inYear, inMonth, inDay, result;
    if ( s.indexOf('-')>=0 ) {
        inYear = s.substring(0,s.indexOf("-"));
		if (inYear.substring(0,1) == "0" && inYear.length > 1)
			inYear = inYear.substring(1,inYear.length);
		inYear = parseInt(inYear);
			
        inMonth = s.substring(s.indexOf("-") + 1, s.lastIndexOf("-"));
		if (inMonth.substring(0,1) == "0" && inMonth.length > 1)
			inMonth = inMonth.substring(1,inMonth.length);
		inMonth = parseInt(inMonth);

        inDay  = parseInt(s.substring(s.lastIndexOf("-") + 1, s.length));
    }
	
	if ( !isNaN(inYear) && !isNaN(inMonth) && !isNaN(inDay) )
		result = new Date(inYear, inMonth-1, inDay);
	else
		result = null;
	
	return result;
}

function textareaPopup(element, numRows, numCols, path) {
	if (!numRows || numRows<=0) numRows = 35;
	if (!numCols || numCols<=0) numCols = 90;
	window.textareaPopupField = element;
	window.textareaPopupRows = numRows;
	window.textareaPopupCols = numCols;
	if (path==null) path = "";
	textareaWin = window.open(path+"textareaEdit.jsp", "textareaWin");
	textareaWin.focus();
}

function getRadioSelectedValue(radioArray) {
	var value = null;
	if (radioArray && radioArray.length) {
		for (var i=0; i<radioArray.length; i++) {
			if (radioArray[i].checked) {
				value = radioArray[i].value;
				break;
			}
		}
	}
	return value;
}

function echo() {
	document.form1.action = "Echo.jsp";
	document.form1.target = "_blank";
	document.form1.submit();
}

function addEvent(elm, evType, fn, useCapture) {
  if (elm.addEventListener){
    elm.addEventListener(evType, fn, useCapture);
    return true;
  } else if (elm.attachEvent){
    var r = elm.attachEvent("on"+evType, fn);
    return r;
  } else {
    alert("Handler could not be removed");
  }
} 


// Hierarchy controls -- JK
function HierarchyItem(id, name) {
	this.id = id;
	this.name = name;
	this.level = 0;
	this.parent = null;
	this.children = new Array();
}
HierarchyItem.prototype.addChild = function(child) {
	this.children[this.children.length] = child;
	child.level = this.level+1;
	child.parent = this;
}
HierarchyItem.prototype.getItem = function(id) {
	var result = null;
	if (this.id==id)
		result = this;
	else {
		var i = 0;
		while (i<this.children.length && result==null) {
			result = this.children[i].getItem(id);
			i++;
		}
	}
	return result;
}
HierarchyItem.prototype.toString = function() {
	return this.name+' [ID='+this.id+', level='+this.level+']';
}

function Hierarchy() {
	this.roots = new Array();
	this.elements = new Array();
}
Hierarchy.prototype.addRoot = function(root) {
	this.roots[this.roots.length] = root;
}
Hierarchy.prototype.getItem = function(id) {
	var result = null;
	var i = 0;
	while (i<this.roots.length && result==null) {
		result = this.roots[i].getItem(id);
		i++;
	}
	return result;
}
Hierarchy.prototype.getElement = function (i, formName) {
	if (this.elements.length>i)
		return eval('document.forms[\''+formName+'\'].'+this.elements[i]);
	else
		return null;
}

function removeAll(ddList) {
	if (ddList && ddList.options && ddList.options.length) {
		for (var i=ddList.options.length-1; i>=0; i--) {
			ddList.remove(i);
		}
	}
}

function populate(ddList, hierarchy, parentID, selectedID) {
	if (ddList && ddList.options && ddList.options.add) {
		removeAll(ddList);
		var newOption = new Option('', '');
		ddList.options.add(newOption);
		if (parentID==null) {	// No parent, so populate with the roots.
			for (var i=0; i<hierarchy.roots.length; i++) {
				newOption = new Option(hierarchy.roots[i].name, hierarchy.roots[i].id);
				ddList.options.add(newOption);
				if (hierarchy.roots[i].id == selectedID) ddList.selectedIndex = i+1;
			}
		} else {
			var parentItem = hierarchy.getItem(parentID);
			if (parentItem!=null) {
				for (var i=0; i<parentItem.children.length; i++) {
					newOption = new Option(parentItem.children[i].name, parentItem.children[i].id);
					ddList.options.add(newOption);
					if (parentItem.children[i].id == selectedID) ddList.selectedIndex = i+1;
				}
			}
		}
	}
}

function hierarchyChanged(hierarchy, elem) {
	alert('Not implemented');
	// Hide all lists which come after this one.
	// Populate the list after this one, and make it visible if it is not empty.
}

/* // TO DO; Fix the following function
function hierarchySelected(hierarchy, elem) {
	// Hide all lists which come after this one.
	var i = hierarchy.elements.length;
	while (--i>=0 && hierarchy.elements[i]!=elem) {
		hierarchy.elements[i].parentNode.style.display = 'none';
	}
	// Populate the list after this one, and make it visible.
	var parent = null, parentID = null;
	if (elem.options) 
		parent = hierarchy.getItem(elem.options[elem.selectedIndex].value);
	if (parent!=null) parentID = parent.id;
	else parentID = '';
	i++;
	if (i<hierarchy.elements.length) {
		populate(hierarchy.elements[i], hierarchy, parentID, null);
		if (hierarchy.elements[i].options.length>1)
			hierarchy.elements[i].parentNode.style.display = 'inline';
	}
}

// Probably obsolete
function initHierarchy(hierarchy, selectedID) {
	if (selectedID!=null && selectedID!='') {
		var thisItem = hierarchy.getItem(selectedID);
		var treePath = new Array(thisItem.level+1);
		treePath[0] = null;
		for (var i=thisItem.level; i>=0; i--) {
			treePath[i+1] = thisItem.id;
			thisItem = thisItem.parent;
		}
		for (var i=1; i<treePath.length; i++) {
			if (hierarchy.elements[i-1].length) {
				// This is a radio button group.
			} else {
				// This is a select list.
				populate(hierarchy.elements[i-1], hierarchy, treePath[i-1], treePath[i]);
				hierarchy.elements[i-1].parentNode.style.display = 'inline';
			}
		}
		hierarchySelected(hierarchy, hierarchy.elements[i-2]);
	} else {
		hierarchy.elements[0].parentNode.style.display = 'inline';
	}
}
*/



/**************************
Third Party email address validator
*/
function emailValidate(emailaddress){	
	var checkTLD=0; 
	var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/; 
	var emailPat=/^(.+)@(.+)$/; 
	var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]"; 
	var validChars="\[^\\s" + specialChars + "\]"; 
	var quotedUser="(\"[^\"]*\")"; 
	var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/; 
	var atom=validChars + '+'; 
	var word="(" + atom + "|" + quotedUser + ")"; 
	var userPat=new RegExp("^" + word + "(\\." + word + ")*$"); 
	var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$"); 
	var matchArray=emailaddress.match(emailPat);
	 
	if (matchArray==null) { 
		//alert("The Email Address Is Invalid"); 
		return false; 
	} 
	var user=matchArray[1]; 
	var domain=matchArray[2]; 
	
	for (i=0; i<user.length; i++) { 
		if (user.charCodeAt(i)>127) { 
			//alert("The Username Contains Invalid Characters."); 
			return false; 
		} 
	}
	 
	for (i=0; i<domain.length; i++) { 
		if (domain.charCodeAt(i)>127) { 
			//alert("Ths Domain Name Contains Invalid Characters."); 
			return false; 
		} 
	} 
	
	if (user.match(userPat)==null) { 
		//alert("The Username Is Invalid."); 
		return false; 
	} 
	
	var IPArray=domain.match(ipDomainPat); 
	if (IPArray!=null) { 
		for (var i=1;i<=4;i++) { 
			if (IPArray[i]>255) { 
				//alert("The Destination IP Address Is Invalid."); 
				return false; 
			} 
		} 
		return true; 
	} 
	
	var atomPat=new RegExp("^" + atom + "$"); 
	var domArr=domain.split("."); 
	var len=domArr.length; 
	
	for (i=0;i<len;i++) { 
		if (domArr[i].search(atomPat)==-1) { 
			//alert("The Domain Name Is Invalid."); 
			return false; 
		} 
	}
	 
	if (checkTLD && domArr[domArr.length-1].length!=2 && 
	domArr[domArr.length-1].search(knownDomsPat)==-1) { 
		//alert("The Domain Name Extension Is Invalid"); 
		return false; 
	} 
	
	if (len<2) { 
		//alert("The Address Is Missing A Hostname."); 
		return false; 
	} 
} 



/*
// ***************************************
// THIRD PARTY DATE CONTROL
//	written	by Tan Ling	Wee	on 2 Dec 2001
//	last updated 20 Jun 2003
//	email :	fuushikaden@yahoo.com

var	fixedX = -1 // x position (-1 if to appear below control)
var	fixedY = -1 // y position (-1 if to appear below control)
var startAt = 0 // 0 - sunday ; 1 - monday
var showWeekNumber = 0	// 0 - don't show; 1 - show
var showToday = 1		// 0 - don't show; 1 - show
var imgDir = ""	// directory for images ... e.g. var imgDir="/img/"

var gotoString = "Go To Current Month"
var todayString = "Today is"
var weekString = "Wk"
var scrollLeftMessage = "Click to scroll to previous month. Hold mouse button to scroll automatically."
var scrollRightMessage = "Click to scroll to next month. Hold mouse button to scroll automatically."
var selectMonthMessage = "Click to select a month."
var selectYearMessage = "Click to select a year."
var selectDateMessage = "Select [date] as date." // do not replace [date], it will be replaced by date.

var	crossobj, crossMonthObj, crossYearObj, monthSelected, yearSelected, dateSelected, omonthSelected, oyearSelected, odateSelected, monthConstructed, yearConstructed, intervalID1, intervalID2, timeoutID1, timeoutID2, ctlToPlaceValue, ctlNow, dateFormat, nStartingYear

var	bPageLoaded=false
var	ie=document.all
var	dom=document.getElementById

var	ns4=document.layers
var	today =	new	Date()
var	dateNow	 = today.getDate()
var	monthNow = today.getMonth()
var	yearNow	 = today.getYear()
var	imgsrc = new Array("drop1.gif","drop2.gif","left1.gif","left2.gif","right1.gif","right2.gif")
var	img	= new Array()

var bShow = false;

// hides <select> and <applet> objects (for IE only)
function hideElement(elmID, overDiv) {
  if( ie ) {
	for( i = 0; i < document.all.tags( elmID ).length; i++ ) {
	  obj = document.all.tags( elmID )[i];
	  if( !obj || !obj.offsetParent ) {
		continue;
	  }
  
	  // Find the element's offsetTop and offsetLeft relative to the BODY tag.
	  objLeft   = obj.offsetLeft;
	  objTop    = obj.offsetTop;
	  objParent = obj.offsetParent;
	  
	  while( objParent.tagName.toUpperCase() != "BODY" ) {
		objLeft  += objParent.offsetLeft;
		objTop   += objParent.offsetTop;
		objParent = objParent.offsetParent;
	  }
  
	  objHeight = obj.offsetHeight;
	  objWidth = obj.offsetWidth;
  
	  if(( overDiv.offsetLeft + overDiv.offsetWidth ) <= objLeft );
	  else if(( overDiv.offsetTop + overDiv.offsetHeight ) <= objTop );
	  else if( overDiv.offsetTop >= ( objTop + objHeight ));
	  else if( overDiv.offsetLeft >= ( objLeft + objWidth ));
	  else {
		obj.style.visibility = "hidden";
	  }
	}
  }
}
 
// unhides <select> and <applet> objects (for IE only)
function showElement( elmID ) {
  if( ie ) {
	for( i = 0; i < document.all.tags( elmID ).length; i++ ) {
	  obj = document.all.tags( elmID )[i];
	  
	  if( !obj || !obj.offsetParent ) {
		continue;
	  }
	
	  obj.style.visibility = "";
	}
  }
}

function HolidayRec (d, m, y, desc) {
	this.d = d
	this.m = m
	this.y = y
	this.desc = desc
}

var HolidaysCounter = 0
var Holidays = new Array()

function addHoliday (d, m, y, desc) {
	Holidays[HolidaysCounter++] = new HolidayRec ( d, m, y, desc )
}


if (dom) {
	for	(i=0;i<imgsrc.length;i++) {
		img[i] = new Image
		img[i].src= imgDir + imgsrc[i]
	}
	document.write ("<div onclick='bShow=true' id='calendar'	class='div-style'><table width="+((showWeekNumber==1)?250:220)+" class='table-style'><tr class='title-background-style' ><td><table width='"+((showWeekNumber==1)?248:218)+"'><tr><td class='title-style'><B><span id='caption'></span></B></td><td align=right><a href='javascript:hideCalendar()'><IMG SRC='"+imgDir+"close.gif' WIDTH='15' HEIGHT='13' BORDER='0' ALT='Close the Calendar'></a></td></tr></table></td></tr><tr><td class='body-style'><span id='content'></span></td></tr>")
		
	if (showToday==1) {
		document.write ("<tr class='today-style'><td><span id='lblToday'></span></td></tr>")
	}
		
	document.write ("</table></div><div id='selectMonth' class='div-style'></div><div id='selectYear' class='div-style'></div>");
}

var	monthName =	new	Array("January","February","March","April","May","June","July","August","September","October","November","December")
var	monthName2 = new Array("JAN","FEB","MAR","APR","MAY","JUN","JUL","AUG","SEP","OCT","NOV","DEC")

if (startAt==0) {
	dayName = new Array	("Sun","Mon","Tue","Wed","Thu","Fri","Sat")
}
else {
	dayName = new Array	("Mon","Tue","Wed","Thu","Fri","Sat","Sun")
}

function swapImage(srcImg, destImg){
	if (ie)	{ document.getElementById(srcImg).setAttribute("src",imgDir + destImg) }
}

function initPopupCalendar()	{
	if (!ns4) {
		if (!ie) { yearNow += 1900	}

		crossobj=(dom)?document.getElementById("calendar").style : ie? document.all.calendar : document.calendar
		hideCalendar()

		crossMonthObj=(dom)?document.getElementById("selectMonth").style : ie? document.all.selectMonth	: document.selectMonth

		crossYearObj=(dom)?document.getElementById("selectYear").style : ie? document.all.selectYear : document.selectYear

		monthConstructed=false;
		yearConstructed=false;

		if (showToday==1) {
			document.getElementById("lblToday").innerHTML =	todayString + " <a class='today-style' onmousemove='window.status=\""+gotoString+"\"' onmouseout='window.status=\"\"' title='"+gotoString+"' href='javascript:monthSelected=monthNow;yearSelected=yearNow;constructCalendar();'>"+dayName[(today.getDay()-startAt==-1)?6:(today.getDay()-startAt)]+", " + dateNow + " " + monthName[monthNow].substring(0,3)	+ "	" +	yearNow	+ "</a>"
		}

		sHTML1= "<span id='spanLeft'  class='title-control-normal-style' onmouseover='swapImage(\"changeLeft\",\"left2.gif\");this.className=\"title-control-select-style\";window.status=\""+scrollLeftMessage+"\"' onclick='javascript:decMonth()' onmouseout='clearInterval(intervalID1);swapImage(\"changeLeft\",\"left1.gif\");this.className=\"title-control-normal-style\";window.status=\"\"' onmousedown='clearTimeout(timeoutID1);timeoutID1=setTimeout(\"StartDecMonth()\",500)'	onmouseup='clearTimeout(timeoutID1);clearInterval(intervalID1)'>&nbsp<IMG id='changeLeft' SRC='"+imgDir+"left1.gif' width=10 height=11 BORDER=0>&nbsp</span>&nbsp;"
		sHTML1+="<span id='spanRight' class='title-control-normal-style' onmouseover='swapImage(\"changeRight\",\"right2.gif\");this.className=\"title-control-select-style\";window.status=\""+scrollRightMessage+"\"' onmouseout='clearInterval(intervalID1);swapImage(\"changeRight\",\"right1.gif\");this.className=\"title-control-normal-style\";window.status=\"\"' onclick='incMonth()' onmousedown='clearTimeout(timeoutID1);timeoutID1=setTimeout(\"StartIncMonth()\",500)'	onmouseup='clearTimeout(timeoutID1);clearInterval(intervalID1)'>&nbsp<IMG id='changeRight' SRC='"+imgDir+"right1.gif'	width=10 height=11 BORDER=0>&nbsp</span>&nbsp"
		sHTML1+="<span id='spanMonth' class='title-control-normal-style' onmouseover='swapImage(\"changeMonth\",\"drop2.gif\");this.className=\"title-control-select-style\";window.status=\""+selectMonthMessage+"\"' onmouseout='swapImage(\"changeMonth\",\"drop1.gif\");this.className=\"title-control-normal-style\";window.status=\"\"' onclick='popUpMonth()'></span>&nbsp;"
		sHTML1+="<span id='spanYear'  class='title-control-normal-style' onmouseover='swapImage(\"changeYear\",\"drop2.gif\");this.className=\"title-control-select-style\";window.status=\""+selectYearMessage+"\"'	onmouseout='swapImage(\"changeYear\",\"drop1.gif\");this.className=\"title-control-normal-style\";window.status=\"\"'	onclick='popUpYear()'></span>&nbsp;"
		
		document.getElementById("caption").innerHTML  =	sHTML1

		bPageLoaded=true
	}
}

function hideCalendar()	{
	crossobj.visibility="hidden"
	if (crossMonthObj != null){crossMonthObj.visibility="hidden"}
	if (crossYearObj !=	null){crossYearObj.visibility="hidden"}

	showElement( 'SELECT' );
	showElement( 'APPLET' );
}

function padZero(num) {
	return (num	< 10)? '0' + num : num ;
}

function constructDate(d,m,y)
{
	sTmp = dateFormat
	sTmp = sTmp.replace	("dd","<e>")
	sTmp = sTmp.replace	("d","<d>")
	sTmp = sTmp.replace	("<e>",padZero(d))
	sTmp = sTmp.replace	("<d>",d)
	sTmp = sTmp.replace	("mmm","<o>")
	sTmp = sTmp.replace	("mm","<n>")
	sTmp = sTmp.replace	("m","<m>")
	sTmp = sTmp.replace	("<m>",m+1)
	sTmp = sTmp.replace	("<n>",padZero(m+1))
	sTmp = sTmp.replace	("<o>",monthName2[m])
	sTmp = sTmp.replace	("yyyy",y)
	return sTmp.replace ("yy",padZero(y%100))
}

function closeCalendar() {
	var	sTmp

	hideCalendar();
	ctlToPlaceValue.value =	constructDate(dateSelected,monthSelected,yearSelected)
}

// Month Pulldown
function StartDecMonth() {
	intervalID1=setInterval("decMonth()",80)
}

function StartIncMonth() {
	intervalID1=setInterval("incMonth()",80)
}

function incMonth () {
	monthSelected++
	if (monthSelected>11) {
		monthSelected=0
		yearSelected++
	}
	constructCalendar()
}

function decMonth () {
	monthSelected--
	if (monthSelected<0) {
		monthSelected=11
		yearSelected--
	}
	constructCalendar()
}

function constructMonth() {
	popDownYear()
	if (!monthConstructed) {
		sHTML =	""
		for	(i=0; i<12;	i++) {
			sName =	monthName[i];
			if (i==monthSelected){
				sName =	"<B>" +	sName +	"</B>"
			}
			sHTML += "<tr><td id='m" + i + "' onmouseover='this.className=\"dropdown-select-style\"' onmouseout='this.className=\"dropdown-normal-style\"' onclick='monthConstructed=false;monthSelected=" + i + ";constructCalendar();popDownMonth();event.cancelBubble=true'>&nbsp;" + sName + "&nbsp;</td></tr>"
		}

		document.getElementById("selectMonth").innerHTML = "<table width=70	class='dropdown-style' cellspacing=0 onmouseover='clearTimeout(timeoutID1)'	onmouseout='clearTimeout(timeoutID1);timeoutID1=setTimeout(\"popDownMonth()\",100);event.cancelBubble=true'>" +	sHTML +	"</table>"

		monthConstructed=true
	}
}

function popUpMonth() {
	constructMonth()
	crossMonthObj.visibility = (dom||ie)? "visible"	: "show"
	crossMonthObj.left = parseInt(crossobj.left) + 50
	crossMonthObj.top =	parseInt(crossobj.top) + 26

	hideElement( 'SELECT', document.getElementById("selectMonth") );
	hideElement( 'APPLET', document.getElementById("selectMonth") );			
}

function popDownMonth()	{
	crossMonthObj.visibility= "hidden"
}

// Year Pulldown
function incYear() {
	for	(i=0; i<7; i++){
		newYear	= (i+nStartingYear)+1
		if (newYear==yearSelected)
		{ txtYear =	"&nbsp;<B>"	+ newYear +	"</B>&nbsp;" }
		else
		{ txtYear =	"&nbsp;" + newYear + "&nbsp;" }
		document.getElementById("y"+i).innerHTML = txtYear
	}
	nStartingYear ++;
	bShow=true
}

function decYear() {
	for	(i=0; i<7; i++){
		newYear	= (i+nStartingYear)-1
		if (newYear==yearSelected)
		{ txtYear =	"&nbsp;<B>"	+ newYear +	"</B>&nbsp;" }
		else
		{ txtYear =	"&nbsp;" + newYear + "&nbsp;" }
		document.getElementById("y"+i).innerHTML = txtYear
	}
	nStartingYear --;
	bShow=true
}

function selectYear(nYear) {
	yearSelected=parseInt(nYear+nStartingYear);
	yearConstructed=false;
	constructCalendar();
	popDownYear();
}

function constructYear() {
	popDownMonth()
	sHTML =	""
	if (!yearConstructed) {

		sHTML =	"<tr><td align='center'	onmouseover='this.className=\"dropdown-select-style\"' onmouseout='clearInterval(intervalID1);this.className=\"dropdown-normal-style\"' onmousedown='clearInterval(intervalID1);intervalID1=setInterval(\"decYear()\",30)' onmouseup='clearInterval(intervalID1)'>-</td></tr>"
		j =	0
		nStartingYear =	yearSelected-3
		for	(i=(yearSelected-3); i<=(yearSelected+3); i++) {
			sName =	i;
			if (i==yearSelected){
				sName =	"<B>" +	sName +	"</B>"
			}

			sHTML += "<tr><td id='y" + j + "' onmouseover='this.className=\"dropdown-select-style\"' onmouseout='this.className=\"dropdown-normal-style\"' onclick='selectYear("+j+");event.cancelBubble=true'>&nbsp;" + sName + "&nbsp;</td></tr>"
			j ++;
		}

		sHTML += "<tr><td align='center' onmouseover='this.className=\"dropdown-select-style\"' onmouseout='clearInterval(intervalID2);this.className=\"dropdown-normal-style\"' onmousedown='clearInterval(intervalID2);intervalID2=setInterval(\"incYear()\",30)'	onmouseup='clearInterval(intervalID2)'>+</td></tr>"

		document.getElementById("selectYear").innerHTML	= "<table width=44 class='dropdown-style' onmouseover='clearTimeout(timeoutID2)' onmouseout='clearTimeout(timeoutID2);timeoutID2=setTimeout(\"popDownYear()\",100)' cellspacing=0>"	+ sHTML	+ "</table>"

		yearConstructed	= true
	}
}

function popDownYear() {
	clearInterval(intervalID1)
	clearTimeout(timeoutID1)
	clearInterval(intervalID2)
	clearTimeout(timeoutID2)
	crossYearObj.visibility= "hidden"
}

function popUpYear() {
	var	leftOffset

	constructYear()
	crossYearObj.visibility	= (dom||ie)? "visible" : "show"
	leftOffset = parseInt(crossobj.left) + document.getElementById("spanYear").offsetLeft
	if (ie) {
		leftOffset += 6
	}
	crossYearObj.left =	leftOffset
	crossYearObj.top = parseInt(crossobj.top) +	26
}

// calendar
function WeekNbr(today) {
	Year = takeYear(today);
	Month = today.getMonth();
	Day = today.getDate();
	now = Date.UTC(Year,Month,Day+1,0,0,0);
	var Firstday = new Date();
	Firstday.setYear(Year);
	Firstday.setMonth(0);
	Firstday.setDate(1);
	then = Date.UTC(Year,0,1,0,0,0);
	var Compensation = Firstday.getDay();
	if (Compensation > 3) Compensation -= 4;
	else Compensation += 3;
	NumberOfWeek =  Math.round((((now-then)/86400000)+Compensation)/7);
	return NumberOfWeek;
}

function takeYear(theDate) {
	x = theDate.getYear();
	var y = x % 100;
	y += (y < 38) ? 2000 : 1900;
	return y;
}

function constructCalendar () {
	var dateMessage
	var	startDate =	new	Date (yearSelected,monthSelected,1)
	var	endDate	= new Date (yearSelected,monthSelected+1,1);
	endDate	= new Date (endDate	- (24*60*60*1000));
	numDaysInMonth = endDate.getDate()

	datePointer	= 0
	dayPointer = startDate.getDay() - startAt
	
	if (dayPointer<0) {
		dayPointer = 6
	}

	sHTML =	"<table	border=0 class='body-style'><tr>"

	if (showWeekNumber==1) {
		sHTML += "<td width=27><b>" + weekString + "</b></td><td width=1 rowspan=7 class='weeknumber-div-style'><img src='"+imgDir+"divider.gif' width=1></td>"
	}

	for	(i=0; i<7; i++)	{
		sHTML += "<td width='27' align='right'><B>"+ dayName[i]+"</B></td>"
	}
	sHTML +="</tr><tr>"
	
	if (showWeekNumber==1) {
		sHTML += "<td align=right>" + WeekNbr(startDate) + "&nbsp;</td>"
	}

	for	( var i=1; i<=dayPointer;i++ ) {
		sHTML += "<td>&nbsp;</td>"
	}

	for	( datePointer=1; datePointer<=numDaysInMonth; datePointer++ ) {
		dayPointer++;
		sHTML += "<td align=right>"

		var sStyle="normal-day-style"; //regular day

		if ((datePointer==dateNow)&&(monthSelected==monthNow)&&(yearSelected==yearNow)) //today
		{ sStyle = "current-day-style"; } 
		else if	(dayPointer % 7 == (startAt * -1) +1) //end-of-the-week day
		{ sStyle = "end-of-weekday-style"; }

		//selected day
		if ((datePointer==odateSelected) &&	(monthSelected==omonthSelected)	&& (yearSelected==oyearSelected)) 
		{ sStyle += " selected-day-style"; }

		sHint = ""
		for (k=0;k<HolidaysCounter;k++) {
			if ((parseInt(Holidays[k].d)==datePointer)&&(parseInt(Holidays[k].m)==(monthSelected+1))) {
				if ((parseInt(Holidays[k].y)==0)||((parseInt(Holidays[k].y)==yearSelected)&&(parseInt(Holidays[k].y)!=0))) {
					sStyle += " holiday-style";
					sHint+=sHint==""?Holidays[k].desc:"\n"+Holidays[k].desc
				}
			}
		}

		var regexp= /\"/g
		sHint=sHint.replace(regexp,"&quot;")

		dateMessage = "onmousemove='window.status=\""+selectDateMessage.replace("[date]",constructDate(datePointer,monthSelected,yearSelected))+"\"' onmouseout='window.status=\"\"' "

		sHTML += "<a class='"+sStyle+"' "+dateMessage+" title=\"" + sHint + "\" href='javascript:dateSelected="+datePointer+";closeCalendar();'>&nbsp;" + datePointer + "&nbsp;</a>"

		sHTML += ""
		if ((dayPointer+startAt) % 7 == startAt) { 
			sHTML += "</tr><tr>" 
			if ((showWeekNumber==1)&&(datePointer<numDaysInMonth)) {
				sHTML += "<td align=right>" + (WeekNbr(new Date(yearSelected,monthSelected,datePointer+1))) + "&nbsp;</td>"
			}
		}
	}

	document.getElementById("content").innerHTML   = sHTML
	document.getElementById("spanMonth").innerHTML = "&nbsp;" +	monthName[monthSelected] + "&nbsp;<IMG id='changeMonth' SRC='"+imgDir+"drop1.gif' WIDTH='12' HEIGHT='10' BORDER=0>"
	document.getElementById("spanYear").innerHTML =	"&nbsp;" + yearSelected	+ "&nbsp;<IMG id='changeYear' SRC='"+imgDir+"drop1.gif' WIDTH='12' HEIGHT='10' BORDER=0>"
}

function popUpCalendar(ctl,	ctl2, format) {
	if (!format) format = "yyyy-mm-dd";
	var	leftpos=0
	var	toppos=0

	if (bPageLoaded) {
		if ( crossobj.visibility ==	"hidden" ) {
			ctlToPlaceValue	= ctl2
			dateFormat=format;

			formatChar = " "
			aFormat	= dateFormat.split(formatChar)
			if (aFormat.length<3) {
				formatChar = "/"
				aFormat	= dateFormat.split(formatChar)
				if (aFormat.length<3) {
					formatChar = "."
					aFormat	= dateFormat.split(formatChar)
					if (aFormat.length<3) {
						formatChar = "-"
						aFormat	= dateFormat.split(formatChar)
						if (aFormat.length<3) {
							// invalid date	format
							formatChar=""
						}
					}
				}
			}
alert("aFormat="+aFormat);

			tokensChanged =	0
			if ( formatChar	!= "" ) {
				// use user's date
				aData =	ctl2.value.split(formatChar)

				for	(i=0;i<3;i++) {
					if ((aFormat[i]=="d") || (aFormat[i]=="dd")) {
						dateSelected = parseInt(aData[i], 10)
						tokensChanged ++
					}
					else if	((aFormat[i]=="m") || (aFormat[i]=="mm")) {
						monthSelected =	parseInt(aData[i], 10) - 1
						tokensChanged ++
					}
					else if	(aFormat[i]=="yyyy") {
						yearSelected = parseInt(aData[i], 10)
						tokensChanged ++
					}
					else if	(aFormat[i]=="mmm") {
						for	(j=0; j<12;	j++) {
							if (aData[i]==monthName[j]) {
								monthSelected=j
								tokensChanged ++
							}
						}
					}
				}
			}

			if ((tokensChanged!=3)||isNaN(dateSelected)||isNaN(monthSelected)||isNaN(yearSelected)) {
				dateSelected = dateNow
				monthSelected =	monthNow
				yearSelected = yearNow
			}

			odateSelected=dateSelected
			omonthSelected=monthSelected
			oyearSelected=yearSelected

			aTag = ctl
alert("object = "+aTag);
alert("tagName = "+aTag.tagName);
			do {
				aTag = aTag.offsetParent;
				leftpos	+= aTag.offsetLeft;
				toppos += aTag.offsetTop;
			} while(aTag.tagName!="BODY");

			crossobj.left =	fixedX==-1 ? ctl.offsetLeft	+ leftpos :	fixedX
			crossobj.top = fixedY==-1 ?	ctl.offsetTop +	toppos + ctl.offsetHeight +	2 :	fixedY
			constructCalendar (1, monthSelected, yearSelected);
			crossobj.visibility=(dom||ie)? "visible" : "show"
			
			hideElement( 'SELECT', document.getElementById("calendar") );
			hideElement( 'APPLET', document.getElementById("calendar") );			

			bShow = true;
		}
	}
	else {
		initPopupCalendar()
		popUpCalendar(ctl,	ctl2, format)
	}
}

document.onkeypress = function hidecal1 () { 
	if (event.keyCode==27) {
		hideCalendar()
	}
}

document.onclick = function hidecal2 () { 		
	if (!bShow) 
		hideCalendar()
	bShow = false
}

if(ie) {
	initPopupCalendar()
}
else {
	addEvent(window, 'load', initPopupCalendar);
}
*/