     
//	written	by Tan Ling	Wee	on 2 Dec 2001
//	last updated 23 June 2002
//	email :	fuushikaden@yahoo.com

// Ultimas modificaciones, posibilidades de personalizacion y multilenguaje: 10 marzo / 9 agosto del 2005 por Jmm
	
	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 = "/img"/;	// directory for images ... e.g. var imgDir="/img/"
	var marcarfestivos = 1	//mostrar dias festivos en otro color.


/* estilos del pie del calendario, donde te muestra el dia actual (tr) */
var estiloscalendarfondopie = "background-color:#f0f0f0;";
/* pie del calendario, celda (td) */
var estiloscalendarfondopiecelda = "padding:5px;text-align:center";
/* Estilos de la tabla principal (table) */
var estiloscalendartabla = "font-family:arial; font-size:11px; border-width:1px; border-style:solid; border-color:#a0a0a0; font-family:arial; font-size:11px; background-color:#ffffff;";
/* Estilos de la primera fila, cabecera (tr) */
var estiloscalendartrsup = "background-color:#cccccc;";
/* Estilos del texto en la cabecera (td) *///border-top:4px !important;border-bottom:4px !important;
var estiloscalendartextosup = "padding:2px;font-family:arial;font-size:11px;color:#ffffff";
/* Estilos del contenido principal (td) */
var estiloscalendarfondocalendar = "padding:5px;background-color:#ffffff";
/* Estilos y colores del desplegable de años (table) */
var estiloscalendarfondotablaanyos = "font-family:arial; font-size:11px; border-width:1px; border-style:solid; border-color:#a0a0a0;background-color:#FFFFDD;";
/* Color de fondo del año sobre el que te posicionas en el desplegable (td) */
var calendarcolordefondoanyosover = "#FFCC99";
/* Usamos los mismos datos para los meses que ya hemos usado para los años */
var estiloscalendarfondotablameses = estiloscalendarfondotablaanyos;
var calendarcolordefondomesesover = calendarcolordefondoanyosover;
/* Estilo de la flecha izquierda, para restroceder un mes (span) */
var estiloscalendarflechaizq = "border-style:solid;border-width:1px;border-color:#88AAFF;padding:1px;";
/* Color de fondo cuando nos posicionamos encima de la misma flecha izquierda (span) */
var calendarcolorbordeizqover = "#3366FF";
/* Color de fondo cuando nos retiramos de encima de la flecha izquierda (span) */
var calendarcolorbordeizqout = "#88AAFF";
/* Para el resto de controles (flecha derecha y selectores de mes y año.) puedo usar los mismos colores y estilos */
var estiloscalendarflechader = estiloscalendarflechaizq;
var calendarcolorbordederover = calendarcolorbordeizqover;
var calendarcolorbordederout = calendarcolorbordeizqout;
var estiloscalendarmessel = estiloscalendarflechaizq;
var calendarcolorbordemesselover = calendarcolorbordeizqover;
var calendarcolorbordemesselout = calendarcolorbordeizqout;
var estiloscalendaranyosel = estiloscalendarflechaizq;
var calendarcolorbordeanyoselover = calendarcolorbordeizqover;
var calendarcolorbordeanyoselout = calendarcolorbordeizqout;
/* Separador entre semanas y dias */
var estiloscalendarseparador= "padding:0px;background-color:#d0d0d0;width:1px;";
/* Estilos para los dias festivos */
var estiloscalendarcolorfestivos = "background-color:#FFDDDD;";
/* Estilos para los domingos */
var estiloscalendarcolordomingos = "color:#909090;";
/* Estilos para todos los dias */
var estiloscalendarcolor = "font-family:verdana;font-size:10px;";
/* Estilos para el dia actual */
var estiloscalendarcolorhoy = "color:#ff0000;font-weight:bold;";
/* estilos para los dias de la semana */
var estiloscalendarsemanas = "";
/* estilos para el dia seleccionado */
var styleLightBorder="border-style:solid;border-width:1px;border-color:#a0a0a0;"
/* estilos para todos los "enlaces" -o sea, donde se puede pinchar- */
var styleAnchor="text-decoration:none;color:black;"
/* Dias Festivos, separadas cada una de las festividades por ';' y los valores de las mismas por ',' el primer valor es el dia, el segundo el mes y el tercero es la descripcion de la festividad. */
var diasfestivos = "1,1,Año nuevo;7,3,Vendimia (Mendoza, Argentina);8,3,Vendimia (Mendoza, Argentina);9,3,Vendimia (Mendoza, Argentina);10,3,Vendimia (Mendoza, Argentina);20,3,Jueves Santo;21,3,Viernes Santo;22,3,Semana Santa;23,3,Semana Santa;24,3,Día nacional de la Memoria por la Verdad y la Justicia (Argentina);2,4,Dia del Veterano y de los Caidos en Malvinas (Argentina);1,5,Dia del Trabajador;21,5,Glorias Navales (Chile);25,5,Primer Gobierno Patrio (Argentina);16,6,Gral Manuel Belgrano (Feriado Trasladable 20 de Junio);20,6,Gral Manuel Belgrano (Trasladado a 16 de Junio);9,7,Dia de la independencia (Argentina);16,7,Nuestra Señora del Carmen (Chile);15,8,Asunción de la Virgen (Chile);18,8,Gral San Martin (Argentina);18,9,Fiestas Patrias (Chile);19,9,Fiestas Patrias (Chile);12,10,Dia de la Raza (Argentina);1,11,Todos los Santos (Chile);8,12,Inmaculada Concepción de María;25,12,Navidad";

