//	Originally written	by Tan Ling Wee
//	Coming from the BADGER-FINANCE Project (GPL License) (see http://svn.badger-finance.org/filedetails.php?repname=BADGER+finance&path=%2Ftrunk%2Fjs%2Fcalendar.js.php)
//	last updated 8 Oct 2005
//	email :	info@sparrowscripts.com
//  url : www.sparrowscripts.com
//	TabSize: 4
//
//	Russian translation contributed by Kuzminykh Mikhail, and "ddd" format contributed by Esteban on 8 Oct 2005
//
//	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 Eni Kao 24 August 2005
//        - Optimized multiple language support with more than one calendar in different languages (as toy.html)
//        - Added support for Opera, Konqueror and Firefox in non-Quicks mode
//        - Fully compatible to XHTML 1.0 Transitional
//        - Changed depricated font, bgcolor etc. to CSS attributes
//        - Added messages as tooltips (and a new one for the close button)
//        - Made ESC work in every browser
//        - Changed german umlauts to HTML entities for better support of international character sets
//        - TODO: Do this with spanish special characters
//        - Perhaps I missed something?
//    email: popcalendar@enikao.net

	var pop_language = 'fr';	// Default Language: en - english ; es - spanish; de - german ; ru - russian
	var pop_enablePast = 0;		// 0 - disabled ; 1 - enabled
	var pop_fixedX = -1;		// x position (-1 if to appear below control)
	var pop_fixedY = -1;		// y position (-1 if to appear below control)
	var pop_startAt = 1;		// 0 - sunday ; 1 - monday
	var pop_showWeekNumber = 0;	// 0 - don't show; 1 - show
	var pop_showToday = 1;		// 0 - don't show; 1 - show
	var pop_imgDir = "/js/media/"		// directory for images ... e.g. var pop_imgDir="/img/"
	var pop_dayName = '';

	var pop_gotoString = {
			en : 'Go To Current Month',
			es : 'Ir al Mes Actual',
			de : 'Gehe zu aktuellem Monat',
			ru : '§±§Ö§â§Ö§Û§ä§Ú §Ü §ä§Ö§Ü§å§ë§Ö§Þ§å §Þ§Ö§ã§ñ§è§å',
			fr : 'Aller au mois en cours'
	};
	var pop_todayString = {
			en : 'Today is',
			es : 'Hoy es',
			de : 'Heute ist',
			ru : '§³§Ö§Ô§à§Õ§ß§ñ',
			fr : 'Aujourd\'hui :'
	};
	var pop_weekString = {
			en : 'Wk',
			es : 'Sem',
			de : 'KW',
			ru : '§¯§Ö§Õ',
			fr : 'Sem'
	};
	var pop_scrollLeftMessage = {
			en : 'Click to scroll to previous month. Hold mouse button to scroll automatically.',
			es : 'Presione para pasar al mes anterior. Deje presionado para pasar varios meses.',
			de : 'Klicken um zum vorigen Monat zu gelangen. Gedr§îckt halten, um automatisch weiter zu scrollen.',
			ru : '§¯§Ñ§Ø§Þ§Ú§ä§Ö §Õ§Ý§ñ §á§Ö§â§Ö§ç§à§Õ§Ñ §Ü §á§â§Ö§Õ§í§Õ§å§ë§Ö§Þ§å §Þ§Ö§ã§ñ§è§å. §µ§Õ§Ö§â§Ø§Ú§Ó§Ñ§Û§ä§Ö §Ü§ß§à§á§Ü§å §Þ§í§ê§Ú §ß§Ñ§Ø§Ñ§ä§à§Û §Õ§Ý§ñ §Ñ§Ó§ä§à§Þ§Ñ§ä§Ú§é§Ö§ã§Ü§à§Û §á§â§à§Ü§â§å§ä§å§Ú.',
			fr : 'Cliquer pour aller au mois précédent. Laisser appuyé pour faire défiler.'
	};
	var pop_scrollRightMessage = {
			en : 'Click to scroll to next month. Hold mouse button to scroll automatically.',
			es : 'Presione para pasar al siguiente mes. Deje presionado para pasar varios meses.',
			de : 'Klicken um zum n§Õchsten Monat zu gelangen. Gedr§îckt halten, um automatisch weiter zu scrollen.',
			ru : '§¯§Ñ§Ø§Þ§Ú§ä§Ö §Õ§Ý§ñ §á§Ö§â§Ö§ç§à§Õ§Ñ §Ü §ã§Ý§Ö§Õ§å§ð§ë§Ö§Þ§å §Þ§Ö§ã§ñ§è§å. §µ§Õ§Ö§â§Ø§Ú§Ó§Ñ§Û§ä§Ö §Ü§ß§à§á§Ü§å §Þ§í§ê§Ú §ß§Ñ§Ø§Ñ§ä§à§Û §Õ§Ý§ñ §Ñ§Ó§ä§à§Þ§Ñ§ä§Ú§é§Ö§ã§Ü§à§Û §á§â§à§Ü§â§å§ä§å§Ú.',
			fr : 'Cliquer pour aller au mois suivant. Laisser appuyé pour faire défiler.'
	};
	var pop_selectMonthMessage = {
			en : 'Click to select a month.',
			es : 'Presione para seleccionar un mes',
			de : 'Klicken um Monat auszuw§Õhlen',
			ru : '§¯§Ñ§Ø§Þ§Ú§ä§Ö §Õ§Ý§ñ §Ó§í§Ò§à§â§Ñ §Þ§Ö§ã§ñ§è§Ñ',
			fr : 'Cliquez pour sélectionner un mois.'
	};
	var pop_selectYearMessage = {
			en : 'Click to select a year.',
			es : 'Presione para seleccionar un a§ão',
			de : 'Klicken um Jahr auszuw§Õhlen',
			ru : '§¯§Ñ§Ø§Þ§Ú§ä§Ö §Õ§Ý§ñ §Ó§í§Ò§à§â§Ñ §Ô§à§Õ§Ñ',
			fr : 'Cliquez pour sélectionner une année.'
	};
	var pop_selectDateMessage = {               // do not replace [date], it will be replaced by date.
			en : 'Select [date] as date.',
			es : 'Seleccione [date] como fecha',
			de : 'W§Õhle [date] als Datum.',
			ru : '§£§í§Ò§â§Ñ§ä§î [date] §Ó §Ü§Ñ§é§Ö§ã§ä§Ó§Ö §Õ§Ñ§ä§í',
			fr : 'Selectionner [date] comme date.'
	};
	var pop_monthName = {
			en : new Array('January','February','March','April','May','June','July','August','September','October','November','December'),
			es : new Array('Enero','Febrero','Marzo','Abril','Mayo','Junio','Julio','Agosto','Septiembre','Octubre','Noviembre','Diciembre'),
			de : new Array('Januar','Februar','M§Õrz','April','Mai','Juni','Juli','August','September','Oktober','November','Dezember'),
			ru : new Array('§Á§ß§Ó§Ñ§â§î','§¶§Ö§Ó§â§Ñ§Ý§î','§®§Ñ§â§ä','§¡§á§â§Ö§Ý§î','§®§Ñ§Û','§ª§ð§ß§î','§ª§ð§Ý§î','§¡§Ó§Ô§å§ã§ä','§³§Ö§ß§ä§ñ§Ò§â§î','§°§Ü§ä§ñ§Ò§â§î','§¯§à§ñ§Ò§â§î','§¥§Ö§Ü§Ñ§Ò§â§î'),
			fr : new Array("Janvier","Février","Mars","Avril","Mai","Juin","Juillet","Août","Septembre","Octobre","Novembre","Decembre")
	};
	var pop_monthName2 = {
			en : new Array('JAN','FEB','MAR','APR','MAY','JUN','JUL','AUG','SEP','OCT','NOV','DEC'),
			es : new Array('ENE','FEB','MAR','ABR','MAY','JUN','JUL','AGO','SEP','OCT','NOV','DIC'),
			de : new Array('JAN','FEB','MRZ','APR','MAI','JUN','JUL','AUG','SEP','OKT','NOV','DEZ'),
			ru : new Array('§Á§¯§£','§¶§¦§£','§®§¡§²','§¡§±§²','§®§¡§«','§ª§À§¯','§ª§À§­','§¡§£§¤','§³§¦§¯','§°§¬§´','§¯§°§Á','§¥§¦§¬'),
			fr : new Array('JAN','FEV','MAR','AVR','MAI','JUN','JUL','AOU','SEP','OCT','NOV','DEC')
	};

	var pop_closeCalendarMessage = {
			en : 'Click to close the calendar.',
			es : 'Click to close the calendar.', //todo : trad
			de : 'Klicken, um den Kalender zu schließen.',
			ru : 'Click to close the calendar.', //todo : trad
			fr : 'Cliquer pour fermer le calendrier'
	}

	if (pop_startAt==0) {
			pop_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'),
					ru : new Array('§£§ã','§±§ß','§£§ä','§³§â','§¹§ä','§±§ä','§³§Ò'),
					fr : new Array("Dim","Lun","Mar","Mer","Jeu","Ven","Sam")
			};
	} else {
			pop_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'),
					ru : new Array('§±§ß','§£§ä','§³§â','§¹§ä','§±§ä','§³§Ò', '§£§ã'),
					fr : new Array("Lun","Mar","Mer","Jeu","Ven","Sam","Dim")
			};
	}

	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 op = window.opera;
	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','close.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);
				/* 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 = pop_imgDir + imgsrc[i];
	    }
	    document.write (
	        '<div onclick="bShow=true" id="calendar" style="z-index:+999;position:absolute;visibility:hidden;">' +
	            '<table width="'+((pop_showWeekNumber==1)?250:220)+'" style="font-family:Arial;font-size:11px;border: 1px solid #A0A0A0;background-color:#ffffff">' +
	                '<tr style="background-color:#000066;"><td><table width="100%"><tr>' +
	                    '<td style="padding:2px;font-family:Arial;font-size:11px;"><span id="caption" style="font-weight:bold;color:#ffffff;"></span></td>' +
	                    '<td align="right"><a href="javascript:hideCalendar()" id="imgCloseCalendar"><img src="'+pop_imgDir+'close.gif" width="15" height="13" border="0" title="'+pop_closeCalendarMessage[pop_language]+'" alt="'+pop_closeCalendarMessage[pop_language]+'" /></a></td>' +
	                '</tr></table></td></tr>' +
	                '<tr><td style="padding:5px;background-color:#ffffff"><div id="content" style="display:inline;"></div></td></tr>');

	    if (pop_showToday == 1) {
	        document.write ('<tr style="background-color:#f0f0f0"><td style="padding:5px;text-align:center;"><span id="lblToday"></span></td></tr>');
	    }
	    document.write ('</table></div><div id="selectMonth" style="z-index:+999;position:absolute;visibility:hidden;"></div><div id="selectYear" style="z-index:+999;position:absolute;visibility:hidden;"></div>');
	}

	var	styleAnchor = 'text-decoration:none;color:black;';
	var	styleLightBorder = 'border:1px solid #a0a0a0;';

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


	function initCalendar() {
		if(typeof(pop_dayName[pop_language])=="undefined"){
			pop_language='en'; //default
		}
	    if (!ns4)
	    {
	        if (!ie || op) 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 (pop_showToday == 1) {
	            document.getElementById('lblToday').innerHTML =    '<span style="color:#000066">' + pop_todayString[pop_language] + ' <a onmousemove="window.status=\''+pop_gotoString[pop_language]+'\'" onmouseout="window.status=\'\'" title="'+pop_gotoString[pop_language]+'" style="'+styleAnchor+'" href="javascript:monthSelected=monthNow;yearSelected=yearNow;constructCalendar();">'+pop_dayName[pop_language][(today.getDay()-pop_startAt==-1)?6:(today.getDay()-pop_startAt)]+', ' + dateNow + ' ' + pop_monthName[pop_language][monthNow].substring(0,3) + ' ' + yearNow + '</a></span>';
	        }

	        bPageLoaded=true;
	    }
	}

	function constructCaption() {
	    if (!ns4) {
	        sHTML1 = '<span id="spanLeft" style="border:1px solid #36f;cursor:pointer" onmouseover="swapImage(\'changeLeft\',\'left2.gif\');this.style.borderColor=\'#8af\';window.status=\''+pop_scrollLeftMessage[pop_language]+'\'" onclick="decMonth()" onmouseout="clearInterval(intervalID1);swapImage(\'changeLeft\',\'left1.gif\');this.style.borderColor=\'#36f\';window.status=\'\';clearTimeout(timeoutID1)" onmousedown="clearTimeout(timeoutID1);timeoutID1=setTimeout(\'StartDecMonth()\',500)" onmouseup="clearTimeout(timeoutID1);clearInterval(intervalID1)" title="'+pop_scrollLeftMessage[pop_language]+'">&nbsp<img id="changeLeft" src="'+pop_imgDir+'left1.gif" width="10" height="11" border="0" alt="'+pop_scrollLeftMessage[pop_language]+'" />&nbsp</span>&nbsp;';
	        sHTML1 += '<span id="spanRight" style="border:1px solid #36f;cursor:pointer" onmouseover="swapImage(\'changeRight\',\'right2.gif\');this.style.borderColor=\'#8af\';window.status=\''+pop_scrollRightMessage[pop_language]+'\'" onmouseout="clearInterval(intervalID1);swapImage(\'changeRight\',\'right1.gif\');this.style.borderColor=\'#36f\';window.status=\'\';clearTimeout(timeoutID1)" onclick="incMonth()" onmousedown="clearTimeout(timeoutID1);timeoutID1=setTimeout(\'StartIncMonth()\',500)" onmouseup="clearTimeout(timeoutID1);clearInterval(intervalID1)" title="'+pop_scrollRightMessage[pop_language]+'">&nbsp<img id="changeRight" src="'+pop_imgDir+'right1.gif" width="10" height="11" border="0" alt="'+pop_scrollRightMessage[pop_language]+'" />&nbsp</span>&nbsp;';
	        sHTML1 += '<span id="spanMonth" style="border:1px solid #36f;cursor:pointer" onmouseover="swapImage(\'changeMonth\',\'drop2.gif\');this.style.borderColor=\'#8af\';window.status=\''+pop_selectMonthMessage[pop_language]+'\'" onmouseout="swapImage(\'changeMonth\',\'drop1.gif\');this.style.borderColor=\'#36f\';window.status=\'\'" onclick="popUpMonth()" title="'+pop_selectMonthMessage[pop_language]+'"></span>&nbsp;';
	        sHTML1 += '<span id="spanYear" style="border:1px solid #36f;cursor:pointer" onmouseover="swapImage(\'changeYear\',\'drop2.gif\');this.style.borderColor=\'#8af\';window.status=\''+pop_selectYearMessage[pop_language]+'\'" onmouseout="swapImage(\'changeYear\',\'drop1.gif\');this.style.borderColor=\'#36f\';window.status=\'\'" onclick="popUpYear()" title="'+pop_selectYearMessage[pop_language]+'"></span>&nbsp;';

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

	        //Hack to adjust close button message
	        closeButtonImg = document.getElementById('imgCloseCalendar');


			if (closeButtonImg) {
	            closeButtonImg.innerHTML = '<img src="'+pop_imgDir+'close.gif" width="15" height="13" border="0" title="'+pop_closeCalendarMessage[pop_language]+'" alt="'+pop_closeCalendarMessage[pop_language]+'" />';
	        }
		}
	}

	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 ('ddd', '<n>');
	    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>',pop_monthName[pop_language][m]);
	    sTmp = sTmp.replace ('<p>',pop_monthName2[pop_language][m]);
	    sTmp = sTmp.replace ('yyyy',y);
	    return sTmp.replace ('yy',padZero(y%100));
	}

	function closeCalendar() {
		hideCalendar();
		//ctlToPlaceValue.value = constructDate(dateSelected,monthSelected,yearSelected);
		document.getElementById(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 = pop_monthName[pop_language][i];
				if (i == monthSelected){
					sName = '<b>' + sName + '</b>';
				}
				sHTML += '<tr><td id="m' + i + '" onmouseover="this.style.backgroundColor=\'#909090\'" onmouseout="this.style.backgroundColor=\'\'" style="cursor:pointer" onclick="monthConstructed=false;monthSelected=' + i + ';constructCalendar();popDownMonth();event.cancelBubble=true"><font color="#000066">&nbsp;' + sName + '&nbsp;</font></td></tr>';
			}

			document.getElementById('selectMonth').innerHTML = '<table width="70" style="font-family:Arial;font-size:11px;border:1px solid #a0a0a0;background-color:#f0f0f0" 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) + "px";
	        crossMonthObj.top = (parseInt(crossobj.top) + 26) + "px";
	        hideElement('SELECT', document.getElementById('selectMonth'));
	        hideElement('APPLET', document.getElementById('selectMonth'));
	        visMonth++;
	    }
	}

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

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

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

	        document.getElementById('selectYear').innerHTML = '<table width="44" cellspacing="0" style="font-family:Arial;font-size:11px;border:1px solid #a0a0a0;background-color:#f0f0f0" 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';
		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 + "px";
	        crossYearObj.top = (parseInt(crossobj.top) + 26) + "px";
	        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 (pop_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;

	    constructCaption();

	    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() - pop_startAt;

	    if (dayPointer<0) dayPointer = 6;

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

		if (pop_showWeekNumber == 1) {
			sHTML += '<td width="27"><b>' + pop_weekString[pop_language] + '</b></td><td width="1" rowspan="7" style="padding:0px;background-color:#d0d0d0"><img src="'+pop_imgDir+'divider.gif" width="1" /></td>';
		}

		for (i = 0; i<7; i++) {
			sHTML += '<td width="27" align="right"><b><span style="color:#000066">' + pop_dayName[pop_language][i] + '</span></b></td>';
		}

		sHTML += '</tr><tr>';

		if (pop_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">';
			sStyle=styleAnchor;
			if ((datePointer == odateSelected) && (monthSelected == omonthSelected) && (yearSelected == oyearSelected))
			{ sStyle+=styleLightBorder }

			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+= 'background-color:#fdd;';
						sHint += sHint=="" ? Holidays[k].desc : "\n"+Holidays[k].desc;
					}
				}
			}

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

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


	        //////////////////////////////////////////////
	        //////////  Modifications PinoToy  //////////
	        //////////////////////////////////////////////
	        if (pop_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
	            sHTML += "<b><a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' "+selDayAction+"><span style=\"color:#ff0000\">&nbsp;" + datePointer + "</span>&nbsp;</a></b>";
	        } else if (dayPointer % 7 == (pop_startAt * -1)+1) {                                    ///// SI ES DOMINGO
	            if (isPast==1)
	                sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' "+selDayAction+">&nbsp;<span style=\"color:#909090\">" + datePointer + "</span>&nbsp;</a>";
	            else
	                sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' "+selDayAction+">&nbsp;<span style=\"color:#54A6E2\">" + datePointer + "</span>&nbsp;</a>";
	        } else if ((dayPointer % 7 == (pop_startAt * -1)+7 && pop_startAt==1) || (dayPointer % 7 == pop_startAt && pop_startAt==0)) {    ///// SI ES SABADO
	            if (isPast==1)
	                sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' "+selDayAction+">&nbsp;<span style=\"color:#909090\">" + datePointer + "</span>&nbsp;</a>";
	            else
	                sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' "+selDayAction+">&nbsp;<span style=\"color:#54A6E2\">" + datePointer + "</span>&nbsp;</a>";
	        } else {                                                                            ///// CUALQUIER OTRO DIA
	            if (isPast==1)
	                sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' "+selDayAction+">&nbsp;<span style=\"color:#909090\">" + datePointer + "</span>&nbsp;</a>";
	            else
	                sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' "+selDayAction+">&nbsp;<span style=\"color:#000066\">" + datePointer + "</span>&nbsp;</a>";
	        }

	        sHTML += '';
	        if ((dayPointer+pop_startAt) % 7 == pop_startAt) {
	            sHTML += '</tr><tr>';
	            if ((pop_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;' +    pop_monthName[pop_language][monthSelected] + '&nbsp;<img id="changeMonth" src="'+pop_imgDir+'drop1.gif" width="12" height="10" border="0" alt="" />'
	    document.getElementById('spanYear').innerHTML  = '&nbsp;' + yearSelected    + '&nbsp;<img id="changeYear" src="'+pop_imgDir+'drop1.gif" width="12" height="10" border="0" alt="" />';
	}

	function showCalendar(ctl, ctl2, format, lang, past, fx, fy) {
		if (lang != null && lang != '') pop_language = lang;
		if (past != null) pop_enablePast = past;
		else pop_enablePast = 0;
		if (fx != null) pop_fixedX = fx;
		else pop_fixedX = -1;
		if (fy != null) pop_fixedY = fy;
		else pop_fixedY = -1;

		if (pop_showToday == 1) {
			document.getElementById('lblToday').innerHTML = '<span style="color:#000066">' + pop_todayString[pop_language] + ' <a onmousemove="window.status=\''+pop_gotoString[pop_language]+'\'" onmouseout="window.status=\'\'" title="'+pop_gotoString[pop_language]+'" style="'+styleAnchor+'" href="javascript:monthSelected=monthNow;yearSelected=yearNow;constructCalendar();">'+pop_dayName[pop_language][(today.getDay()-pop_startAt==-1)?6:(today.getDay()-pop_startAt)]+', ' + dateNow + ' ' + pop_monthName[pop_language][monthNow].substring(0,3) + ' ' + yearNow + '</a></span>';
		}
		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
					aData =	document.getElementById(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] == pop_monthName[pop_language][j]) {
									monthSelected=j;
									tokensChanged++;
								}
							}
						} else if (aFormat[i] == "mmmm") {
							for (j=0; j<12; j++) {
								if (aData[i] == pop_monthName2[pop_language][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;
				do {
					aTag     = aTag.offsetParent;
					leftpos += aTag.offsetLeft;
					toppos  += aTag.offsetTop;
	            } while (aTag.tagName != 'BODY');

	            crossobj.left = ((pop_fixedX == -1) ? ctl.offsetLeft + leftpos : pop_fixedX) + "px";
	            crossobj.top = ((pop_fixedY == -1) ? ctl.offsetTop + toppos + ctl.offsetHeight + 2 : pop_fixedY) + "px";
	            constructCalendar (1, monthSelected, yearSelected);
	            crossobj.visibility = (dom||ie) ? "visible" : "show";

	            hideElement('SELECT', document.getElementById('calendar'));
	            hideElement('APPLET', document.getElementById('calendar'));

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

	document.onkeypress = function hidecal1 (event) {
		var keyPressed;
		try {
			if (event.keyCode) {
				keyPressed = event.keyCode;
			} else {
				keyPressed = event.which;
			}
		} catch (ex) {
			keyPressed = window.event.keyCode;
		}

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

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