//	written	by Tan Ling	Wee	on 2 Dec 2001
//	last updated 30 Oct 2003
//	email : fuushikaden@yahoo.com
//	website : www.pengz.com
//	TabSize: 4
//
//	modified by ALQUANTO 30 July 2003 - german language included.
//									  - modified languageLogic with the ISO-2letter-strings
//									  - changes in in showCalendar: defaultLanguage is already set...
//									  - js and html corrected... more xhtml-compliant... simplier css
//	email: popcalendar@alquanto.de
//
//	modified by PinoToy 25 July 2003  - new logic for multiple languages (English, Spanish and ready for more).
//									  - changes in popUpMonth & popDownMonth methods for hidding	popup.
//									  - changes in popDownYear & popDownYear methods for hidding	popup.
//									  - new logic for disabling dates in	the past.
//									  - new method showCalendar, dynamic	configuration of language, enabling	past & position.
//									  - changes in the styles.
//	email: pinotoy@yahoo.com
//
//  modified by Balazs Szuecs 15.10.2003
//									  - html escape sequences for native language characters
//									  - merged a posting by Martin Venter martin@unirnd.co.za ("Modified version to overlay IE objects")
//									  - switch to enable/dispable weekend & holiday links
//									  - Opera compatibility ( getYear() --> getFullYear() )
//									  - calendar accepts yy year entries
//									  - calendar jumps to today on scramble entry
//									  - color & layout modifications, style parameters defined
//									  - adapted function OsterSonntag by Ralf Pfeifer to calculate easter holidays
//									  - addHoliday with month = 0 : easter dependent holiday, days after easter sunday given in the "day" field
//									  - initCalendar( lang ) defined to initalize language dependent help texts
//									  - texts extracted --> TextCenter
//									  - etc...
//  email: balazs_szucs@hotmail.com

	var language = 'en';	// Default Language: en - english ; es - spanish; de - german
	var enablePast = 0;		// 0 - disabled ; 1 - enabled
	var enableHoliday = 0;	// 0 - disabled ; 1 - enabled
	var enableWeekend = 0;	// 0 - disabled ; 1 - enabled
	var fixedX = -1;		// x position (-1 if to appear below control)
	var fixedY = -1;		// y position (-1 if to appear below control)
	var startAt = 1;		// 0 - sunday ; 1 - monday
	var showWeekNumber = 1;	// 0 - don't show; 1 - show
	var showToday = 1;		// 0 - don't show; 1 - show
	var imgDir = '/portletimg/infinity/uifw/widgets/client/';		// directory for images ... e.g. var imgDir="/img/"
	// var dayName = '';
	var maxXNormalDisplay = 738;	// above this x coordinate the calendar is placed _below_ the input field

	var HideIEObjects = false; //Hides IE objects.
	var OverlayIEObjects = true; //It will display the calendar above any IE objects

	/*
	if (startAt==0) {
		dayName = {
			en : new Array('Sun','Mon','Tue','Wed','Thu','Fri','Sat'),
			es : new Array('Dom','Lun','Mar','Mie','Jue','Vie','Sab'),
			de : new Array('So','Mo','Di','Mi','Do','Fr','Sa')
		};
	} else {
		dayName = {
			en : new Array('Mon','Tue','Wed','Thu','Fri','Sat','Sun'),
			es : new Array('Lun','Mar','Mie','Jue','Vie','Sab','Dom'),
			de : new Array('Mo','Di','Mi','Do','Fr','Sa','So')
		};
	}
	*/

	var crossobj, crossMonthObj, crossYearObj, monthSelected, yearSelected, dateSelected, omonthSelected, oyearSelected, odateSelected, monthConstructed, yearConstructed, intervalID1, intervalID2, timeoutID1, timeoutID2, ctlToPlaceValue, ctlNow, dateFormat, nStartingYear, selDayAction, isPast;
	var visYear  = 0;
	var visMonth = 0;
	var bPageLoaded = false;
	var ie  = document.all;
	var dom = document.getElementById;
	var ns4 = document.layers;
	var opera = (navigator.userAgent.indexOf("Opera")!=-1)?true:false;
	var today    = new Date();
	var dateNow  = today.getDate();
	var monthNow = today.getMonth();
	var yearNow  = today.getFullYear();
	var imgsrc   = new Array('drop1.gif','drop2.gif','left1.gif','left2.gif','right1.gif','right2.gif');
	var img      = new Array();
	var bShow    = false;

	// --------- styles by Balazs
	
	var todayStyle = 'color:#DF0029;font-weight:bold;';
	var weekendStylePast = 'color:#909090;';
	var weekendStyle = 'color:#6E8C8C;';
	var workdayStylePast = 'color:#909090;';
	var workdayStyle = 'color:#404040;';
	var holidayStyle = 'color:#AFAFAF;';
	var weekNrStyle = 'color:#737373;'
	var dayNameStyle = 'color:#737373;font-weight:bold;';
	var todayIsStyle = 'color:#404040;';
	var styleAnchor = 'text-decoration:none;color:#404040;'; // today link
	var styleLightBorder = 'border:1px solid #DF0029;'; // selected date
	var bottomBgStyle = 'background-color:#DCDCDC;';
	var menuItemBgColor = '#DCDCDC';
	var menuItemSelectedBgColor = '#909090';
	var menuItemStyle = 'color:#404040;';
	var menuCaptionStyle = 'border:0px solid #d0d0d0;cursor:pointer; color: #ffffff;';
	
	// ---------


	/* 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);
				/* CHANGE by Charlie Roche for nested TDs*/
				else if(overDiv.offsetTop >= (objTop + objHeight + obj.height));
				/* END CHANGE */
				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];
		}
 		addIFrame('calendariframe');
		document.write ('<div onclick=\"bShow=true\" id=\"calendar\" style="z-index:+999;position:absolute;visibility:hidden;"><table width="'+((showWeekNumber==1)?250:220)+'" style="font-family:Arial;font-size:11px;border: 1px solid #A0A0A0;" bgcolor="#ffffff"><tr bgcolor="#DF0029"><td><table width="'+((showWeekNumber==1)?248:218)+'"><tr><td style="padding:2px;font-family:Arial;font-size:11px;"><font color="#ffffff' + '' /*C9D3E9*/ +'"><b><span id="caption"></span></b></font></td><td align="right"><a href="javascript:hideCalendar()"><img src="'+imgDir+'close.gif" width="15" height="13" border="0" /></a></td></tr></table></td></tr><tr><td style="padding:5px" bgcolor="#ffffff"><span id="content" name="content"></span></td></tr>');

		if (showToday == 1) {
			document.write ('<tr style="' + bottomBgStyle + '"><td style="padding:5px" align="center"><span id="lblToday"></span></td></tr>');
		}
		document.write ('</table></div>');
		addIFrame('monthiframe');
		document.write ('<div id="selectMonth" style="position:absolute;visibility:hidden;z-index:+999;"></div>');
		addIFrame('yeariframe');
		document.write ('<div id="selectYear" style="position:absolute;visibility:hidden;z-index:+999;"></div>');
	}

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

	function init() {
		if (!ns4)
		{
			//if (!ie) yearNow += 1900;
			//if (yearNow < 2000)    // Y2K Fix, Isaac Powell
			//yearNow = yearNow + 1900; // http://onyx.idbsu.edu/~ipowell


			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 =	'<font style="' + todayIsStyle + '">' + todayString + ' <a onmousemove="window.status=\''+gotoString+'\'" onmouseout="window.status=\'\'" title="'+gotoString+'" style="'+styleAnchor+'" href="javascript:monthSelected=monthNow;yearSelected=yearNow;constructCalendar();">'+dayName[(today.getDay()-startAt==-1)?6:(today.getDay()-startAt)]+', ' + dateNow + ' ' + monthName[monthNow].substring(0,3) + ' ' + yearNow + '</a></font>';
			}

			sHTML1 = '<span id="spanLeft" style="' + menuCaptionStyle + '" onmouseover="swapImage(\'changeLeft\',\'left2.gif\');this.style.borderColor=\'#ffffff\';window.status=\''+scrollLeftMessage+'\'" onclick="decMonth()" onmouseout="clearInterval(intervalID1);swapImage(\'changeLeft\',\'left1.gif\');this.style.borderColor=\'#d0d0d0\';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" style="' + menuCaptionStyle + '" onmouseover="swapImage(\'changeRight\',\'right2.gif\');this.style.borderColor=\'#ffffff\';window.status=\''+scrollRightMessage+'\'" onmouseout="clearInterval(intervalID1);swapImage(\'changeRight\',\'right1.gif\');this.style.borderColor=\'#d0d0d0\';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" style="' + menuCaptionStyle + '" onmouseover="swapImage(\'changeMonth\',\'drop2.gif\');this.style.borderColor=\'#ffffff\';window.status=\''+selectMonthMessage+'\'" onmouseout="swapImage(\'changeMonth\',\'drop1.gif\');this.style.borderColor=\'#d0d0d0\';window.status=\'\'" onclick="popUpMonth()"></span>&nbsp;';
			sHTML1 += '<span id="spanYear" style="' + menuCaptionStyle + '" onmouseover="swapImage(\'changeYear\',\'drop2.gif\');this.style.borderColor=\'#ffffff\';window.status=\''+selectYearMessage+'\'" onmouseout="swapImage(\'changeYear\',\'drop1.gif\');this.style.borderColor=\'#d0d0d0\';window.status=\'\'" onclick="popUpYear()"></span>&nbsp;';

			document.getElementById('caption').innerHTML = sHTML1;

			bPageLoaded=true;
		}
	}

	function hideCalendar() {
		if( crossobj != null ) crossobj.visibility = 'hidden';
		hideIFrame('calendariframe');

		if (crossMonthObj != null) popDownMonth(); //crossMonthObj.visibility = 'hidden';
		if (crossYearObj  != null) popDownYear();  //crossYearObj.visibility = 'hidden';
		//showElement('SELECT');
		//showElement('APPLET');
		DoShowIEObjects();
	}

	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 ('mmmm','<p>');
		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>',monthName[m]);
		sTmp = sTmp.replace ('<p>',monthName2[m]);
		sTmp = sTmp.replace ('yyyy',y);
		return sTmp.replace ('yy',padZero(y%100));
	}

	function closeCalendar() {
		hideCalendar();
		ctlToPlaceValue.value = constructDate(dateSelected,monthSelected,yearSelected);
		try{ctlToPlaceValue.onchange();}catch(e){}
	}

	/*** 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.style.backgroundColor=\'' + menuItemSelectedBgColor + '\'" onmouseout="this.style.backgroundColor=\'\'" style="cursor:pointer" onclick="monthConstructed=false;monthSelected=' + i + ';constructCalendar();popDownMonth();event.cancelBubble=true"><font style="' + menuItemStyle + '">&nbsp;' + sName + '&nbsp;</font></td></tr>';
			}

			document.getElementById('selectMonth').innerHTML = '<table width="70" style="font-family:Arial;font-size:11px;border:1px solid #a0a0a0;" bgcolor="' + menuItemBgColor + '" cellspacing="0" onmouseover="clearTimeout(timeoutID1)" onmouseout="clearTimeout(timeoutID1);timeoutID1=setTimeout(\'popDownMonth()\',100);event.cancelBubble=true">' + sHTML + '</table>';

			monthConstructed = true;
		}
	}

	function popUpMonth() {
		if (visMonth == 1) {
			popDownMonth();
			visMonth--;
		} else {
			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'));
			DoHideIEObjects('selectMonth');
 
			//sets the iframe size properties to the month div size properties
			showIFrame('monthiframe', 'selectMonth', crossMonthObj);

			visMonth++;
		}
	}

	function popDownMonth() {
		crossMonthObj.visibility = 'hidden';
		hideIFrame('monthiframe');
		visMonth = 0;
	}

	/*** Year Pulldown ***/
	function incYear() {
		for	(i=0; i<7; i++) {
			newYear	= (i + nStartingYear) + 1;
			if (newYear == yearSelected)
				txtYear = '<span style="' + menuItemStyle + ';font-weight:bold;">&nbsp;' + newYear + '&nbsp;</span>';
			else
				txtYear = '<span style="' + menuItemStyle + ';">&nbsp;' + newYear + '&nbsp;</span>';
			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 = '<span style="' + menuItemStyle + ';font-weight:bold">&nbsp;' + newYear + '&nbsp;</span>';
			else
				txtYear = '<span style="' + menuItemStyle + ';">&nbsp;' + newYear + '&nbsp;</span>';
			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.style.backgroundColor=\'' + menuItemSelectedBgColor + '\'" onmouseout="clearInterval(intervalID1);this.style.backgroundColor=\'\'" style="cursor:pointer" onmousedown="clearInterval(intervalID1);intervalID1=setInterval(\'decYear()\',30)" onmouseup="clearInterval(intervalID1)"><font style="' + menuItemStyle + '">-</font></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.style.backgroundColor=\'' + menuItemSelectedBgColor + '\'" onmouseout="this.style.backgroundColor=\'\'" style="cursor:pointer" onclick="selectYear('+j+');event.cancelBubble=true"><font style="' + menuItemStyle + '">&nbsp;' + sName + '&nbsp;</font></td></tr>';
				j++;
			}

			sHTML += '<tr><td align="center" onmouseover="this.style.backgroundColor=\'' + menuItemSelectedBgColor + '\'" onmouseout="clearInterval(intervalID2);this.style.backgroundColor=\'\'" style="cursor:pointer" onmousedown="clearInterval(intervalID2);intervalID2=setInterval(\'incYear()\',30)" onmouseup="clearInterval(intervalID2)"><font style="' + menuItemStyle + '">+</font></td></tr>';

			document.getElementById('selectYear').innerHTML = '<table width="44" cellspacing="0" bgcolor="' + menuItemBgColor + '" style="font-family:Arial;font-size:11px;border:1px solid #a0a0a0;" onmouseover="clearTimeout(timeoutID2)" onmouseout="clearTimeout(timeoutID2);timeoutID2=setTimeout(\'popDownYear()\',100)">' + sHTML + '</table>';

			yearConstructed = true;
		}
	}

	function popDownYear() {
		clearInterval(intervalID1);
		clearTimeout(timeoutID1);
		clearInterval(intervalID2);
		clearTimeout(timeoutID2);
		crossYearObj.visibility= 'hidden';
		hideIFrame('yeariframe');
		visYear = 0;
	}

	function popUpYear() {
		var leftOffset
		if (visYear==1) {
			popDownYear();
			visYear--;
		} else {
			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;

 			DoHideIEObjects('selectYear');
 			//sets the iframe size properties to the year div size properties
   			showIFrame('yeariframe', 'selectYear', crossYearObj);
 
			visYear++;
		}
	}

	/*** calendar ***/
	function WeekNbr(n) {
		// Algorithm used:
		// From Klaus Tondering's Calendar document (The Authority/Guru)
		// http://www.tondering.dk/claus/calendar.html
		// a = (14-month) / 12
		// y = year + 4800 - a
		// m = month + 12a - 3
		// J = day + (153m + 2) / 5 + 365y + y / 4 - y / 100 + y / 400 - 32045
		// d4 = (J + 31741 - (J mod 7)) mod 146097 mod 36524 mod 1461
		// L = d4 / 1460
		// d1 = ((d4 - L) mod 365) + L
		// WeekNumber = d1 / 7 + 1

		year = n.getFullYear();
		month = n.getMonth() + 1;
		if (startAt == 0) {
			day = n.getDate() + 1;
		} else {
			day = n.getDate();
		}

		a = Math.floor((14-month) / 12);
		y = year + 4800 - a;
		m = month + 12 * a - 3;
		b = Math.floor(y/4) - Math.floor(y/100) + Math.floor(y/400);
		J = day + Math.floor((153 * m + 2) / 5) + 365 * y + b - 32045;
		d4 = (((J + 31741 - (J % 7)) % 146097) % 36524) % 1461;
		L = Math.floor(d4 / 1460);
		d1 = ((d4 - L) % 365) + L;
		week = Math.floor(d1/7) + 1;

		return week;
	}

	function constructCalendar () {
		var aNumDays = Array (31,0,31,30,31,30,31,31,30,31,30,31);
		var dateMessage;
		var startDate = new Date (yearSelected,monthSelected,1);
		var endDate;

		if (monthSelected==1) {
			endDate = new Date (yearSelected,monthSelected+1,1);
			endDate = new Date (endDate - (24*60*60*1000));
			numDaysInMonth = endDate.getDate();
		} else {
			numDaysInMonth = aNumDays[monthSelected];
		}

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

		sHTML = '<table border="0" style="font-family:verdana;font-size:10px;"><tr>';

		if (showWeekNumber == 1) {
			sHTML += '<td width="27" style="' + weekNrStyle + '"><b>' + weekString + '</b></td><td width="1" rowspan="7" bgcolor="#d0d0d0" style="padding:0px"><img src="'+imgDir+'divider.gif" width="1"></td>';
		}

		for (i = 0; i<7; i++) {
			sHTML += '<td width="27" align="right" style="' + dayNameStyle + '">' + dayName[i] + '</td>';
		}

		sHTML += '</tr><tr>';
		
		if (showWeekNumber == 1) {
			sHTML += '<td align="right" style="' + weekNrStyle + '">' + 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">';
			sStyle=styleAnchor;
			if ((datePointer == odateSelected) && (monthSelected == omonthSelected) && (yearSelected == oyearSelected))
			{ sStyle+=styleLightBorder }

			var isHoliday = false;

			sHint = '';
			for (k = 0;k < HolidaysCounter; k++) 
			{
				if ( parseInt(Holidays[k].m) == 0 )
				{
					easterHoliday = OsterSonntag( yearSelected, parseInt(Holidays[k].d) );
					if( easterHoliday != null && easterHoliday.getDate() == datePointer && easterHoliday.getMonth() == monthSelected )
					{					
						sHint += sHint=="" ? Holidays[k].desc : "\n"+Holidays[k].desc;
						isHoliday = true;					
					}
				}
				else 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))) 
					{
						sHint += sHint=="" ? Holidays[k].desc : "\n"+Holidays[k].desc;
						isHoliday = true;
					}
				}
			}
			
			sHint = sHint.replace('/\"/g', '&quot;');

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


			//////////////////////////////////////////////
			//////////  Modifications PinoToy  //////////
			//////////////////////////////////////////////
			if( enableWeekend == 0 && ( ( dayPointer % 7 == (startAt * -1)+1 ) || (dayPointer % 7 == (startAt * -1)+7 && startAt==1) || (dayPointer % 7 == startAt && startAt==0) ) ) {
				selDayAction = '';
			}			
			else if ( ( enableHoliday == 0 ) && ( isHoliday == true ) ) {
				selDayAction = '';
			}			
			else if ( enablePast == 0 && ((yearSelected < yearNow) || (monthSelected < monthNow) && (yearSelected == yearNow) || (datePointer < dateNow) && (monthSelected == monthNow) && (yearSelected == yearNow))) {
				selDayAction = '';
				isPast = 1;
			} 
			else {
				selDayAction = 'href="javascript:dateSelected=' + datePointer + ';closeCalendar();"';
				isPast = 0;
			}

			if ((datePointer == dateNow) && (monthSelected == monthNow) && (yearSelected == yearNow)) 	///// today
			{
				sStyle+= todayStyle;
			} 
			else if (dayPointer % 7 == (startAt * -1)+1) 									///// SI ES DOMINGO (SUNDAY)
			{
				if (isPast==1)
				{
					sStyle+= weekendStylePast;
				}					
				else
				{
					sStyle+= weekendStyle;
				}
			} 
			else if ((dayPointer % 7 == (startAt * -1)+7 && startAt==1) || (dayPointer % 7 == startAt && startAt==0)) 	///// SI ES SABADO (SATURDAY)
			{
				if (isPast==1)
				{
					sStyle+= weekendStylePast;
				}					
				else
				{
					sStyle+= weekendStyle;					
				}
			} 
			else if ( isHoliday )
			{
				sStyle+= holidayStyle;
			}
			else 																			///// CUALQUIER OTRO DIA
			{
				if (isPast==1)
				{
					sStyle+= workdayStylePast;
				}
				else
				{
					sStyle+= workdayStyle;
				}
			}
			
			sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' "+selDayAction+">&nbsp;" + datePointer + "&nbsp;</a>";

			sHTML += '';
			if ((dayPointer+startAt) % 7 == startAt) 
			{
				sHTML += '</tr><tr>';
				if ((showWeekNumber == 1) && (datePointer < numDaysInMonth)) 
				{
					sHTML += '<td align="right" style="' + weekNrStyle + '">' + (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">';

		//The height of the calendar changes when changing months so we need to reset the Iframe
		showIFrame('calendariframe', 'calendar', crossobj);
	}

	function showCalendar(ctl, ctl2, format, lang, past, holiday, weekend, fx, fy) {
		if (lang != null && lang != '') language = lang;
		if (past != null) enablePast = past;
		else enablePast = 0;
		if (holiday != null) enableHoliday = holiday;
		else enableHoliday = 0;		
		if (weekend != null) enableWeekend = weekend;
		else enableWeekend = 0;
		if (fx != null) fixedX = fx;
		else fixedX = -1;
		if (fy != null) fixedY = fy;
		else fixedY = -1;

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

	function popUpCalendar(ctl, ctl2, format) {
		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) {
								formatChar = '';					// invalid date format

							}
						}
					}
				}

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

					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++;
								}
							}
						} else if (aFormat[i] == "mmmm") {
							for (j=0; j<12; j++) {
								if (aData[i] == monthName2[j]) {
									monthSelected = j;
									tokensChanged++;
								}
							}
						}
					}
				}

				if ( (tokensChanged != 3) || 
						isNaN(dateSelected) || isNaN(monthSelected) || isNaN(yearSelected) || 
						( monthSelected > 11 ) || ( monthSelected < 0 ) || 
						( dateSelected < 1 ) ) {
					dateSelected  = dateNow;
					monthSelected = monthNow;
					yearSelected  = yearNow;
				}

				// support for 2 digit year
				if( yearSelected < 100 ) {
					yearSelected += 2000;
				}

				if( yearSelected >= 100 && yearSelected <= 1000 ) {
					alert(dateParseError);
					yearSelected=yearNow;
				}
				
				odateSelected  = dateSelected;
				omonthSelected = monthSelected;
				oyearSelected  = yearSelected;

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

				criticalX = (fixedX == -1) ? ctl.offsetLeft + leftpos: fixedX;
				
				// get the size of the current window

				var winW = 630, winH = 460;
				
				if (parseInt(navigator.appVersion)>3) {
				 if (navigator.appName=="Netscape") {
				  winW = window.innerWidth;
				  winH = window.innerHeight;
				 }
				 if (navigator.appName.indexOf("Microsoft")!=-1) {
				  winW = document.body.offsetWidth;
				  winH = document.body.offsetHeight;
				 }
				}
				 		