//////////////////////////////////////////////////////////////////////////////
var orientation=0	// 0-horizontal 1-vertical
var imgPath = imgDir
var mainItemForeground = "#000000"
var mainItemBorder = "#f0f0f0"
var mainItemBackground = "#f0f0f0"
var mainItemHoverForeground = "#000000"
var mainItemHoverBorder = "#a0a0a0"
var mainItemHoverBackground = "#d0d0d0"
var subItemForeground = "#000000"
var subItemBorder = "#ffffff"
var subItemBackground = "#ffffff"
var subItemHoverForeground = "#000000"
var subItemHoverBorder = "#a0a0a0"
var subItemHoverBackground = "#d0d0d0"
var menuFont = "arial"
var menuSize = "11px"



/*
drop1: 12*10 //flecha hacia abajo
drop2: 12*10 //flecha hacia abajo, iluminada
left1: 10*11 //flecha hacia la izquierda
left2: 10*11 //flecha hacia la izquierda, iluminada
right1: 10*11 //flecha hacia la derecha
right2: 10*11 //flecha hacia la derecha, iluminada
close.gif: 15*13 //boton de cerrar
*/
var imgsrc = new Array("drop1.gif","drop2.gif","left1.gif","left2.gif","right1.gif","right2.gif")
var img	= new Array()
var bShow = false;
var restadeanyos = 0;
	var sumadeanyos = 1;
	var deslizadoranyos = 0; // 0 off, 1 on



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



/* Declaracion de variables generales */
	var crossobj, crossMonthObj, crossYearObj, monthSelected, yearSelected, dateSelected, omonthSelected, oyearSelected, odateSelected, monthConstructed, yearConstructed, intervalID1, intervalID2, timeoutID1, timeoutID2, ctlToPlaceValueanyo,ctlToPlaceValuemes,ctlToPlaceValuedia, ctlNow, dateFormat, nStartingYear
/* Variables de Idiomas */
	var gotoString, todayString, weekString, scrollLeftMessage, scrollRightMessage, selectMonthMessage, selectYearMessage, selectDateMessage, monthName, monthName2, dayName, mensajecierre



