	/**************************************************************/
	/*                     pendiente:                             */
	/*        controlar la apertura hacia la izquierda            */
	/**************************************************************/
	//los datos para el menú
	document.write("<SCR" + "IPT LANGUAGE='JavaScript' SRC='js/arraysGrLar.js' TYPE='text/javascript'><\/SCR" + "IPT>");
	//imagenes para las flechas y sus rollOvers
	var imagenOver = new Image();
	imagenOver.src = "images/flechaBlanca.gif";
	var imgNorm = new Image();
	imgNorm.src = "images/flechaGris.gif";
	//variables para controlar los límites de la ventana
	var anchoVentana;
	var altoVentana;
	//variable para diferenciar el primer bloque (siempre visible) del menú.
	var inicio = 0;
	//variable para controlar el último objeto desplegado
	var objeto;
	//para controlar si los objetos están en otro frame
	var frame = false;
	//función (objeto script) para establecer los valores en el objeto "new menu",
	//valores de los que luegos e servirá la función menuBliock, para darle estilo al html que genera
	function menu(id, left, top)	{
		this.id = id;
		eval(this.id + "=this");
		if(inicio != 0) {
			this.rootmenu = this.id.substr(0, this.id.length-2);
			if(this.rootmenu == "pop") frame = false
			else frame = true;
			var valor = this.id.substr(this.id.length-2)
			var prnt = eval(this.rootmenu);
			this.capaId = prnt.capaId + valor;
			this.arrai = prnt.arrai + valor;
			left = prnt.css.left + prnt.css.width ;
			if(frame) {top = top}
			else {top = top-30}
		} else { init(this)}
		this.css = setCssVal(this, left, top);
		this.htm = menuBlock;
		setCss(this);
		this.htm();
		return
	}
	//funcion(método del objeto script) que genera todo el html
	function menuBlock()	{
		var obj = this.id;
		var prnt = this.capaId;
		var opciones = eval(this.arrai);
		if(inicio!=0)	var topDivElm = top.contenido.document.createElement("DIV");
		else var topDivElm = document.createElement("DIV");
		topDivElm.id = this.capaId;
		for(var i=0; i < opciones.length; i++)	{
			if(inicio!=0) var childDivElm = top.contenido.document.createElement("DIV");
			else var childDivElm = document.createElement("DIV");
			childDivElm.className = "item";
			childDivElm.id = this.id + "item" + i;
			childDivElm.innerHTML = opciones[i][0];
			if(opciones[i][1] == 1) {
				childDivElm.style.paddingRight = "20px";
				childDivElm.onmouseover = function()	{
					this.style.color = "#ffffff";
					this.style.backgroundColor = "#FF6600";
					if(eval(obj).rootmenu == null)	{
						eval(obj + "image" + this.id.substr(this.id.length - 1)).src = imagenOver.src;
						var subMenu = this.parentNode.id.substr(0, 3) + this.parentNode.id.substr(6) + "_" + this.id.substr(this.id.length - 1);
						showBlock(subMenu, eval(eval(prnt).offsetTop + this.offsetTop));
					} else {
						eval("top.contenido.document.all." + obj + "image" + this.id.substr(this.id.length - 1)).src = imagenOver.src;
						var subMenu = this.parentNode.id.substr(0, 3) + this.parentNode.id.substr(6) + "_" + this.id.substr(this.id.length - 1);
						showBlock(subMenu, eval("top.contenido.document.all." + prnt +".offsetTop") + this.offsetTop);
					}
				}
				childDivElm.onmouseout = function()	{
					if(eval(obj).rootmenu == null)	eval(obj + "image" + this.id.substr(this.id.length - 1)).src = imgNorm.src;
					else eval("top.contenido." + obj + "image" + this.id.substr(this.id.length - 1)).src = imgNorm.src;
					this.style.color = "";
					this.style.backgroundColor = "";
				}
				var flechaDiv = createFlecha(this, i);
				childDivElm.appendChild(flechaDiv);
			} else {
				childDivElm.href = opciones[i][1];
				childDivElm.onmouseover = function()	{
					this.style.color = "#ffffff";
					this.style.backgroundColor = "#FF6600";
					var obj = this.parentNode.id.substr(0, 3) + this.parentNode.id.substr(6);
					collapse(obj);
				}
				childDivElm.onmouseout = function()	{
					this.style.color = "";
					this.style.backgroundColor = "";
				}
				childDivElm.onclick = function()	{
					if(this.href == 0) return
					getPage(this.href)	
				}
			}
			if(i != 0){
				if(inicio!=0) var separator =  top.contenido.document.createElement("DIV");
				else var separator =  document.createElement("DIV");
				separator.className = "eSeparador";
				separator.innerHTML = "<img src='images/nada.gif' width='1px' height='1px'>";
				topDivElm.appendChild(separator);
			}
			topDivElm.appendChild(childDivElm);
		}
		if(inicio!=0) top.contenido.document.body.appendChild(topDivElm);
		else document.body.appendChild(topDivElm);
		//corrección en base all ancho y alto de la ventana
		if(topDivElm.clientHeight + this.css.top > altoVentana) eval(topDivElm).style.top = altoVentana - topDivElm.clientHeight;
		topDivElm.style.visibility = "visible";
	}
	function init(obj)	{
		top.contenido.document.body.onclick = function()	{collapse(pop.id)}
		top.herramientas.document.body.onclick = function()	{collapse(pop.id)}
		top.superior.document.body.onclick = function()	{collapse(pop.id)}
		top.bottom.document.body.onclick = function()	{collapse(pop.id)}
		anchoVentana = document.body.offsetWidth - 22;
		altoVentana = document.body.offsetHeight - 22;
		obj.capaId = obj.id + "Div";
		obj.arrai = "arr";
		obj.rootmenu = null;
		objeto = obj.id;
		hojaEstilo = document.createElement("STYLE");
		hojaEstilo.id = "estiloMenu";
		document.body.appendChild(hojaEstilo);	
		document.styleSheets["estiloMenu"].cssText += ".item {font-family:verdana; position:relative; background-color:white; font-size:7pt; text-align:right; cursor:hand; padding:12}\n";//border:solid 1px #000000;
		document.styleSheets["estiloMenu"].cssText += ".eSeparador {position:relative; height:1px; background-image:URL('images/separador.gif'); background-repeat:repeat-x; }\n";//border:solid 1px #000000;
		
		anchoVentana = top.contenido.document.body.offsetWidth - 22;
		altoVentana = top.contenido.document.body.offsetHeight - 22;
		obj.capaId = obj.id + "Div";
		obj.arrai = "arr";
		obj.rootmenu = null;
		objeto = obj.id;
		hojaEstilo = top.contenido.document.createElement("STYLE");
		hojaEstilo.id = "estiloMenu";
		top.contenido.document.body.appendChild(hojaEstilo);	
		top.contenido.document.styleSheets["estiloMenu"].cssText += ".item {font-family:verdana; position:relative; background-color:white; font-size:7pt; color:#666565; text-align:left; cursor:hand; padding:7}\n";//border:solid 1px #000000;
		top.contenido.document.styleSheets["estiloMenu"].cssText += ".eSeparador {position:relative; height:1px; background-image:URL('images/separador.gif'); background-repeat:repeat-x; background-color:red}\n";//border:solid 1px #000000;

	}
	function setCss(obj)	{
		if(inicio!=0) {
			if(obj.rootMenu == "pop")	top.contenido.document.styleSheets["estiloMenu"].cssText += "#" + obj.capaId + " {font-family:verdana; font-size:7pt; text-align:right;  position:absolute; border:none; font-weight:bold; visibility:hidden; left:"+ obj.css.left + "; top:" + obj.css.top + "; width:" + obj.css.width + "; z-index:" + obj.css.z + ";}\n";
			else 	top.contenido.document.styleSheets["estiloMenu"].cssText += "#" + obj.capaId + " {font-family:verdana; font-size:7pt; text-align:right;  position:absolute; border:2px solid #FF6600;  font-weight:bold; visibility:hidden; left:"+ obj.css.left + "; top:" + obj.css.top + "; width:" + obj.css.width + "; z-index:" + obj.css.z + ";}\n";
		} else document.styleSheets["estiloMenu"].cssText += "#" + obj.capaId + " {font-family:verdana; font-size:7pt; text-align:right;  position:absolute; border:none; font-weight:bold; visibility:hidden; left:" + obj.css.left + "; top:" + obj.css.top + "; width:" + obj.css.width + "; z-index:" + obj.css.z + ";}\n";
	}
	function setCssVal(obj, left, top) 	{
		var css = new Object();
		if(obj.rootmenu != null) {
			css.z = eval(obj.rootmenu).css.z + 10;
		} else {
			css.z = 10;
		}
		//alert(obj.rootmenu + " ::::::::::: " + left)
		if(frame || obj.rootmenu == null) {css.left = left;}
		else css.left = 0;
		css.top = top;
		css.width = setWidth(obj);
		return css;
	}
	function setWidth(obj)	{
		var cadena =""; 
		var valor;
		var boleana = false;
		if(inicio == 0) return valor = 150;			//para las primeras opciones del menú (mayúsculas)
		else valor = 6.5;						//para las siguientes opciones (minúsculas)
		for(var i=0; i<eval(obj.arrai).length; i++)	{
			if(cadena.length <= eval(obj.arrai)[i][0].length) { 
				cadena = eval(obj.arrai)[i][0];
				if(eval(obj.arrai)[i][1] == 1) boleana = true; else boleana = false
			}
		}
		valor *= cadena.length;
		//alert("cadena: " + cadena + " length: " + cadena.length + " valor: " + valor) 
		if(boleana) valor += 5;			//la opción tiene submenús y lleva una flecha
		if(valor > 200) valor = 200;
		return valor;
	}

	function showBlock(obj, top)	{
		if(obj == objeto) return;
		else {
			var bol = collapse(obj);
			if(bol) {      
				try { if(eval(obj))eval(obj).htm()} 
				catch(error) { var tmp = new menu(obj, null , top) }
			}
			objeto = obj;
		}
		return
	}
	function collapse(obj)	{
		if(obj == objeto) return;
		var subMenu;
		var rootObj;
		for(var i=objeto.length; i >= obj.length; i-=2)	{
			rootObj = eval(objeto).rootmenu;
			if(eval(objeto).capaId == "popDiv") return
			else  subMenu = eval("top.contenido." + eval(objeto).capaId);
			subMenu.style.visibility = "hidden";
			/*for(var k=subMenu.children.length - 1; k >= 0; k--)	{
				subMenu.children[k].innerHTML = "";
				subMenu.children[k].outerHTML = "";
				subMenu.children[k] = null;
			}*/
			subMenu.innerHTML = "";
			subMenu.outerHTML = "";
			subMenu = null;
			objeto = rootObj;
			if(rootObj == obj) {
				return false;
			}
		} return true
	}
	function createFlecha(obj, cont)	{
		if(inicio!=0)var object = top.contenido.document.createElement("DIV");
		else var object = document.createElement("DIV");
		object.id = obj.id + "flecha" + cont;
		object.style.left = obj.css.width - 20;
		object.style.top = "15px";
		object.style.width = "10px";
		object.style.paddingLeft= "5px";
		object.style.height = "5px";
		object.style.visibility = "inherit";
		object.style.position = "absolute";
		object.style.backgroundColor = "transparent";
		object.innerHTML = "<img id=\"" + obj.id + "image" + cont + "\" src=\"images/flechaGris.gif\" width=\"4px\" height=\"6px\">";
		return object;
	}

	function getPage(page)	{
		top.contenido.document.location = page;
		document.location = "lateral.htm";
	}	
	function generaMenu(left, top)	{
		var tmp = new menu("pop", left, top);
		delete tmp;
		inicio = 1;
	}