//		document.write ('<div onclick=\"bShow=true\" id=\"calendar\" style="z-index:+999;position:absolute;visibility:hidden;"><table width="'+((showWeekNumber==1)?250:220)+'" style="font-family:Arial;font-size:11px;border: 1px solid #A0A0A0;" bgcolor="#ffffff"><tr bgcolor="#DF0029"><td><table width="'+((showWeekNumber==1)?248:218)+'"><tr><td style="padding:2px;font-family:Arial;font-size:11px;"><font color="#ffffff' + '' /*C9D3E9*/ +'"><b><span id="caption"></span></b></font></td><td align="right"><a href="javascript:hideCalendar()"><img src="'+imgDir+'close.gif" width="15" height="13" border="0" /></a></td></tr></table></td></tr><tr><td style="padding:5px" bgcolor="#ffffff"><span id="content" name="content"></span></td></tr>');

				//window.alert( ' cx=' + criticalX + ' w=' + winW );				
								
				// end size
								
				/*
				if( criticalX > maxXNormalDisplay ) // too wide
				{								
					crossobj.left = ctl2.offsetLeft + + leftpos;
					crossobj.top = (fixedY == -1) ? ctl2.offsetTop + ctl2.offsetHeight + toppos + 2 : fixedY;
				}				
				else	// normal
				*/
				{					
					if( criticalX + 270 > winW )
					{
						criticalX = winW - 270;
					}
					crossobj.left = criticalX;

					criticalY = (fixedY == -1) ? ctl.offsetTop + toppos : fixedY;				
					//window.alert( ' or=' + criticalY + ' w=' + winH );
					if( criticalY + 110 > winH )
					{
						criticalY = criticalY - 110;
					}					
					crossobj.top = criticalY;
				}

				constructCalendar (1, monthSelected, yearSelected);
				crossobj.visibility = (dom||ie) ? "visible" : "show";
     			//hideElement('SELECT', document.getElementById('calendar'));
  				//hideElement('APPLET', document.getElementById('calendar'));
     			DoHideIEObjects('calendar');

     			//sets the iframe size properties to the calendar div size properties
     			showIFrame('calendariframe', 'calendar', crossobj);

				bShow = true;
			} else {
				hideCalendar();
				if (ctlNow!=ctl) popUpCalendar(ctl, ctl2, format);
			}
			ctlNow = ctl;
		}
	}