function remarcarfestivos()
	{
	var fechasfestivas = diasfestivos.split(";"); 
	
	for (i=0 ; i < fechasfestivas.length ; i++)
		{
		fragmentos = fechasfestivas[i].split(",")
		for (j = (yearNow - restadeanyos) ; j <= (yearNow + sumadeanyos) ; j++)
			{
			
			addHoliday (fragmentos[0],fragmentos[1], j ,fragmentos[2]);
			}
		}
	 
	}


    /* 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";
          }
        }
      }
    }
     
	function seleccionidioma()
	{
	if (idiomausado == "1")
		{
			gotoString = "Ir al Mes Siguiente"
			todayString = "Hoy es"
			weekString = "Sem."
			scrollLeftMessage = "Click para avanzar al siguiente mes. Manten apretado el boton del raton para avanzar automaticamente."
			scrollRightMessage = "Click para avanzar al anterior mes. Manten apretado el boton del raton para retroceder automaticamente."
			selectMonthMessage = "Click para seleccionar mes."
			selectYearMessage = "Click para seleccionar año."
			selectDateMessage = "Seleccionar la fecha: [date]" // do not replace [date], it will be replaced by date.
			monthName =	new	Array("Ene","Feb","Mar","Abr","May","Jun","Jul","Ago","Sep","Oct","Nov","Dic")
			monthName2 = new Array("ENE","FEB","MAR","ABR","MAY","JUN","JUL","AGO","SEP","OCT","NOV","DIC")
			if (startAt==0)
				{
					dayName = new Array	("Dom","Lun","Mar","Mie","Jue","Vie","Sab")
				}
			else
				{
					dayName = new Array	("Lun","Mar","Mie","Jue","Vie","Sab","Dom")
				}
	}else if (idiomausado == "3"){
			gotoString = "Passer au Mois Suivant"
			todayString = "Date d´aujourd´hui"
			weekString = "Sem."
			scrollLeftMessage = "Clicker pour passer au mois suivant. Click maintenu sur le bouton de la souris pour passer automatiquement au mois suivant."
			scrollRightMessage = "Clicker pour passer au mois antérieur. Click maintenu sur le bouton de la souris pour passer automatiquement au mois antérieu."
			selectMonthMessage = "Clicker pour séleccionner le mois."
			selectYearMessage = "Clicker pour séleccionner l´année."
			selectDateMessage = "Séleccionner la date: [date]" // do not replace [date], it will be replaced by date.
			monthName = new Array ("janvier", "février", "mars", "avril", "mai", "juin", "juillet", "août", "septembre", "octobre", "novembre", "décembre")
			monthName2 = new Array ("JANVIER", "FÉVRIER", "MARS", "AVRIL", "MAI", "JUIN", "JUILLET", "AOÛT", "SEPTEMBRE", "OCTOBRE", "NOVEMBRE", "DÉCEMBRE")
			if (startAt==0)
				{
					dayName = new Array	("Dim","Lun","Mar","Mer","Jeu","Ven","Sam")
				}
				else
				{
					dayName = new Array	("Lun","Mar","Mer","Jeu","Ven","Sam","Dim")
				}
	}else{
			gotoString = "Go To Current Month"
			todayString = "Today is"
			weekString = "Wk"
			scrollLeftMessage = "Click to scroll to previous month. Hold mouse button to scroll automatically."
			scrollRightMessage = "Click to scroll to next month. Hold mouse button to scroll automatically."
			selectMonthMessage = "Click to select a month."
			selectYearMessage = "Click to select a year."
			selectDateMessage = "Select [date] as date." // do not replace [date], it will be replaced by date.
			monthName =	new	Array("January","February","March","April","May","June","July","August","September","October","November","December");
			monthName2 = new Array("JANUARY","FEBRUARY","MARCH","APRIL","MAY","JUNE","JULY","AUGUST","SEPTEMBER","OCTOBER","NOVEMBER","DECEMBER");
			if (startAt==0)
				{
					dayName = new Array	("Sun","Mon","Tue","Wed","Thu","Fri","Sat")
				}
				else
				{
					dayName = new Array	("Mon","Tue","Wed","Thu","Fri","Sat","Sun")
				}
		}
	}
    /*
    * 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]
		} 
			
	if (idiomausado == "1")
		{
			mensajecierre = "Cerrar el calendario"
		}
		else if (idiomausado == "3")
		{
			mensajecierre = "Fermer le calendrier"
		}
		else
		{
			mensajecierre = "Close the calendar"
		}
	
		document.write ("<div onclick='bShow=true' id='calendar' style='z-index:+999;position:absolute;visibility:hidden;'><table id='calendartablep' width="+((showWeekNumber==1)?250:220)+" style='" + estiloscalendartabla + "'><tr style='" + estiloscalendartrsup + "'><td><table width='"+((showWeekNumber==1)?248:218)+"'><tr><td style='" + estiloscalendartextosup + "'><b><span id='caption'></span></b></td><td style='text-align:right'><a href='javascript:hideCalendar()'><img src='"+imgDir+"close.gif' style='width:15px;height:13px;border:0px;' alt='"+ mensajecierre +"' title='"+ mensajecierre +"' /></a></td></tr></table></td></tr><tr><td style='" + estiloscalendarfondocalendar + "'><span id='content'></span></td></tr>")

		if (showToday==1)
		{
			document.write ("<tr style='" + estiloscalendarfondopie + "'><td style='" + estiloscalendarfondopiecelda + "' 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>");
	}


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

	function init()	{
	
	seleccionidioma ();
		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)
			{
				//Para el opera, que sino se lo salta (identificado por defecto como ie).
					if (yearNow < 1000){
					yearNow=(yearNow+1900)
					}

				document.getElementById("lblToday").innerHTML =	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>"
			}

			sHTML1="<span id='spanLeft'	style='" + estiloscalendarflechaizq + "; cursor: hand' onmouseover='swapImage(\"changeLeft\",\"left2.gif\");this.style.borderColor=\"" + calendarcolorbordeizqover + "\";window.status=\""+scrollLeftMessage+"\"' onclick='javascript:decMonth()' onmouseout='clearInterval(intervalID1);swapImage(\"changeLeft\",\"left1.gif\");this.style.borderColor=\"" + calendarcolorbordeizqout + "\";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='" + estiloscalendarflechader + " cursor: hand'	onmouseover='swapImage(\"changeRight\",\"right2.gif\");this.style.borderColor=\"" + calendarcolorbordederover + "\";window.status=\""+scrollRightMessage+"\"' onmouseout='clearInterval(intervalID1);swapImage(\"changeRight\",\"right1.gif\");this.style.borderColor=\"" + calendarcolorbordederout + "\";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='" + estiloscalendarmessel + " cursor: hand'	onmouseover='swapImage(\"changeMonth\",\"drop2.gif\");this.style.borderColor=\"" + calendarcolorbordemesselover + "\";window.status=\""+selectMonthMessage+"\"' onmouseout='swapImage(\"changeMonth\",\"drop1.gif\");this.style.borderColor=\"" + calendarcolorbordemesselout + "\";window.status=\"\"' onclick='popUpMonth()'></span>&nbsp;"
			
			sHTML1+="<span id='spanYear' style='" + estiloscalendaranyosel + " cursor: hand' onmouseover='swapImage(\"changeYear\",\"drop2.gif\");this.style.borderColor=\"" + calendarcolorbordeanyoselover + "\";window.status=\""+selectYearMessage+"\"'	onmouseout='swapImage(\"changeYear\",\"drop1.gif\");this.style.borderColor=\"" + calendarcolorbordeanyoselout + "\";window.status=\"\"'	onclick='popUpYear()'></span>&nbsp;"
			
			document.getElementById("caption").innerHTML  =	sHTML1

			bPageLoaded=true

			if (marcarfestivos==1)
				{
				remarcarfestivos();
				}
		}
	}

	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	("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() {
		var	sTmp

		hideCalendar();
		
			if (yearSelected < 1000){
			yearSelected=(yearSelected+1900)
			}


		// Cambio de la forma de devolver los datos.
		
		var fechacompleta =	constructDate(dateSelected,monthSelected,yearSelected)

		var fechas = new Array()		
		
		fechas = fechacompleta.split(" - "); 
		
		var i = 0;
		while( i < ctlToPlaceValueanyo.length)
			{
			if (ctlToPlaceValueanyo.options[i].text == fechas[0])
				{
				ctlToPlaceValueanyo.options[i].selected=true;
				break;
				}
			i++
			}
 		var i = 0;
 		while( i < ctlToPlaceValuemes.length)
			{
			if (ctlToPlaceValuemes.options[i].text == fechas[1])
				{
				ctlToPlaceValuemes.options[i].selected=true;
				break;
				}
			i++
			}
 		var i = 0;
 		while( i < ctlToPlaceValuedia.length)
			{
			if (ctlToPlaceValuedia.options[i].text == fechas[2])
				{
				ctlToPlaceValuedia.options[i].selected=true;
				if (ctlToPlaceValuedia.onchange != null) {
				   ctlToPlaceValuedia.onchange();
				}
				break;
				}
			i++
			}
	}

	/*** Month Pulldown	***/

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

	function StartIncMonth()
	{
		intervalID1=setInterval("incMonth()",80)
	}
//restadeanyos sumadeanyos
	function incMonth () {
		monthSelected++
		if (monthSelected>11) {
			monthSelected=0
			yearSelected++
			if (yearSelected > yearNow + sumadeanyos)
				{
				yearSelected = yearNow - restadeanyos;
				}
		}
		constructCalendar()
	}

	function decMonth () {
		monthSelected--
		if (monthSelected<0) {
			monthSelected=11
			yearSelected--
			if (yearSelected < yearNow - restadeanyos)
				{
				yearSelected = yearNow + sumadeanyos;
				}
		}
		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 style='cursor: hand' id='m" + i + "' onmouseover='this.style.backgroundColor=\"" + calendarcolordefondomesesover + "\"' onmouseout='this.style.backgroundColor=\"\"' class='puntero' onclick='monthConstructed=false;monthSelected=" + i + ";constructCalendar();popDownMonth();event.cancelBubble=true'>&nbsp;" + sName + "&nbsp;</td></tr>"
			}

			document.getElementById("selectMonth").innerHTML = "<table width=70	style='" + estiloscalendarfondotablameses + "' 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";
		izq = parseInt(crossobj.left) + 50;
		supe =	parseInt(crossobj.top) + 26;
		izq = izq + "px";
		supe = supe + "px";
		crossMonthObj.left=izq;
		crossMonthObj.top=supe;

		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) {
		if (deslizadoranyos == 1)
		{
			sHTML =	"<tr><td align='center'	onmouseover='this.style.backgroundColor=\"#FFCC99\"' onmouseout='clearInterval(intervalID1);this.style.backgroundColor=\"\"' class='puntero'	onmousedown='clearInterval(intervalID1);intervalID1=setInterval(\"decYear()\",30)' onmouseup='clearInterval(intervalID1)'>-</td></tr>"
		}
			j = 0
			nStartingYear=yearNow - restadeanyos;
			for	(i=nStartingYear; i<=(yearNow + sumadeanyos); i++) {
				sName =	i;
				if (i==yearSelected){
					sName =	"<b>" +	sName +	"</b>"
				}
				sHTML += "<tr><td style='cursor: hand' id='y" + j + "' onmouseover='this.style.backgroundColor=\"" + calendarcolordefondoanyosover + "\"' onmouseout='this.style.backgroundColor=\"\"' class='puntero' onclick='selectYear("+j+");event.cancelBubble=true'>&nbsp;" + sName + "&nbsp;</td></tr>"
				j ++;
			}
		if (deslizadoranyos == 1)
		{
			sHTML += "<tr><td align='center' onmouseover='this.style.backgroundColor=\"#FFCC99\"' onmouseout='clearInterval(intervalID2);this.style.backgroundColor=\"\"' class='puntero' onmousedown='clearInterval(intervalID2);intervalID2=setInterval(\"incYear()\",30)'	onmouseup='clearInterval(intervalID2)'>+</td></tr>"
		}

			document.getElementById("selectYear").innerHTML	= "<table width='44' style='" + estiloscalendarfondotablaanyos + "' 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
		}
		
		leftOffset += "px";

		supe =	parseInt(crossobj.top) + 26;
		supe = supe + "px";

		crossYearObj.left =	leftOffset;
		crossYearObj.top = supe;
	}

	/*** calendar ***/
   function WeekNbr(n) {
      // Algorithm used:
      // From Klaus Tondering's Calendar document (The Authority/Guru)
      // hhtp://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='" + estiloscalendarcolor + "'><tr>"

		if (showWeekNumber==1)
		{
			sHTML += "<td width='27'><b>" + weekString + "</b></td><td rowspan='7' style='" + estiloscalendarseparador + "'><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' style='" + estiloscalendarsemanas + "'>" + 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+=estiloscalendarcolorfestivos
						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=\"\"' "

			if ((datePointer==dateNow)&&(monthSelected==monthNow)&&(yearSelected==yearNow))
			{ sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+ sStyle + estiloscalendarcolorhoy + "' href='javascript:dateSelected="+datePointer+";closeCalendar();'>&nbsp;" + datePointer + "&nbsp;</a>"}
			else if	(dayPointer % 7 == (startAt * -1)+1)
			{ sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+ sStyle + estiloscalendarcolordomingos + "' href='javascript:dateSelected="+datePointer+";closeCalendar();'>&nbsp;" + datePointer + "&nbsp;</a>" }
			else
			{ sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' 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' style='" + estiloscalendarsemanas + "'>" + (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, ctl3, ctl4) {
		var	leftpos=-220
		var	toppos=0

		if (bPageLoaded)
		{
			if ( crossobj.visibility ==	"hidden" ) {
				ctlToPlaceValueanyo	= ctl2 ;
				ctlToPlaceValuemes	= ctl3 ;
				ctlToPlaceValuedia	= ctl4 ;

				dateFormat="yyyy - mmm - d";
				
				
				yearSelected = parseInt(ctlToPlaceValueanyo.options[ctlToPlaceValueanyo.selectedIndex].text, 10);
				for	(j=0; j<12; j++)
				{
					if (ctlToPlaceValuemes.options[ctlToPlaceValuemes.selectedIndex].text == monthName[j])
					{
						monthSelected=j;
					}
				}
				dateSelected = parseInt(ctlToPlaceValuedia.options[ctlToPlaceValuedia.selectedIndex].text, 10);
					//alert (dateSelected + " - " + monthSelected + " - " + yearSelected)
				
				if (isNaN(dateSelected)||isNaN(monthSelected)||isNaN(yearSelected))
				{
					dateSelected = dateNow
					monthSelected = monthNow
					yearSelected = yearNow
				}



// Solo si el navegador soporta getAttribute y getelementsbytagname. Sirve para poner en fecha el segundo calendario respecto al primero si el mismo esta como el mes actual y el primero esta adelantado.

if (monthSelected == monthNow && yearSelected == yearNow && document.getElementsByTagName && ctlToPlaceValueanyo.getAttribute)
{
	var sdodir;
	var primcal = 0;
	var aconimgs = document.getElementsByTagName("a"); //tomamos todos los enlaces, para buscar los que nos interesan
	for (i=0 ; i < aconimgs.length ; i++)
	{
		imgsena = aconimgs[i].getElementsByTagName("img"); //solo tomamos en cuenta los enlaces que tienen imagenes en su interior.
		for (j=0 ; j < imgsena.length ; j++)
		{
	sdodir = String(document.location);
	sdodirpos = sdodir.lastIndexOf("/");
	sdodir = sdodir.substring(0, (sdodirpos+1));
	sdodir = sdodir + "images/calendario.gif" // el explorer no toma el dato exacto (como si se hace en los motores gecko), de alli que tengamos que obtener la ruta completa.
			if ((imgsena[j].getAttribute('src') == "images/calendario.gif" || imgsena[j].getAttribute('src') == sdodir )&& primcal == 0) //si la imagen del enlace es la que buscamos (la del calendario) y es la primera vez que entra (por tanto solo miraremos el primero de los enlaces de calendario, que es el que nos interesa)
			{
				var primcal = String(aconimgs[i].getAttribute('onclick'));
				primcal = primcal.replace("anonymous(","");  //el explorer y sus paranoias, intoduce eso al principio de la funcion, y por tanto, si intentamos continuar, no toma los datos correctos, por eso lo eliminamos de la cadena
				primcal = primcal.split("(");
				primcal = primcal[1].split(")");
				primcal = primcal[0].split(", ");
				primcal[1] = eval(primcal[1]);
				primcal[2] = eval(primcal[2]);
				primcal[3] = eval(primcal[3]);
				if (ctlToPlaceValueanyo != primcal[1] && ctlToPlaceValuemes != primcal[2] && ctlToPlaceValuedia != primcal[3]) //tan solo si hemos pulsado el segundo de los botones de calendario, no el primero.
				{
					//tomar los datos del primero de los calendarios.
					dateSelected = ( parseInt(primcal[3].options[primcal[3].selectedIndex].text, 10) + 1 );
					yearSelected = parseInt(primcal[1].options[primcal[1].selectedIndex].text, 10);
					for	(k=0; k<12; k++)
					{
					if (primcal[2].options[primcal[2].selectedIndex].text == monthName[k])
						{
							monthSelected=k;
						}
					}

				}

			}
		}
	}
}




				odateSelected=dateSelected
				omonthSelected=monthSelected
				oyearSelected=yearSelected

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

				var izq = fixedX==-1 ? ctl.offsetLeft + leftpos : fixedX
				var supe = fixedY==-1 ? ctl.offsetTop + toppos + ctl.offsetHeight + 2 : fixedY

				izq = izq + "px";
				supe = supe + "px";
				
				crossobj.left = izq;
				crossobj.top = supe;

				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, ctl3, ctl4)}
			}
			ctlNow = ctl
		}
	}

	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
	}