function addIFrame(id){
 if (OverlayIEObjects) {
  if (ie && !opera) {
     document.write ('<iframe src=\"javascript:false;\" id=\"' + id + '\" scrolling=\"no\" frameborder=\"0\" style=\"position:absolute;top:0px;left:0px;z-index:+998;display:none\"></iframe>');
   }
 }
}

function showIFrame(ctlifr, ctldiv, obj){
 if (ie && !opera) {
   var ifr;
   if(document.all[ctlifr]){
     ifr=document.all[ctlifr].style;
     ifr.top=obj.top;
     ifr.left=obj.left;
     ifr.width=document.all[ctldiv].clientWidth;
     ifr.height=document.all[ctldiv].clientHeight;
     ifr.display='block';
   }
 }
}

function hideIFrame(ctlifr){
 if (ie && !opera) {
  var ifr;
 if(document.all[ctlifr]){
     ifr = document.all[ctlifr].style;
     ifr.top = 0;
     ifr.left = 0;
     ifr.width = 0;
     ifr.height = 0;
     ifr.display = 'none';
   }
 }
}

function DoShowIEObjects(){
 if (ie && HideIEObjects){
  if (!opera) {
    showElement('SELECT');
    showElement('APPLET');
    showElement('OBJECT');
  }
}
}