//	written	by Tan Ling Wee
//	last updated 20 June 2003
//	email :	fuushikaden@yahoo.com

//////////////////////////////////////////////////////////////////////////////////
// Layers 
//////////////////////////////////////////////////////////////////////////////////

var layerQueue=new Array()
var layerIndex=-1

/* hides <select> and <applet> objects (for IE only) */
function hideElement( elmID, overDiv )
{
  if( ie )
  {
	for( i = 0; i < document.getElementsByTagName( elmID ).length; i++ )
	{
	  obj = document.getElementsByTagName( 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.getElementsByTagName( elmID ).length; i++ )
	{
	  obj = document.getElementsByTagName( elmID )[i];
	  
	  if( !obj || !obj.offsetParent )
	  {
		continue;
	  }
	
	  obj.style.visibility = "";
	}
  }
}

function lw_createLayer (layerName, top_pos, left_pos, width, height, bgcolor, bordercolor, z_index) {
	document.write("<div onclick='event.cancelBubble=true' id='"+layerName+"' style='z-index:" + z_index + ";position:absolute;top:"+top_pos+";left:"+left_pos+";visibility:hidden;'><table bgcolor='"+bgcolor+"' style='border-width:1px;border-style:solid;border-color:" + bordercolor + "' cellpadding='2' cellspacing='0' width='0'><tr><td valign='top' width='"+width+"' height='"+height+"'><span id='"+layerName+"_content'></span></td></tr></table></div>")
}

function lw_getObj (objName) {
	return (dom)?document.getElementById(objName).style:ie?eval("document.all."+objName) :eval("document."+objName)
}

function lw_showLayer (layerName) {

	found=false
	for (i=0;i<=layerIndex;i++)
	{
		if (layerQueue[i]==layerName)
		{
			found=true
		}
	}

	if ((lw_getObj(layerName).visibility!="visible")&&(lw_getObj(layerName).visibility!="show"))
	{
		lw_getObj(layerName).visibility = (dom||ie)?"visible":"show"
		layerQueue[++layerIndex] = layerName

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

function lw_hideLayer () {
	showElement( 'SELECT', document.getElementById(layerQueue[layerIndex]) );
	showElement( 'APPLET', document.getElementById(layerQueue[layerIndex]) );

	lw_getObj(layerQueue[layerIndex--]).visibility = "hidden"
}

function lw_hideLayerName (layerName) {
	var i
	var tmpQueue=new Array()
	var newIndex=-1

	showElement( 'SELECT', document.getElementById(layerName) );
	showElement( 'APPLET', document.getElementById(layerName) );

	lw_getObj(layerName).visibility = "hidden"

	for (i=0;i<=layerIndex;i++)
	{
		if ((layerQueue[i]!="")&&(layerQueue[i]!=layerName))
		{
			tmpQueue [++newIndex] = layerQueue[i]			
			hideElement( 'SELECT', document.getElementById(layerQueue[i]) );
			hideElement( 'APPLET', document.getElementById(layerQueue[i]) );
		}
		
	}

	layerQueue = tmpQueue
	layerIndex = newIndex
}

function lw_closeAllLayers() {
	while (layerIndex >= 0)
	{
		lw_hideLayer()
	}
}

function lw_closeLastLayer() {
	if (layerIndex >= 0)
	{
		while ((lw_getObj(layerQueue[layerIndex]).visibility!="visible") && (layerIndex>0))
		{
			layerIndex--;
		}
		lw_hideLayer()
	}
}

function lw_escLayer (e) {
	if (navigator.appName=="Netscape")
	{
		var keyCode = e.keyCode?e.keyCode:e.which?e.which:e.charCode;
		if ((keyCode==27)||(keyCode==1))
		{
			lw_closeLastLayer()
		}
	}
	else
	if ((event.keyCode==0)||(event.keyCode==27))
	{
		lw_closeLastLayer()		
	}
}


var lw_leftpos = 0
var lw_toppos = 0
var lw_width = 0
var lw_height = 0

function lw_calcpos(obj) {
	lw_leftpos=0
	lw_toppos=0
	lw_width = obj.offsetWidth
	lw_height = obj.offsetHeight

	var aTag = obj
	do {
		lw_leftpos += aTag.offsetLeft;
		lw_toppos += aTag.offsetTop;
		aTag = aTag.offsetParent;
	} while(aTag.tagName!="BODY");
}

document.onkeypress = lw_escLayer;
document.onclick = lw_closeAllLayers;













//	written	by Tan Ling Wee
//	last updated 20 June 2003
//	email :	fuushikaden@yahoo.com

/////////////////////////////////////////////////////////////////////////////

var	ie=(navigator.appName=='Microsoft Internet Explorer')
var	ns=(navigator.appName=='Netscape')
var	dom=document.getElementById
var lw_menuId, lw_trigger, to1
var s1

/////////////////////////////////////////////////////////////////////////////

function Tmenu (id, parentId, url, description, img) {
	this.id = id
	this.parentId = parentId
	this.url = url
	this.description = description
	this.numChild = 0
	this.levelId = 0
	this.img = img
}

/////////////////////////////////////////////////////////////////////////////

var menu = new Array()
var menuCounter = 0
var numLevel = 0
var prevMenuId = -1
var nNowAt = 0

/////////////////////////////////////////////////////////////////////////////

function displayMenuItem(menuId) {
	var sHTML
	
	if (menu[menuId].parentId>0)
	{
		ItemForeground = subItemForeground 
		Border = subItemBorder 
		Background = subItemBackground 

		HoverForeground = subItemHoverForeground 
		HoverBorder = subItemHoverBorder 
		HoverBackground = subItemHoverBackground 
	}
	else
	{
		ItemForeground = mainItemForeground 
		Border = mainItemBorder 
		Background = mainItemBackground 

		HoverForeground = mainItemHoverForeground 
		HoverBorder = mainItemHoverBorder 
		HoverBackground = mainItemHoverBackground 
	}

	if ((orientation==1)||(menu[menuId].levelId>0))
	{
		sHTML += "<tr>"
	}	

	if (menu[menuId].description!='-')
	{
		sHTML = "<td id='menu_"+menuId+"' class='puntero' style='border-style:solid;border-width:1px;background-color:"+ Background +";color=\""+ ItemForeground +"\";border-color:"+ Border +"' onmouseover='clearInterval(s1);this.style.backgroundColor=\"" + HoverBackground + "\";this.style.color=\"" + HoverForeground + "\";this.style.borderColor=\"" + HoverBorder + "\";"

		if (menu[menuId].numChild!=0) {
			sHTML += "showSubmenu("+menu[menuId].id+",this);hideSubmenu(menu["+menuId+"].levelId+1);"
		}
		else
		{
			sHTML += "prevMenuId = "+menuId+";hideSubmenu(menu["+menuId+"].levelId);"
		}

		sHTML += ";nNowAt="+menuId+";clearAll("+menu[menuId].levelId+","+menu[menuId].parentId+")' onclick='document.location.href=\""+menu[menuId].url+"\"' onmouseout='s1=setInterval(\"resetMenu();hideSubmenu(0)\",1000);'><table cellpadding='0' cellspacing='0' border='0' width='100%'><tr>"

		if (menu[menuId].levelId>0)
		{
			sHTML += "<td style='padding-left:3px' width='20'><img src='"
			if (menu[menuId].img=="")
			{
				sHTML += imgPath + "trans.gif"
			}
			else
			{
				sHTML += imgPath + menu[menuId].img
			}
			sHTML += "' width='16' height='16' border='0' /></td>"
		}

		if ((orientation==0) && (menu[menuId].levelId==0))
		{
			nArrowWidth = 0
		}
		else
		{
			nArrowWidth = 25
		}

		sHTML += "<td style='padding-left:5px;padding-right:5px' align='left'>" + menu[menuId].description.replace(" ","&nbsp;") + "</td><td style='padding-right:2px' align='right' width='"+nArrowWidth+"'>"
		if (menu[menuId].numChild>0)
		{
			if ((orientation==0)&&(menu[menuId].levelId==0))
			{
				sHTML += "<img src='" + imgPath + "arrow_down.gif' />"
			}
			else
			{
				sHTML += "<img src='" + imgPath + "arrow_right.gif' />"
			}
		}
		else
		{
			sHTML += "&nbsp;"
		}
		sHTML += "</td></tr></table></td>"
	}
	else
	{
		sHTML = "<td><img src='" + imgPath + "trans.gif' height=2 /></td></tr><tr><td onmouseover='' bgcolor='#d0d0d0'><img src='" + imgPath + "trans.gif' height=1 /></td></tr><tr><td><img src='" + imgPath + "trans.gif' height=2 /></td>"
	}

	if ((orientation==1)||(menu[menuId].levelId>0))
	{
		sHTML += "</tr>"
	}	
	return sHTML
}

function clearAll(levelId, parentId) {

	if (levelId>0)
	{
		Border = subItemBorder 
		Background = subItemBackground 
	}
	else
	{
		Border = mainItemBorder 
		Background = mainItemBackground 
	}

	for (i=0;i<menuCounter;i++)
	{
		if (menu[i].levelId==levelId)
		{
			if ((i!=nNowAt) && (menu[i].parentId==parentId) && (menu[i].description!="-")) {
				lw_getObj("menu_"+i).backgroundColor=Background;
				lw_getObj("menu_"+i).borderColor=Border
			}
		}
	}

}

function mapID (id) {
	for (var i=0;i<menuCounter;i++)
	{
		if (menu[i].id==id)
		{
			return i
		}
	}
	return -1
}

function showSubmenu(menuId,trigger) {
	lw_menuId = menuId
	lw_trigger = trigger

	if (ns)
	{
		to1 = setTimeout("showActualSubmenu(lw_menuId,lw_trigger)",50)			
	}
	else
	{
		showActualSubmenu(lw_menuId,lw_trigger)
	}
}

function showActualSubmenu(menuId,trigger) {
	var nLevel = 0
	var leftpos = 0 
	var nIndex=0

	if (menuId>0)
	{
		lw_calcpos(trigger)

		for (var i=0;i<menuCounter;i++)
		{
			if (menu[i].id==menuId)
			{	
				nLevel = menu[i].levelId
				nIndex = i
			}
		}

		if ((orientation==1)||(menu[nIndex].parentId>0))
		{
			lw_getObj("menu_level_"+nLevel).top=lw_toppos
			leftpos = lw_leftpos + lw_width + 5

			if (nLevel==0) {
				leftpos -= 3
			}
		}
		else {
			lw_getObj("menu_level_"+nLevel).top = lw_toppos + lw_height + 2
			leftpos = lw_leftpos
		}

		lw_getObj("menu_level_"+nLevel).left=leftpos

		sHTML = "<table cellpadding=0 cellspacing=0 border=0>"
		for (var i=0;i<menuCounter;i++)
		{
			if (menu[i].parentId==menuId)
			{
				sHTML += displayMenuItem (i)
			}
		}
		sHTML += "</table>"

		document.getElementById("menu_level_"+nLevel+"_content").innerHTML=sHTML
		lw_showLayer('menu_level_'+nLevel)
	} 
}

function hideSubmenu(levelId) {
	for (var cnt=levelId; cnt<numLevel; cnt++)
	{
		lw_hideLayerName("menu_level_"+cnt)
	}
}

function DrawMenu ()  {

	for (var i=0; i<numLevel ; i++)
	{
		lw_createLayer("menu_level_"+i,0,0,0,0,"#ffffff","#d0d0d0",100)
	}
	
	sHTML="<table width=100% cellpadding=2 cellspacing=0>"
	for (var i=0; i<menuCounter; i++)
	{
		if (menu[i].parentId==0)
		{		
			sHTML += displayMenuItem (i)
		}
		else if (menu[i].parentId==-1)
		{		
			sHTML += "<tr><td><img src='" + imgPath + "trans.gif' height=2 /></td></tr><tr bgcolor='"+mainItemBackground+"'><td style='padding:5px'><b>" + menu[i].description + "</b></td></tr>"
		}
	}
	sHTML += "</table>"

	document.writeln(sHTML)

}

function getLevel (menuId) {
	var pId=menuId
	var nLevel=0

	while (pId!=0)
	{
		nLevel++
		for (var i=0;i<menuCounter;i++)
		{
			if (menu[i].id==pId)
			{	
				pId = menu[i].parentId
			}
		}
	}

	return nLevel
}

function AddMenuItem (id, parentId, url, description, img)  {

	menu[menuCounter++] = new Tmenu (id, parentId, url, description, img)

	if (parentId>0)
	{
		for (i=0;i<menuCounter;i++)
		{
			if (menu[i].id==parentId)
			{
				menu[i].numChild++
			}
		}
		menu[menuCounter-1].levelId = getLevel(parentId)

		if ( numLevel < menu[menuCounter-1].levelId)
		{	
			numLevel = menu[menuCounter-1].levelId
		}
	}	 
	else if (parentId==0)
	{
		menu[menuCounter-1].levelId = 0
	}
	else
	{
		menu[menuCounter-1].levelId = -1
	}
}

function handleonclick() {
	if (ns)
	{
		lw_closeAllLayers()
	}
	else
	{
		lw_closeAllLayers(event)
	}

	resetMenu()
}

function handlekeypress(e) {
	if (ns)
	{
		var keyCode = e.keyCode?e.keyCode:e.which?e.which:e.charCode;
		if ((keyCode==27)||(keyCode==1))
		{
			handleonclick()
		}
	}
	else
	if ((event.keyCode==0)||(event.keyCode==27))
	{
		handleonclick()
	}
	resetMenu()
}

function resetMenu () {
	for (i=0;i<menuCounter;i++)
	{
		if (menu[i].levelId==0)
		{
			lw_getObj("menu_"+i).backgroundColor=mainItemBackground
			lw_getObj("menu_"+i).borderColor=mainItemBorder
		}
	}
}

document.onkeypress = handlekeypress
document.onclick = handleonclick