function DoHideIEObjects(id){
 if (ie && HideIEObjects){
  if (!opera) {
    hideElement('SELECT', document.getElementById(id));
    hideElement('APPLET', document.getElementById(id));
    hideElement('OBJECT', document.getElementById(id));
  }
}
}

function OsterSonntag(Jahr, TagesDifferenz)
{ // Erstellt von Ralf Pfeifer (www.arstechnica.de), adaptiert von Balazs Szuecs

    // Falls kein Datum angegeben, aktuelles Jahr verwenden.
    if ((Jahr == "") || (Jahr == null)) { Jahr = new Date.getFullYear(); return }

    // Falls ausserhalb des gültigen Datumsbereichs, kein Ergebnis zurueckgeben
    if ((Jahr < 1970) || (2099 < Jahr)) { return; }

    // Falls keine TagesDifferenz angegeben, TadgesDifferenz auf 0 setzen.
    if ((TagesDifferenz == "") || (TagesDifferenz == null)) { TagesDifferenz = 0; }

    var a = Jahr % 19;
    var d = (19 * a + 24) % 30;
    var Tag = d + (2 * (Jahr % 4) + 4 * (Jahr % 7) + 6 * d + 5) % 7;
    if ((Tag == 35) || ((Tag == 34) && (d == 28) && (a > 10))) { Tag -= 7; }

    var OsterDatum = new Date(Jahr, 2, 22)
    // 86400000 = 24 h * 60 min * 60 s * 1000 ms
    // Die Zahl 86400000 nicht ausklammern, sonst gibt's Probleme bei der Typumwandlung !!
    OsterDatum.setTime(OsterDatum.getTime() + 86400000 * TagesDifferenz + 86400000 * Tag)

    // Uhrzeit aus dem Datum entfernen
    // OsterDatum = OsterDatum.toLocaleString()
    // OsterDatum = OsterDatum.substring(0, OsterDatum.length - 9);
    return OsterDatum;
}
    
/* conflict with BusinessNet event listener
	document.onkeypress = function hidecal1 () {
		if (event.keyCode == 27) hideCalendar();
	}
*/
	document.onclick = function hidecal2 () {
		if (!bShow) hideCalendar();
		bShow = false;
	}

	if(ie) {
		//init();
	} else {				
		//window.onload = init;
	}