/*
	AUTOR: Miguel Perez Lopez
	FECHA: 22/06/2007
	TITULO DOCUMENTO: web72.js
	TIPO DOCUMENTO: Archivo JScript
	DESCRIPCION DOCUMENTO: Archivo JScript que genera dinamicamente el cuerpo:
	(columna lateral y columna principal) de todas la paginas excepto la portada.
	MODIFICACIONES(Autor/fecha/descripcion): Ninguna
*/

/* ********************VARIABLES PROPIAS DEL WEB7.JS**********************/
/*************************************************************************/
var sWindBusq = "";

/*variable para asignar el ancho de la pantalla mediante cookies*/
var sAnchoPant = CojerCookie('cfgancho');
/*variable para asignar el % de ancho a la td principal*/
var sPorcentCue = "";
if (sAnchoPant == null || sAnchoPant == "778px" || sAnchoPant == "800px" || sAnchoPant == "800" || sAnchoPant == "60%")
{
	sAnchoPant = "778px";
	sPorcentCue = "77%";
}
else 
{
	sPorcentCue = "100%";
	//alert("arriba en el else donde el sAnchoPant vale: " + sAnchoPant + " y sPorcentCue vale: " + sPorcentCue);
}

/*variable usada para obtener la cadena NSF, es decir, la url de la base de 
datos NSF para las búsquedas personalizadas*/
var sCadenaNSF = "";

if (typeof(miservidor) == "undefined") miservidor = "";

/* identificador de Categoría */
var ID_CATEG = 99;// valor genérico

/* identificador de subcategoria */
var ID_SUBCATEG = 99;// valor genérico

/* identificador de categoría expandida,
valdrá 0 si sólo vemos en la columnalateral la categoria y solo la subcategoria expandida
o valdrá 1 (o no estará definido) si vemos todas las subcategorias aparte de la seleccionada*/
var ID_EXPAND = 1;

/* identificador de Subcategoria dentro de las subcategorias 
Se usa para poner en azul el item del menu vertical y para que aparezca
la seccion del "Estas en"*/
var ID_SSCATEG = 99;// valor genérico

/* variable boleana que indica si el archivo de la URL ha sido encontrado en el array de menu */
var bEncontrado = false;

/* variable del Web7.js tipo int para designar la categoría a mostrar
en la columna lateral (divCo1) cuando abrimos una página u otra dirección
que no esté en el array de categrías y subcategorías (WWARBOL).
posibles valores: 0:La Ciudad, 1:Ayuntamiento, 2:Legislacion, 3:Servicios, 4:Cultura, 5:Empleo y 6:BSocial*/
var iID_CATEG = 1;

/* variable usada en las funciones de Aumenta y disminuye */
var FUENTE_ACTUAL = 11;

/* variable tipo string para cuando no viene subcategoría */
var tSubCategAux = "";

// variable boleana que informará el "Estas en" o no, si bEstas es false no se informa.
var bEstas = true; 

// variable boleana que indica si el Lotus ha generado un <p> automaticamente
var bCreadoP = false;

// variable boleana que se usa en el firefox para cuando la columna ppal es mayor q la columna lateral
 var bColPpalMayor = true;
 
//identificador de navegador
var ID_NAV = new Array(2); 

// lanzamiento de la detecci&oacute;n de navegador
DetectaNavegador();

//clase para la linea naranja de los banner
var sClassLineNar = ""
if (ID_NAV[0] != "0") sClassLineNar = "lineaHorNaranjaSimple";// Firefox
else sClassLineNar = "lineaHorNaranjaSimpleSub";// IE

var sClassLineAzul = ""
if (ID_NAV[0] != "0") sClassLineAzul = "lineaHorAzulSimple";// Firefox
else sClassLineAzul = "lineaHorAzulSimpleSub";// IE
 
// array de banners de la columna lateral personalizado para cada categor&iacute;a: 
var WWBANNER = new Array(7);
//la ciudad
WWBANNER[0] = new Array();
WWBANNER[0][0] = "<label class='textoNaranjaTitulos'>Oficina Virtual</label><table width='92%' style='border-top:#db530a 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inicio.nsf/admele?openpage&windice=1,1'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/oficina_virtual.jpg' alt='oficina Virtual' title='Oficina Virtual' style='height: 100px; width:163px;' /></center></a><div class='lineaHorNaranjaSimple'></div><br><a href='"+miservidor+"/inet/hwgr.nsf/corta/FB4A?opendocument'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/sac_010.jpg' alt='Servicio de atenci&oacute;n al ciudadano'Â title='Servicio de atenci&oacute;n al ciudadano'/></center></a>";
//ayuntamiento
WWBANNER[1] = new Array();
WWBANNER[1][0] = "<label class='textoNaranjaTitulos'>Oficina Virtual</label><table width='92%' style='border-top:#db530a 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inicio.nsf/admele?openpage&windice=1,1'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/oficina_virtual.jpg' alt='oficina Virtual' title='Oficina Virtual' style='height: 100px; width:163px;' /></center></a><div class='lineaHorNaranjaSimple'></div><br><a href='"+miservidor+"/inet/hwgr.nsf/corta/FB4A?opendocument'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/sac_010.jpg' alt='Servicio de atenci&oacute;n al ciudadano'Â title='Servicio de atenci&oacute;n al ciudadano'/></center></a>";
//legislacion
WWBANNER[2] = new Array();
WWBANNER[2][0] = "<label class='textoNaranjaTitulos'>Oficina Virtual</label><table width='92%' style='border-top:#db530a 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inicio.nsf/admele?openpage&windice=1,1'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/oficina_virtual.jpg' alt='oficina Virtual' title='Oficina Virtual' style='height: 100px; width:163px;' /></a></center><div class='lineaHorNaranjaSimple'></div><br><a href='"+miservidor+"/inet/hwgr.nsf/corta/FB4A?opendocument'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/sac_010.jpg' alt='Servicio de atenci&oacute;n al ciudadano'Â title='Servicio de atenci&oacute;n al ciudadano'/></a>";
//servicios
WWBANNER[3] = new Array();
WWBANNER[3][0] = "<label class='textoNaranjaTitulos'>Oficina Virtual</label><table width='92%' style='border-top:#db530a 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inicio.nsf/admele?openpage&windice=1,1'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/oficina_virtual.jpg' alt='oficina Virtual' title='Oficina Virtual' style='height: 100px; width:163px;' /></center></a><div class='lineaHorNaranjaSimple'></div><br><a href='"+miservidor+"/inet/hwgr.nsf/corta/FB4A?opendocument'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/sac_010.jpg' alt='Servicio de atenci&oacute;n al ciudadano'Â title='Servicio de atenci&oacute;n al ciudadano'/></center></a>";
WWBANNER[3][6] = "<center><label class='textoAzulTitulos' style='padding-left: 0px'>Gesti&oacute;n Unificada de Licencias</label></center><table width='92%' style='border-top:#00457c 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inet/ventanilla.nsf'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/ventanilla_unica.gif' alt='Gesti&oacute;n Unificada Licencias' title='Gesti&oacute;n Unificada Licencias' style='height: 140px; width:163px;' /></center></a><div class='textoContenido' style='color: #131366'><center><b>Calle Gran Capit&aacute;n 20<br> 18071 GRANADA<br><br></b><span class='titularrojo'>Horario de 9h a 13h</span></center></div><table width='92%' style='border-top:#00457c 1px solid' align=center><tr><td></td></tr></table><br><table align='center'><tr><td align='center'><label class='textoAzulTitulos' style='padding-left:0'>Cita previa en el 010<br><span style='font-size: 11px;'>902 234 010 - 958 535 871</span></label></td></tr></table><table width='92%' style='border-top:#00457c 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inet/hwgr.nsf/corta/FB4A?opendocument'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/sac_010.jpg' alt='Servicio de atenci&oacute;n al ciudadano' title='Servicio de atenci&oacute;n al ciudadano'/></a><div class='lineaHorAzulSimple'></div>";
WWBANNER[3][8] = "<label class='textoAzulTitulos' >Medio Ambiente</label><table width='92%' style='border-top:#00457c 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inet/wambiente.nsf'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/medamb.jpg' alt='Medio Ambiente' title='Medio Ambiente'  /></center></a><table width='92%' style='border-top:#00457c 1px solid' align=center><tr><td></td></tr></table><br><label class='textoNaranjaTitulos'>Oficina Virtual</label><table width='92%' style='border-top:#db530a 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inicio.nsf/admele?openpage&windice=1,1'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/oficina_virtual.jpg' alt='oficina Virtual' title='Oficina Virtual' style='height: 100px; width:163px;' /></center></a><div class='lineaHorNaranjaSimple'></div><br>";
//cultura
WWBANNER[4] = new Array();
WWBANNER[4][0] = "<label class='textoNaranjaTitulos'>Oficina Virtual</label><table width='92%' style='border-top:#db530a 1px solid' align=center><tr><td></td></tr></table></div><a href='"+miservidor+"/inicio.nsf/admele?openpage&windice=1,1'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/oficina_virtual.jpg' alt='oficina Virtual' title='Oficina Virtual' style='height: 100px; width:163px;' /></center></a><div class='lineaHorNaranjaSimple'></div><br><a href='"+miservidor+"/inet/hwgr.nsf/corta/FB4A?opendocument'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/sac_010.jpg' alt='Servicio de atenci&oacute;n al ciudadano'Â title='Servicio de atenci&oacute;n al ciudadano'/></center></a>";
//empleo
WWBANNER[5] = new Array();
WWBANNER[5][0] = "<label class='textoNaranjaTitulos'>Oficina Virtual</label><table width='92%' style='border-top:#db530a 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inicio.nsf/admele?openpage&windice=1,1'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/oficina_virtual.jpg' alt='oficina Virtual' title='Oficina Virtual' style='height: 100px; width:163px;' /></center></a><div class='lineaHorNaranjaSimple'></div><br><a href='"+miservidor+"/inet/hwgr.nsf/corta/FB4A?opendocument'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/sac_010.jpg' alt='Servicio de atenci&oacute;n al ciudadano'Â title='Servicio de atenci&oacute;n al ciudadano'/></center></a>";
//bsocial
WWBANNER[6] = new Array();
WWBANNER[6][0] = "<label class='textoNaranjaTitulos'>Oficina Virtual</label><table width='92%' style='border-top:#db530a 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inicio.nsf/admele?openpage&windice=1,1'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/oficina_virtual.jpg' alt='oficina Virtual' title='Oficina Virtual' style='height: 100px; width:163px;' /></center></a><div class='lineaHorNaranjaSimple'></div><br><a href='"+miservidor+"/inet/hwgr.nsf/corta/FB4A?opendocument'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/sac_010.jpg' alt='Servicio de atenci&oacute;n al ciudadano'Â title='Servicio de atenci&oacute;n al ciudadano'/></center></a>";
  
/******************FIN VARIABLES PROPIAS DEL WEB7.JS******************/
/*************************************************************************/


/* *********** FUNCIONES Y VARIABLES COMUNES CON EL PORT7.JS ***************/
/***************************************************************************/

/* ancho de los submenus de subcategorias, posicion 0=ciudad, 1=auntamiento
2=legislacion, 3=servicios, 4=cultura, 5=servicios, 6=bienestar Social*/
var ANCHOSUBCAT = new Array("170px", "160px" ,"135px", "210px", "160px", "140px", "140px"); 
var ANCHOSSUBCAT = new Array("170px", "150px" ,"185px", "180px", "160px", "140px", "140px"); 
 

/* array de categorias y subcategorias */	
var WWARBOL = [
	['La Ciudad',
		['Fotograf&iacute;as', '/inet/wfotos.nsf/',
			['Actuales', '/inet/wfotos.nsf/lista7?openagent&vista=wwact'],
			['Antiguas', '/inet/wfotos.nsf/lista7?openagent&vista=wwant'],
			['Novedades', '/inet/wfotos.nsf/lista7?openagent&vista=wwnov'],
			['Recorridos', '/inet/wfotos.nsf/lista7?openagent&vista=wwrec'],
			['Albaicin', '/inet/wfotos.nsf/lista7?openagent&vista=wwalb'],
			['Alhambra', '/inet/wfotos.nsf/lista7?openagent&vista=wwalh'],
			['Barrios', '/inet/wfotos.nsf/lista7?openagent&vista=wwbar'],
			['Cartuja', '/inet/wfotos.nsf/lista7?openagent&vista=wwcar'],
			['Catedral', '/inet/wfotos.nsf/lista7?openagent&vista=wwcat'],
			['Centro', '/inet/wfotos.nsf/lista7?openagent&vista=wwcen'],
			['General', '/inet/wfotos.nsf/lista7?openagent&vista=wwgen'],
			['Realejo', '/inet/wfotos.nsf/lista7?openagent&vista=wwrea'],
		],
		['Parques y arboles', '/inet/warboles.nsf',
			['Por nombre com&uacute;n', '/inet/warboles.nsf/wcomun'],
			['Por nombre cient&iacute;fico', '/inet/warboles.nsf/wcien'],
			['Por parque', '/inet/warboles.nsf/weparque'],
			['Parques', '/inet/warboles.nsf/wparques'],
			['Series monogr&aacute;ficas', '/inet/warboles.nsf/pagseries'],
			['Novedades', '/inet/warboles.nsf/wwnov'],			
		],
		['Turismo', 'http://www.granadatur.com'],
		['L&iacute;neas autobuses', '/bus.htm'],
		['Mapas y planos', '/plano.nsf/inicio'],
		['Callejero', '/visorweb/visorgeogranada.html'],
		['Gu&iacute;a de recursos', '/inet/wpim.nsf/inicio?openpage',
			['Organizaci&oacute;n de Recursos', '/inet/wpim.nsf/inicio?openpage&cat=0'],
			['Descripci&oacute;n de Servicios', '/inet/wpim.nsf/servicios?openpage'],
			['Correcci&oacute;n de Errores', '/inet/wpim.nsf/inicio?openpage&cat=2'],
			['Otras Administraciones', '/inet/wpim.nsf/inicio?openpage&cat=3'],
			['B&uacute;squedas', '/inet/wpim.nsf/inicio?openpage&cat=4'],
			['Recursos por Nombre', '/inet/wpim.nsf/wwxcent?openview'],		    
			['Recursos por Distrito', '/inet/wpim.nsf/resumen/wwxdist'],		    
			['Recursos por Materia', '/inet/wpim.nsf/resumen/wwxmat'],		    
			['Recursos por Dependencia', '/inet/wpim.nsf/resumen/wwxorg'],		    
			['Recursos por Materia/Distrito', '/inet/wpim.nsf/resumen2d/wwcmadi'],		    
		],
		['Accesos, novedad y tiempo', '/inicio.nsf/otras?openpage',
			['novedades/d&iacute;a', '/inet/wbuscar2.nsf/wwtodnov/0'],
			['novedades/tipo', '/inet/wbuscar2.nsf/wwtodnov/1'],
			['Accesos/mes', '/ptoencu.nsf/wwmes'],
			['Accesos/tipo', '/ptoencu.nsf/wwacc?openview&count=50'],
			['Calculadora euros', '/euros.htm'],
			['Calendario', '/calendario.htm'],
		],
	],
	['El Ayuntamiento',	/* windice=1*/
		['Oficina Virtual', '/inicio.nsf/admele',
			['Carpeta Ciudadano','https://granada.org/simweb.nsf/entrada'],
			['Domiciliaciones','https://granada.org/cgi-bin/produccion/simcgi.exe/domiciliarrecibos7.sim/root?windice=1,1'],
			['Expedientes','https://granada.org/cgi-bin/produccion/simcgi.exe/listarexpedientes7.sim/root?windice=1,1'],
			['Certificado Padr&oacute;n','https://granada.org/cgi-bin/produccion/simcgi.exe/visualizarpadron7.sim/root?windice=1,1'],
			['Comprobar Documentos','https://granada.org/cgi-bin/produccion/simcgi.exe/comprobarcertificados7.sim/root?windice=1,1'],
			['Reclamaciones','https://granada.org/reclasim.nsf?open&windice=1,1'],
			['Subscripci&oacute;n','https://granada.org/simweb.nsf/editperfil7'],
			['Pago de Recibos','https://granada.org/cgi-bin/produccion/simcgi.exe/Consultarrecibos7.sim/root?windice=1,1'],	
			['Autoliquidaciones','http://www.granada.org:90/cgi-bin/produccion/simcgi.exe/autlq.sim/init'],	
		],
		['Bolet&iacute;n novedades, RSS...', '/inet/wnews.nsf',
			['Suscribirse','https://granada.org/boletin.nsf/subscribe'],
			['Consultar suscripci&oacute;n','https://granada.org/boletin.nsf/consultan'],
			['bolet&iacute;n diario','/inet/wnews.nsf/diario'],
			['bolet&iacute;n semanal','/inet/wnews.nsf/semanal'],
			['bolet&iacute;n mensual','/inet/wnews.nsf/mensual'],
		
		],
		['Buscador web', '/inet/wbuscar2.nsf/inicio?openpage&windice=1,3,0',
			['R&aacute;pidas', '/inet/wbuscar2.nsf/inicio?openpage&cat=0&windice=1,3,0'],
			['Por tipo', '/inet/wbuscar2.nsf/inicio?openpage&cat=1&windice=1,3,0'],
			['Complejas', '/inet/wbuscar2.nsf/inicio?openpage&cat=2&windice=1,3,0'],
		],	
		['Calendario laboral', '/calendario.htm'],
		['Contrataci&oacute;n', '/contrata.nsf',
			['Anuncios','/contrata.nsf/todosanuncios'],
			['Anuncios Informaci&oacute;n previa','/contrata.nsf/anuprev'],
			['Hist&oacute;rico de Anuncios','/contrata.nsf/anuhis'],
			['Comunicaci&oacute;n con Contrataci&oacute;n','/contrata.nsf/wwgen/comunica'],
			['Organo de Contrataci&oacute;n','/contrata.nsf/wwgen/organo'],
			['Mesas de Contrataci&oacute;n','/contrata.nsf/wwgen/mesa'],
			['Normativa aplicable','/contrata.nsf/wwgen/normativa'],
			['Licitaciones por Plazo','/contrata.nsf/wwbyfecha'],
			['Licitaciones por Expte','/contrata.nsf/wwbyexpte'],
			['Contrataciones programadas','/contrata.nsf/conprog'],
			['Adjudicaciones','/contrata.nsf/adjdef'],
			['Procedimientos anulados','/contrata.nsf/anuladas'],
			['Hist&oacute;rico de Licitaciones','/contrata.nsf/lichis'],
		],
		['Edictos','/inet/wgr.nsf/wwbop'],
		['Impresos', '/inet/wgr.nsf/impresos?openpage'],
		['Informaci&oacute;n al ciudadano', '/inet/wgr.nsf',
			['Ayuntamiento','/inet/wgr.nsf/wwayu'],
			['Empleo','/inet/wgr.nsf/empleo'],
			['Patronatos y empresas','/inet/wgr.nsf/wwpat'],
			['Juntas municipales','/inet/wgr.nsf/wwjun'],
			['Vecinos','/inet/wgr.nsf/wwvec'],
			['Solicitudes/licencias','/inet/wgr.nsf/resumen/wwlic'],
			['Ordenanzas fiscales','/inet/wgr.nsf/wwfis'],
			['Hist&oacute;rico ordenanzas fiscales','/inet/hwgr.nsf/wword'],
			['Tabl&oacute;n anuncios','/inet/wgr.nsf/resumen/wwanu'],
			['Hist&oacute;rico tabl&oacute;n anuncios','/inet/hwgr.nsf/wwvie'],
			['Tramitaciones','/inet/wgr.nsf/resumen/wwlic'],
			['Subvenciones activas','/inet/wgr.nsf/wwsubv'],
			['Hist&oacute;rico Subvenciones','/inet/hwgr.nsf/wwhsub'],
			['Publicaci&oacute;n BOP','/inet/wgr.nsf/resumen/wwbo2'],		
		],
		['Tel&eacute;fonos','/inicio.nsf/telefonos?openagent&windice=1,9'],
		['Archivo Municipal','/inicio.nsf/archivo?open&windice=1,10'],
		['Sugerencias', '/sugweb.nsf',
			['Nueva','/sugweb.nsf/sugiere'],
			['Consulta','/sugweb.nsf/buscasug'],		
		],
		['Contrataci&oacute;n Gerencia', '/contratagerencia.nsf',
			['Anuncios','/contratagerencia.nsf/todosanuncios'],
			['Anuncios Informaci&oacute;n previa','/contratagerencia.nsf/anuprev'],
			['Hist&oacute;rico de Anuncios','/contratagerencia.nsf/anuhis'],
			['Informaci&oacute;n &uacute;til','/contratagerencia.nsf/wwgen'],
			['Normativa aplicable','/contrata.nsf/wwgen/normativa'],
			['Licitaciones por Plazo','/contratagerencia.nsf/wwbyfecha'],
			['Licitaciones por Expte','/contratagerencia.nsf/wwbyexpte'],
			['Contrataciones programadas','/contratagerencia.nsf/conprog'],
			['Adjudicaciones','/contratagerencia.nsf/adjdef'],
			['Procedimientos anulados','/contratagerencia.nsf/anuladas'],
			['Hist&oacute;rico de Licitaciones','/contratagerencia.nsf/lichis'],
		],
	],
	['Legislaci&oacute;n',		/* windice=2*/
		['General', '/inet/wordenanz.nsf',
			['Por &aacute;reas','/inet/wordenanz.nsf/resumen/area'],
			['Por tipo','/inet/wordenanz.nsf/resumen/tipo'],
			['Por fecha','/inet/wordenanz.nsf/resumen/fecha'],
			['&aacute;mbito nacional','/inet/wordenanz.nsf/resumen/nacional'],
			['&aacute;mbito andaluz','/inet/wordenanz.nsf/resumen/andaluz'],
			['&aacute;mbito local','/inet/wordenanz.nsf/resumen/local'],
			['Novedades','/inet/wordenanz.nsf/wwnov?open'],
			['B&uacute;quedas','/inet/wordenanz.nsf/pbuslegis?open'],
		],
		['Ordenanzas fiscales', '/inet/wgr.nsf/wwfis?openview&windice=2,2',
			['Actuales','/inet/wgr.nsf/wwfis?openview&windice=2,2'],
			['Hist&oacute;rico','/inet/hwgr.nsf/wword?openview&windice=2,2'],
		],
		['P.G.O.U', '/inet/wpgo.nsf',
			['Memoria', '/inet/wpgo.nsf/wwmem'],
			['Normativa', '/inet/wpgo.nsf/wwnor'],
			['Normativa fichas', '/inet/wpgo.nsf/wwtit'],
			['Fichas suelo urbano', '/inet/wpgo.nsf/wwfic'],
			['Fichas urbanizable', '/inet/wpgo.nsf/wwfiu2'],
			['Fichas no urbanizable', '/inet/wpgo.nsf/wwsnu'],
			['Fichas &aacute;reas de reserva', '/inet/wpgo.nsf/wwfar'],
			['Planos &aacute;reas de reparto', '/inet/wpgo.nsf/areparto'],
			['Planos arqueolog&iacute;a', '/inet/wpgo.nsf/arqueologia'],
			['Planos calificaci&oacute;n y ordenaci&oacute;n', '/inet/wpgo.nsf/calificacion'],
			['Planos cat&aacute;logo edificaciones', '/inet/wpgo.nsf/catalogo'],
			['Planos clasificaci&oacute;n del suelo', '/inet/wpgo.nsf/clasificacion'],
			['Planos suelo no urbanizable', '/inet/wpgo.nsf/nourbanizable'],
			['Planos infraestructuras', '/inet/wpgo.nsf/infraestructura'],
			['Planos sistemas generales', '/inet/wpgo.nsf/comunicacion'],
		],
	],
	['Servicios',	/* windice=3*/
		['Bodas y Palacios', '/inet/palacios.nsf',
			['Info.General', '/inet/palacios.nsf/infgeneral'],
			['Fotos y planos', '/inet/palacios.nsf/infbyed'],		
		],
		['Igualdad oportunidades', '/inet/wmujer8.nsf',
			['Presentaci&oacute;n', '/inet/wmujer8.nsf/ww01pres'],
			['Centro M. Atenci&oacute;n a Mujeres', '/inet/wmujer8.nsf/ww02cmam'],
			['Centro Mariana Pineda', '/inet/wmujer8.nsf/vistaxml?OpenPage&tipoxml=1'],
			['Planes de Igualdad', '/inet/wmujer8.nsf/vistaxml?OpenPage&tipoxml=6'],
			['Violencia de G&eacute;nero', '/inet/wmujer8.nsf/vistaxml?OpenPage&tipoxml=0'],
			['Consejo M. y participaci&oacute;n', '/inet/wmujer8.nsf/vistaxml?OpenPage&tipoxml=2'],
			['Servicios Conciliaci&oacute;n', '/inet/wmujer8.nsf/vistaxml?OpenPage&tipoxml=3'],
			['Igualdad y coeducaci&oacute;n', '/inet/wmujer8.nsf/vistaxml?OpenPage&tipoxml=4'],
			['Otras &Aacute;reas', '/inet/wmujer8.nsf/vistaxml?OpenPage&tipoxml=5'],
			['Legislaci&oacute;n y Publicaciones', '/inet/wmujer8.nsf/vistaxml?OpenPage&tipoxml=7'],
			['Actividades, Cursos, Recursos...', '/inet/wmujer8.nsf/ww11agen'],
			['Novedades', '/inet/wmujer8.nsf/wwnov'],
		],
		['Econom&iacute;a', '/inet/wgr.nsf/economia',
			['Informaci&oacute;n', '/inet/wgr.nsf/wweco0?openview&windice=3,3'],
			['Anuncios', '/inet/wgr.nsf/wweco3?openview&windice=3,3'],
			['Desarrollo local', '/inet/wgr.nsf/wweco6?openview&windice=3,3'],
			['Domiciliaciones', 'https://granada.org/inet/wdomrec.nsf/domicilia'],
			['Subvenciones activas','/inet/wgr.nsf/wweco7?openview&windice=3,3'],
			['Subvenciones hist&oacute;rico','/inet/wgr.nsf/wweco8?openview&windice=3,3'],
			['Ordenanzas fiscales actual','/inet/wgr.nsf/wwefis?openview&windice=3,3'],
			['Ordenanzas fiscales hist&oacute;r.','/inet/wgr.nsf/wweord?openview&windice=3,3'],
			['Callejero fiscal por calle', '/inet/wcallfis.nsf/wwcall0'],
			['Callejero fiscal por categor&iacute;a', '/inet/wcallfis.nsf/wwcall1'],
			['Callejero fiscal por c&oacute;digo', '/inet/wcallfis.nsf/wwcall2'],
			['Callejero fiscal por ejercicio', '/inet/wcallfis.nsf/wwcall3'],
			['Ep&iacute;grafes IAE por ep&iacute;grafe', '/inet/wcallfis.nsf/wwiae0'],
			['Ep&iacute;grafes IAE por tipo activ.', '/inet/wcallfis.nsf/wwiae1'],
			['Ep&iacute;grafes IAE por actividad', '/inet/wcallfis.nsf/wwiae2'],
		],
		['Educaci&oacute;n', '/inet/wgr.nsf/wwedu?openview&windice=3,4'],
		['Gabinete de Comunicaci&oacute;n', '/inet/wprensa.nsf/inicio?openpage&windice=3,5,0',
			['Anuncios', '/inet/wprensa.nsf/inicio?openpage&cat=2&windice=3,5,0'],
			['Convocatoria medios', '/inet/wprensa.nsf/inicio?openpage&cat=1&windice=3,5,0'],
			['Fotograf&iacute;as', '/inet/wprensa.nsf/inicio?openpage&cat=3&windice=3,5,0'],
			['Hemeroteca', '/inet/wprensa.nsf/inicio?openpage&cat=0&windice=3,5,0'],
			['Noticias Web', '/inet/wprensa.nsf/wnotweb?open&cat=3&windice=3,5,0'],
		],		
		['Gesti&oacute;n Unificada Licencias', '/inet/ventanilla.nsf',
			['Presentaci&oacute;n del Alcalde', '/inet/ventanilla.nsf/wwmain/alcalde'],			
			['D&oacute;nde estamos', '/inet/ventanilla.nsf/wwmain/direcciones'],
			['Qu&eacute; puedo hacer', '/inet/ventanilla.nsf/wwmain/funcionamiento'],
			['Tramitar mi licencia', '/inet/ventanilla.nsf/wwmain/tramitacion'],
			['Cita previa', '/inet/citasgul.nsf'],
			['Oficina virtual', '/inet/ventanilla.nsf/wwmain/consultarexpte'],
			['Impresos', '/inet/ventanilla.nsf/impresos'],
			['Noticias GUL', '/inet/ventanilla.nsf/wwmain/noticias'],
			['Normativa aplicable', '/inet/ventanilla.nsf/wwmain/legislacion'],
			['Preguntas m&aacute;s frecuentes', '/inet/ventanilla.nsf/wwmain/faqs'],
			['Vocabulario de t&eacute;rminos', '/inet/ventanilla.nsf/wwmain/terminologia'],			
			['Enlaces', '/inet/ventanilla.nsf/wwmain/enlaces'],		  	
		],		
		['Juventud', '/inet/wjoven.nsf/index',
			['Asociaciones', '/internet/asocia.nsf'],
			['El correo Juvenil: todos', '/inet/wjoven.nsf/wwmeses'],
			['El correo Juvenil: Hist&oacute;rico', '/inet/hjoven.nsf/wwmeses'],	
		],
		['Medio ambiente', '/inet/wambiente.nsf/wwtod',
			['Gesti&oacute;n licencias apertura', '/inet/wambiente.nsf/ww1'],
			['Gesti&oacute;n salud y consumo', '/inet/wambiente.nsf/ww2'],
			['Gesti&oacute;n limpieza', '/inet/wambiente.nsf/ww3'],
			['Gesti&oacute;n parques y jardines', '/inet/wambiente.nsf/ww4'],
			['Gesti&oacute;n granada sostenible', '/inet/wambiente.nsf/wwgra'],
			['Gesti&oacute;n diagn&oacute;stico ambiental', '/inet/wambiente.nsf/wwsos'],
			['Gesti&oacute;n abastecimiento aguas', '/inet/wambiente.nsf/wwaba'],
			['Anuncios activos', '/inet/wgr.nsf/wwimedact'],
			['Anuncios hist&oacute;rico', '/inet/wgr2.nsf/wwimedpas'],
			['Mapa de ruidos', 'http://geoweb.granada.org/visorweb/util/visor_maparuidos.html'],			
		],
		['OMIC', '/inet/womic.nsf',
			['General', '/inet/womic.nsf/wwoin'],
			['General educaci&oacute;n', '/inet/womic.nsf/wwoed'],
			['General noticias', '/inet/womic.nsf/wwonw'],
			['General publicaciones', '/inet/womic.nsf/wwopu'],
			['&iquest;Qu&eacute; es?', '/inet/womic.nsf/wwoic/90e'],
			['Directorio', '/inet/womic.nsf/wwoic/91a'],
			['Enlaces', '/inet/womic.nsf/wwoic/91e'],	
		],
		['Participaci&oacute;n ciudadana', '/inet/wparciu.nsf/wwtod'],
		['Perfil del Contratante', '/contrata.nsf',
			['Anuncios','/contrata.nsf/todosanuncios'],
			['Anuncios Informaci&oacute;n previa','/contrata.nsf/anuprev'],
			['Hist&oacute;rico de Anuncios','/contrata.nsf/anuhis'],
			['Comunicaci&oacute;n con Contrataci&oacute;n','/contrata.nsf/wwgen/comunica'],
			['Organo de Contrataci&oacute;n','/contrata.nsf/wwgen/organo'],
			['Mesas de Contrataci&oacute;n','/contrata.nsf/wwgen/mesa'],
			['Normativa aplicable','/contrata.nsf/wwgen/normativa'],
			['Licitaciones por Plazo','/contrata.nsf/wwbyfecha'],
			['Licitaciones por Expte','/contrata.nsf/wwbyexpte'],
			['Contrataciones programadas','/contrata.nsf/conprog'],
			['Adjudicaciones','/contrata.nsf/adjdef'],
			['Procedimientos anulados','/contrata.nsf/anuladas'],
			['Hist&oacute;rico de Licitaciones','/contrata.nsf/lichis'],		
		],
		['A.V.Protecci&oacute;n civil', '/inet/wprotcivil.nsf',
			['Introducci&oacute;n', '/inet/wprotcivil.nsf/wwintr'],
			['Agrupaci&oacute;n voluntarios', '/inet/wprotcivil.nsf/wwagru'],
			['Historia', '/inet/wprotcivil.nsf/wwhist'],
			['Fotos galer&iacute;a de escudos', '/inet/wprotcivil.nsf/wwescu'],
			['Fotos veh&iacute;culos', '/inet/wprotcivil.nsf/wwvehi'],
			['Fotos jornadas', '/inet/wprotcivil.nsf/wwvjor'],
			['Fotos por a&ntilde;os', '/inet/wprotcivil.nsf/wwejer'],
			['Fotos antiguas', '/inet/wprotcivil.nsf/wwanti'],
			['Fotos por actuaciones', '/inet/wprotcivil.nsf/wwfoto'],
			['Revista GR-0', '/inet/wprotcivil.nsf/wwrgr0'],
			['Enlaces', '/inet/wprotcivil.nsf/wwenla'],
		],
		['Polic&iacute;a local', '/inet/policia.nsf/inicio?openpage&windice=3,13,0',
			['Saluda', '/inet/policia.nsf/inicio?openpage&cat=0&windice=3,13,0'],
			['Organigrama', '/inet/policia.nsf/inicio?openpage&cat=1&windice=3,13,0'],
			['Recursos', '/inet/policia.nsf/inicio?openpage&cat=2&windice=3,13,0'],
			['Secciones', '/inet/policia.nsf/inicio?openpage&cat=3&windice=3,13,0'],
			['Anuncios', '/inet/policia.nsf/inicio?openpage&cat=4&windice=3,13,0'],
			['Avisos', '/inet/policia.nsf/inicio?openpage&cat=5&windice=3,13,0'],
			['Foro', '/inet/policia.nsf/inicio?openpage&cat=6&windice=3,13,0'],			
			['Novedades', '/inet/policia.nsf/inicio?openpage&cat=7&windice=3,13,0'],
		],
		['Rastrillo Productos Desechados', '/inet/wsubofe.nsf',
			['Ofertas', '/inet/wsubofe.nsf/wwofertados?openview&count=10'],
			['Realizar oferta', '/inet/wsubofe.nsf/wwofertar?OpenForm'],
			['Demandas', '/inet/wsubofe.nsf/wwdemandados?openview&count=10'],
			['Realizar demanda', '/inet/wsubofe.nsf/wwdemandar?OpenForm'],
			['Identificarse', '/inet/wsubofe.nsf/entradaOfer'],
			['Registrarse', '/boletin.nsf/subscribe'],
			['Ayuda', '/inet/wsubofe.nsf/ayuda'],
		],				
		['Tribunal Econ&oacute;mico Admin. Municipal', '/inet/wgr.nsf/wwtod/NT0000AE66?OpenDocument&windice=3,15',
			['Gu&iacute;a B&aacute;sica Reclamaciones', '/inet/hwgr.nsf/corta/D02E?opendocument&windice=3,15'],
		],
		['Agenda 21 Local', '/inet/agenda21.nsf',
			['Implantaci&oacute;n' ,'/inet/agenda21.nsf/wwimp'],
			['Difusi&oacute;n' ,'/inet/agenda21.nsf/difusion'],
			['Acciones' ,'/inet/agenda21.nsf/wwacc'],
			['Buenas Pr&aacute;cticas' ,'/inet/agenda21.nsf/wwapr'],
			['Oficina T&eacute;cnica','/inet/agenda21.nsf/wwoft'],
			['Foros','/inet/agenda21.nsf/foros'],
		],
	],
	['Cultura', /* windice=4*/
		['Agenda Cultural', '/inet/wagenda.nsf/gagenda?OpenNavigator',
			['&iquest;Qu&eacute; hacer hoy?', '/inet/wagenda.nsf/aagenda?OpenAgent'],
			['Calendario de actividades', '/inet/wagenda.nsf/calendario?OpenPage'],
			['Banda Municipal de M&uacute;sica', '/inet/wagenda.nsf/wwbmm?OpenView'],
			['Correo juvenil: actividades', '/inet/wjoven.nsf/wwlast/1?OpenDocument&windice=3,7'],
			['Hist&oacute;rico', '/inet/wagenda.nsf/wwap?OpenView'],
			['B&uacute;squedas', '/inet/wagenda.nsf/busca?OpenPage'],			
		],	
		['Bibliotecas', '/inet/bibliote.nsf/inicio?openpage',
			['Servicio de Bibliotecas', '/inet/bibliote.nsf/bibliotecas?openpage'],
			['Bibliotecas Municipales', '/inet/bibliote.nsf/wwce?openview'],
			['Actividades literarias', '/inet/bibliote.nsf/wwact?openview'],
			['Gu&iacute;as de lectura', '/inet/bibliote.nsf/wwguias?openview'],
			['Homenajes', '/inet/bibliote.nsf/wwhom?openview'],
			['Rutas Literarias', '/inet/bibliote.nsf/wwrutas?openview'],
		],
		['Centros Culturales', '/inet/wagenda.nsf/wwce?OpenView'],	
		['Programas Culturales', '/inet/wagenda.nsf/wwpr?OpenView'],
	],
	['Empleo', /* windice=5*/
		['Informaci&oacute;n', '/inet/wgr.nsf/empleo?openagent&windice=5,1'],
		['Bases', '/inet/wgr.nsf/bases?openagent&windice=5,2'],
		['Consulta opositores', 'https://granada.org/adm_opo.nsf/consultan?openpage'],
		['Oposiciones', 'https://granada.org/adm_opo.nsf/wwopo?Openview'],
		['Correo juvenil cursos', '/inet/wjoven.nsf/wwcurs/1?opendocument'],
		['Correo juvenil becas', '/inet/wjoven.nsf/wwbeca/1?opendocument'],
		['Correo juvenil premios', '/inet/wjoven.nsf/wwprem/1?opendocument'],
	],
	['Bienestar Social', /* windice=6*/
		['S.S. Comunitarios' , '/inet/bsocial.nsf/inicio?openpage&cat=0'],
		['S.A. Inmigrante' , '/inet/bsocial.nsf/SAI?openpage'],
		['&Aacute;reas de Actuaci&oacute;n' , '/inet/bsocial.nsf/inicio?openpage&cat=2'],
		['Colectivos' , '/inet/bsocial.nsf/inicio?openpage&cat=3'],
		['Actividades' , '/inet/bsocial.nsf/inicio?openpage&cat=4'],
		['Consejos participaci&oacute;n' , '/inet/bsocial.nsf/inicio?openpage&cat=5'],
		['Normativa' , '/inet/bsocial.nsf/inicio?openpage&cat=6'],
		['Enlaces' , '/inet/bsocial.nsf/wwenl?openview'],
	]
];

/*
NOMBRE: DetectaNavegador()
DEFINICION: Detectará el navegador y le dará valor al array ID_NAV(2): posibles valores: (0 0)IE6, (0 1)IE7, (1 0)Safari, (1 1)Firefox, (9 9)cualquier otro nav
TIPO: Funcion sin parámetros de entrada.
EVENTOS DE USO: Se le hace llamada unicamente en este JS al final
PARAMETROS: Ninguno
*/
function DetectaNavegador(){
	ID_NAV[0] = "0";
	ID_NAV[1] = "0";

	if(navigator.appName == "Netscape"){
		ID_NAV[0] = "1";
		/* firefox */
		if(!navigator.appVersion.match("Safari")) ID_NAV[1] = "1";
	}
	/* Internet Explorer 7 */
	if(navigator.appVersion.match("MSIE 7") || navigator.appVersion.match("MSIE 8")) ID_NAV[1] = "1";
	if(navigator.appName == "Opera"){
		ID_NAV[0] = "9";
		ID_NAV[1] = "9";
	}
}



/* codigo de preparseo para que el IE6 interprete los eventos de over y out del menu horizontal de la cabecera */
document.write("<!--[if IE]><link rel='stylesheet' type='text/css'  href='"+miservidor+"/css_ie.css'><![endif]--> ");
//document.write("<!--[if IE]><link rel='stylesheet' type='text/css'  href='css70/css_ie.css'><![endif]--> ");

/*
NOMBRE: Intro()
DEFINICION: Funcion que detecta la tecla "intro" en el evento "onkeypress" de la caja de texto del buscador
EVENTOS DE USO: Se le hace llamada en el evento "onkeypress" de la caja de texto del buscador
PARAMETROS: Ninguno
*/
function Intro(tecla){

if(tecla.keyCode == 13) {
	if (document.getElementById("query").value=="") {
		alert("Debe introducir el texto a buscar.");
		document.getElementById("query").focus();  
		return;
	}
	else{
		if (sCadenaNSF == "") window.open("/inet/wbuscar2.nsf/buscabuscar?openagent=&query=" + document.getElementById("query").value+ "&windice="+sWindBusq, "_self");
		else window.open("/inet/wbuscar2.nsf/busvista?openagent=&query=" + document.getElementById("query").value + "&base=" + sCadenaNSF + "&vista=wwtod&windice="+sWindBusq, "_self");
	}
}
}
/*
NOMBRE: Intro2()
DEFINICION: Funcion que abre la ventana de busquedas pasando como parametro lo introducido en la caja de busquedas
EVENTOS DE USO: Se le hace llamada al pulsar la imgagen de buscar en el div de accesos rapidos
PARAMETROS: Ninguno
*/
function Intro2()
{
	if (document.getElementById("query").value=="") {
	alert("Debe introducir el texto a buscar.");
	document.getElementById("query").focus();  
	return
}
else{
	if (sCadenaNSF == "") window.open("/inet/wbuscar2.nsf/buscabuscar?openagent=&query=" + document.getElementById("query").value+ "&windice="+sWindBusq, "_self");
	else 
	{
	  window.open("/inet/wbuscar2.nsf/busvista?openagent=&query=" + document.getElementById("query").value + "&base=" + sCadenaNSF + "&vista=wwtod&windice="+sWindBusq, "_self");
	}
}
}
/*
NOMBRE: ManoPointer()
DEFINICION: Funcion cambia el cursor a pointer
EVENTOS DE USO: Se le hace llamada en el onmouseover de la imagen de buscar
PARAMETROS: ello
*/
function ManoPointer(ello){ello.style.cursor='pointer';}

/* ********************FUNCIONES PROPIAS DEL WEB7.JS**********************/
/*************************************************************************/

/*
NOMBRE: CategorizarURL()
DEFINICION: Buscará la URL dentro del array WWARBOL y le dará los valores a las variables ID_CATEG e ID_SUBCATEG
TIPO: Funcion con un parámetro de entrada: la direcci&oacute;n URL
EVENTOS DE USO: Se le hace llamada en cada página excepto en la portada
PARAMETROS: la direcci&oacute;n URL
*/
function CategorizarURL()
{
	var direccionURL = document.location.href.toLowerCase();
	var arrayChar = direccionURL.split("/");
	var fileNSF = "";
	var fileHTM = "";
	var fileHTML = ""; 
	var valorWIndice = ""; 

	
	// si la URL no contiene la palabra windice, se buscan los archivos
	// .nsf, .html, .htm o cualquier palabra dentro del array de WWARBOL (funcion BuscarArchivo)
	if (direccionURL.indexOf("windice") == -1)
	{	
		// si no viene informado el windice en URL preguntamos 
		// si viene informado dentro de un script o en un archivo JS
		if (typeof(windice) != "undefined")
		{
		  // obtencion del los valores de (idcateg, idsubcateg e id_expand) pasados en el windice, pe: windice=(2,4,0)
		  // con estos parámetros se les da valor a las variables globales ID_CATEG, ID_SUBCATEG e ID_EXPAND
		  TratarWindice(windice);		
		}		
		else
		{
		  for (i=0; i<arrayChar.length; i++)
		  {
			 if (arrayChar[i].indexOf(".nsf")!= -1) fileNSF = arrayChar[i];
			 else if (arrayChar[i].indexOf(".htm")!= -1) 
			 {
				if (arrayChar[i].indexOf(".html")!= -1) fileHTML = arrayChar[i];
				else fileHTM = arrayChar[i];
			 }			
		  }		
		  // funcion que busca el archivo calculado anteriormente en el array de categorias WWARBOL
		  // y asigna los valores a IDCATEG e IDSUBCATEG
		  if (bEncontrado == false) BuscarArchivo(fileNSF);	
		  if (bEncontrado == false) BuscarArchivo(fileHTM);
		  if (bEncontrado == false) BuscarArchivo(fileHTML);
		}	 
	}	
	else// si ha encontrado la palabra windice en la URL
	{
		valorWIndice = ProcesarDireccionURL(direccionURL, "windice");
		// obtencion del los valores de (idcateg, idsubcateg) pasados en el windice, pe: windice=(2,4)
		// con estos parámetros se les da valor a las variables globales ID_CATEG, ID_SUBCATEG e ID_EXPAND
		TratarWindice(valorWIndice);
	} 
	
	// asignar el valor a  ID_SSCATEG (Subcategoria dentro de las subcategorias)	
	if (ID_CATEG != 99 && ID_SUBCATEG != 99)
	{
		var iLengthSubCat = 0;
		if (ID_NAV[0] == "0") iLengthSubCat = WWARBOL[ID_CATEG][ID_SUBCATEG].length - 1;// IE
		else iLengthSubCat = WWARBOL[ID_CATEG][ID_SUBCATEG].length;//resto exp	
		for (k=0; k<iLengthSubCat;k++)
		{
		  if (k>1)
		  {
			 if (direccionURL.indexOf(WWARBOL[ID_CATEG][ID_SUBCATEG][k][1]) != -1) 
			 {
				ID_SSCATEG = k;  
				break; 
			 }								  
		  }
		}
	}
	
	// obtencion de la cadena que acompaña a la BD NSF dentro de la URL
	if (direccionURL.indexOf(".nsf") != -1) 
	{
		var sCadSinHTTP = direccionURL.substr(7); 
		var iAux = sCadSinHTTP.indexOf("/"); 
		var sCadSinHost = sCadSinHTTP.substr(iAux+1); 
		var iLength = sCadSinHost.indexOf(".nsf"); 
		sCadenaNSF = sCadSinHost.substr(0, (iLength + 4)); 
	}
	
	//asignacion de la variable sWindBusq
	sWindBusq = ID_CATEG + "," + ID_SUBCATEG + "," + ID_EXPAND;

}

// llamada a la funcion de CategorizarURL()
CategorizarURL();

/*
NOMBRE: TratarWindice()
DEFINICION: Devuelve el valor del parametro windice dentro de la URL.
EVENTOS DE USO: Se le hace llamada en la funcion CategorizarURL
PARAMETROS: valorWindice
*/
function TratarWindice(valorWindice)
{
	if (valorWindice.indexOf(",") != -1)
	{
		var arrayCat= valorWindice.split(",");
		if (arrayCat[0] != null) ID_CATEG = parseInt(arrayCat[0]);
		if (arrayCat[1] != null) ID_SUBCATEG = parseInt(arrayCat[1]);
		if (arrayCat[2] != null) ID_EXPAND = parseInt(arrayCat[2]);
	}
	else ID_CATEG = parseInt(valorWindice);
}



/*
NOMBRE: BuscarArchivo()
DEFINICION: Devuelve la posici&oacute;n del parámetro "archivoMenu" dentro del array de categor&iacute;as y de subcategor&iacute;as (dentro del array WWARBOL) 
EVENTOS DE USO: Se le hace llamada en la funcion CategorizarURL
PARAMETROS: archivoMenu
*/
function BuscarArchivo(archivoMenu)
{

	for(i=0; i<WWARBOL.length;i++)// bucle de categorias
	{
		var iLen = 0;
		if (ID_NAV[0] == "0") iLen = WWARBOL[i].length - 1;//IE
		else iLen = WWARBOL[i].length;//resto exp
		
		for (j=0; j<iLen;j++)// bucle de categorias
		{
		  if (j>0)
		  {
			
			 if (archivoMenu != "")
			 {
				if (WWARBOL[i][j][1].indexOf(archivoMenu) != -1)
				{
					ID_CATEG = i;
					ID_SUBCATEG = j;
					bEncontrado = true;
					return;
				}
			 } 
			 var iLength = 0;
			 if (ID_NAV[0] == "0") iLength = WWARBOL[i][j].length - 1;//IE
			 else iLength = WWARBOL[i][j].length;//resto exp
			 for (k=0; k<iLength; k++)// bucle subsubcategorias
			 {
				if (k>1)
				{
					if (archivoMenu != "")
					{
						if (WWARBOL[i][j][k][1].indexOf(archivoMenu) != -1)
						{
						  ID_CATEG = i;
						  ID_SUBCATEG = j;
						  bEncontrado = true;
						  return;
						}
					}
				}// end if (k>1)		  
			 }// end bucle subsubcategorias
		  }// end if(j>1)	
		}// end bucle de subcategorias
	}// end bucle de subcategorias
}

/*
NOMBRE: ProcesarDireccionURL()
DEFINICION: Devuelve el valor de un parámetro de la direcci&oacute;n URL que se le pase
EVENTOS DE USO: Se le hace llamada en la funcion CategorizarURL
PARAMETROS: (direccion) es la URL, (param) nombre del parametro a devolver su valor
*/
function ProcesarDireccionURL(direccion, param)
{
  /* Buscamos la interrogaci&oacute;n ? para saber d&oacute;nde empiezan los parámetros */
  var posI = 0; 

  for(i=0; i<direccion.length; i++)
  {
	if(direccion.charAt(i) == "?") posI = i;
  }

  // Si no tiene parámetros, devolvemos nulo
  if(posI == 0) return null;

  // Obtenemos la secci&oacute;n de la direcci&oacute;n que contiene los parámetros 
  var parametros = unescape(direccion.substr(posI+1));

  // Sustituimos los comodines: %20 por los espacios
  //parametros = ReemplazaTodo(parametros,"%20"," ");

  // Obtenemos un vector del tipo "Parámetro, Valor" 
  parametros = parametros.split("&");

  var resultado = "";

  // Buscamos el nombre del parámetro y devolvemos su valor
  for(j=0; j<parametros.length; j++)
  {
	var vParam = parametros[j].split("="); 
	if(vParam[0] == param) resultado = vParam[1];
  }

  return resultado;
}


/*
NOMBRE: ReemplazaTodo
DEFINICION: Remplaza valores en un string por otros (string.replace s&oacute;lo remplaza 1 vez)
EVENTOS DE USO: Se le hace llamada en la funcion ProcesarDireccionURL
PARAMETROS: string, text, by
*/
function ReemplazaTodo(string, text, by)
{
	var strLength = string.length, txtLength = text.length;
	if ((strLength == 0) || (txtLength == 0)) return string; 

	var i = string.indexOf(text);
	if ((!i) && (text != string.substring(0,txtLength))) return string;
	if (i == -1) return string;

	var newstr = string.substring(0,i) + by;

	if (i+txtLength < strLength) 
		newstr += ReemplazaTodo(string.substring(i+txtLength,strLength),text,by);

	return newstr;
} 


/*
NOMBRE: EsSubCatValida
DEFINICION: Devuelve false o true segun si el idsubcateg (pasado como parámetro de entrada) 
es menor o igual que el numero de subcateg calculado del array WWARBOL para el idcateg tambien
pasado como parámetro de entrada
EVENTOS DE USO: Se le hace llamada en el archivo web7.js
PARAMETROS: idcateg, idsubcateg de entrada y bControl(booleano) de salida
*/
function EsSubCatValida(idcateg, idsubcateg)
{
	var iContSubCat = 0;
	var bControl = false;
	for(i=0; i<WWARBOL.length;i++)// bucle de categorias
	{
		if (i==idcateg)
		{
		  var iLen = 0;
		  if (ID_NAV[0] == "0") iLen = WWARBOL[i].length - 1;//IE
		  else iLen = WWARBOL[i].length;//resto exp
		  
		  for (j=0; j<iLen;j++)// bucle de subcategorias
		  {
			 if (j>0)
			 {
				iContSubCat++;
			 }
		  }
		}
	}
	if (parseInt(iContSubCat) >= parseInt(idsubcateg))	
	{
		bControl = true;
	}
		 
	return bControl;

}

/*
NOMBRE: Aumenta()
DEFINICION: Aumenta en 2 el tamaño de la fuente de la columna lateral y de la principal.
EVENTOS DE USO: Se le hace llamada en el divPpal dentro del archivo web7.js
PARAMETROS: Sin parámetros
*/
function Aumenta()
{
	if (FUENTE_ACTUAL < 35) FUENTE_ACTUAL = FUENTE_ACTUAL + 2;
	VwElementos('divColPpal', FUENTE_ACTUAL);	
//	if (ID_NAV[0] != "0") ControlSizeNoIE();
}


/*
NOMBRE: Disminuye()
DEFINICION: Disminuye en 2 el tamaño de la fuente de la columna lateral y de la principal.
EVENTOS DE USO: Se le hace llamada en el divPpal dentro del archivo web7.js
PARAMETROS: Sin parámetros
*/
function Disminuye()
{	
	if (FUENTE_ACTUAL > 7)
	{
		FUENTE_ACTUAL = FUENTE_ACTUAL - 2;
		VwElementos('divColPpal', FUENTE_ACTUAL);
//		if (ID_NAV[0] != "0") ControlSizeNoIE();
	}	
}

/*
NOMBRE: VwElementos()
DEFINICION: Funcion especifica que da el atributo de aumentar y dismunuir el tamaño de las letras
EVENTOS DE USO: Se le hace llamada dentro del a funciones de Aumenta() y de Disminuye()
PARAMETROS: idelemento(ID del div a aumentar o disminuir su contenido) y sizetxt(n&uacute;emro 
de unidades a aumentar o disminuir el tamaño del texto)
*/
function VwElementos(idelemento, sizetxt)
{
	var mbody=document.getElementById(idelemento);
	if (mbody != null)
	{
		if (ID_NAV[0] == "0") // IE
		{
		  mbody.style.fontSize = sizetxt;
		}
		else 
		{		  
		  mbody.setAttribute("style", "font-size: " + sizetxt + "px");
		}
		
		Portag(mbody,'B', sizetxt);
		Portag(mbody,'TD', sizetxt);
		Portag(mbody,'DIV', sizetxt);
		Portag(mbody,'SPAN', sizetxt);
		Portag(mbody,'A', sizetxt);
	}
}


/*
NOMBRE: Portag()
DEFINICION: Funcion especifica que da el atributo de aumentar y dismunuir el tamaño de las letras
pero pasando el tag en cuestion
EVENTOS DE USO: Se le hace llamada dentro de la Funcion VwElementos().
PARAMETROS: mbody(representa todo el body del div Ppal) y mitag(representa el tag en concreto al que
se le va a aumentar o diminuir la letra)
*/
function Portag(mbody, mitag)
{
	var elementos = mbody.getElementsByTagName(mitag);
	for (var x=0;x<elementos.length;x++ ) 
	{	
		if (ID_NAV[0] == "0") // IE
		{
			elementos[x].style.fontSize = FUENTE_ACTUAL;
		}
		else 
		{		  
		  elementos[x].setAttribute("style", "font-size: " + FUENTE_ACTUAL + "px");
		}
	}
}


/*
NOMBRE: Imprime()
DEFINICION: Funcion que imprime el contenido de la columna principal
EVENTOS DE USO: Se le hace llamada en el evento click del las coordenadas mapeadas
de la imagen de la impresora dentro de la tira lateral.
PARAMETROS: Sin parámetros
*/
function Imprime()
{
	
	var ventana = window.open("", "", "");
	var tCateg = ""; 
	if (typeof(WWARBOL[ID_CATEG][0])!= 'undefined') 
	{
		tCateg = WWARBOL[ID_CATEG][0];
	}
	else 
	{
		tCateg = "Ayuntamiento de Granada";
	}
	
	var tSubCateg = "";
	
	if (typeof(WWARBOL[ID_CATEG][ID_SUBCATEG][0])!= 'undefined' && ID_SUBCATEG != 0) 
	{
		tSubCateg = WWARBOL[ID_CATEG][ID_SUBCATEG][0];
	}
	else tSubCateg = tSubCategAux;
	
	var contenido = "<html><head><link rel='stylesheet' href='"+miservidor+"/webv21.css' type=text/css></head><body onload=window.print(); bgcolor=#ffffff><script language='javascript' type='text/javascript'>function GenerarMapaSite(){};function pie(){document.getElementById('divColLateral').style.visibility='hidden'; document.getElementById('lblTitulo').style.visibility = 'hidden'; if (" + bEstas + " == true){document.getElementById('lblEstas').style.visibility = 'hidden';document.getElementById('lblInicio').style.visibility = 'hidden';document.getElementById('lblSigno').style.visibility = 'hidden';}}</script><DIV Class='textoContenido'><TABLE WIDTH=100% BORDER=1><TR VALIGN=top><TD WIDTH=20% BGCOLOR=ffffff><DIV ALIGN=center><P><IMG SRC=/v70/ESCU60.GIF WIDTH=59 HEIGHT=96 ALT=Escudo del Ayuntamiento de Granada></DIV></TD><TD WIDTH=60% BGCOLOR=ffffff COLSPAN=3><DIV ALIGN=center><B><FONT SIZE=5 style='font-family:Arial'>Ayuntamiento de Granada</FONT></B><BR><BR><FONT SIZE=3 style='font-family:Arial'>Categor&iacute;a: <b>" + tCateg + "</b></FONT><BR></DIV><BR></TD></TR><TR VALIGN=top><TD WIDTH=100% BGCOLOR=ffffff COLSPAN=5><FONT SIZE=3 style='font-family:Arial'>Subcategor&iacute;a: <B>"+ tSubCateg + "</B></FONT></TD></TR></TABLE><br><br>" + document.getElementById("divColPpal").innerHTML + "</DIV></body></html>";
	
	ventana.document.open();
	ventana.document.write(contenido);
	ventana.document.close();
	  
}

/*
NOMBRE: DevuelveTitCab()
DEFINICION: Funcion que devuelve un string calculado de la URL. Se usa cuando no vienen informados el idcateg 
ni el idsubcateg. 
EVENTOS DE USO: Se usa GenerarCabecera() para darle el value a la label de la imagen, y en GenerarPagina() para
darle value a la label del titulo de la categor&iacute;a en el divColPpal.
PARAMETROS: Sin parámetros
*/
function DevuelveTitCab()
{
	var sTitCabReturn = "";
//	if (location.href.indexOf("mapaweb") != -1) sTitCabReturn = "Mapa del sitio";
//	else if ((location.href.indexOf("ayuda/callejero") != -1) || (location.href.indexOf("ayuda/masinfo") != -1)) sTitCabReturn = "Ayuda Callejero";
//	else sTitCabReturn ="Ayuntamiento";	

	if (typeof(sTituloPagina) != "undefined")  sTitCabReturn = sTituloPagina;
	else sTitCabReturn ="Ayuntamiento";	
	return sTitCabReturn;
}

/* ****************FIN FUNCIONES PROPIAS DEL WEB7.JS**********************/
/*************************************************************************/


function MostrarDivConfig()
{
	if (document.getElementById('divConfig').style.display == "") document.getElementById('divConfig').style.display = "none"
	else document.getElementById('divConfig').style.display = "";
}

function muestra(id)
{
    document.getElementById(id).style.display = "";
}

function oculta(id)
{
    document.getElementById(id).style.display = "none";
}
function ocultadivss()
{
    document.getElementById("divss").style.display = "none";
}

function rellenadiv2(i,j,len,h)
{
    var id = j+""+h;
    var divss = document.getElementById(id);
    if (divss.innerHTML =="")
    {
        var sCad = "<ul>";
        for (k=0; k<len;k++)
        {            
            if (k>1)
            {
                var miServAux = miservidor;
                if ((WWARBOL[i][j][k][1]).substr(0,4) == "http") 
                {
                    miServAux = "";
                }	
                sCad = sCad + "<li style='width:"+ ANCHOSSUBCAT[i]+";'><a href='"+miServAux+""+(WWARBOL[i][j][k][1])+"'>"+(WWARBOL[i][j][k][0]).toLowerCase()+"</a></li>";
            }
        }
        divss.innerHTML= sCad + "</ul>";
    }     
}


function rellenaul(i,h)
{    
    var id = "ssc" + i;
    var divss = document.getElementById(id);
    if (divss.innerHTML =="")
    {
        var sCad="";
        sCad = sCad + "<ul>";	
	    var iLength = 0;
	    if (ID_NAV[0] == "0") iLength = WWARBOL[i].length - 1;//IE
	    else iLength = WWARBOL[i].length;//resto exp			
	    for(j=0; j<iLength;j++)
	    {	 
	      if (j!=0)
	      { 
		     var miServAux = miservidor;
		     if ((WWARBOL[i][j][1]).substr(0,4) == "http") 
		     {
			    miServAux = "";
		     }					 
	         //***************************************		      
	         h=h+1;
	         var iLengthSubCat = 0;//contador de subsubcategorias
             if (ID_NAV[0] == "0") iLengthSubCat = WWARBOL[i][j].length - 1;// IE
             else iLengthSubCat = WWARBOL[i][j].length;//resto exp
	         var sFunc = "javascript:muestra("+j+h+");rellenadiv2("+i+","+j+","+iLengthSubCat+","+h+")";
	         var sFuncOc = "javascript:oculta("+j+h+")";			     
	         if (iLengthSubCat>2) sCad = sCad + "<li style='width:"+ ANCHOSUBCAT[i]+"' onmouseover='"+sFunc+"' onmouseout='"+sFuncOc+"'><a href='"+miServAux+""+(WWARBOL[i][j][1])+"'>"+(WWARBOL[i][j][0]).toLowerCase()+"<img height='8' width='8' alt='' style='border-style: none; vertical-align: middle;' src='/v70/fdcha.gif'/></a>";
	         else sCad = sCad + "<li style='width:"+ ANCHOSUBCAT[i]+"' onmouseover='"+sFunc+"' onmouseout='"+sFuncOc+"'><a href='"+miServAux+""+(WWARBOL[i][j][1])+"'>"+(WWARBOL[i][j][0]).toLowerCase()+"</a>";
	         sCad = sCad + "<div id='divss' style='position: absolute; margin-top: -45px; margin-left: -15px; border-left: 1px solid white'><div id='"+j+h+"' style='margin-top: auto; display:none; margin-left: "+ ANCHOSUBCAT[i] +"' onmouseout='"+sFuncOc+"'>";
             
	         sCad = sCad + "</div></div>";
	         //***************************************			 
	         sCad = sCad + "</li>";    		 
	       }
	    }
	    sCad = sCad + "</ul>";
	    divss.innerHTML= sCad;   
    }


    
}

/*
NOMBRE: GenerarCodigo()
EVENTOS DE USO:
TIPO: Funcion sin parámetros de entrada.
PARAMETROS: Ninguno
DEFINICION: Generará con JS todo el codigo HTML de la página
*/
function GenerarCodigo()
{
		
	var direccionURL = document.location.href;

	// variables global para toda la funcion
	var srcAux = "";
	var txtAux = "";	
	var sCadCabecera = "";
	var imgBack = "";
	
	if (sAnchoPant == "800px" || sAnchoPant == "800") sAnchoPant = "778px";
	
	if (ID_CATEG == 0) imgBack = "/v70/ciudadvuelto.jpg"; // la ciudad
	else if (ID_CATEG == 1) imgBack = "/v70/ayuntamientovuelto.jpg"; // el ayuntamiento
	else if (ID_CATEG == 2) imgBack = "/v70/legislacionvuelto.jpg"; // legislacion
	else if (ID_CATEG == 3) imgBack = "/v70/serviciosvuelto .jpg"; // servicios
	else if (ID_CATEG == 4) imgBack = "/v70/culturavuelto .jpg"; // cultura
	else if (ID_CATEG == 5) imgBack = "/v70/empleovuelto.jpg"; // empleo
	else if (ID_CATEG == 6) imgBack = "/v70/bienestarsocialvuelto.jpg"; // bsocial
	else imgBack = "/v70/cabecera2vuelto.jpg"; 
	
	// INICIO creacion de la tabla cabecera (width='64%')
	sCadCabecera = "<table id='tablaPrincipal' align='center' width='"+sAnchoPant+"' cellpadding=0 cellspacing=0 style='margin-top: 12px'><tbody><tr><td colspan=2 background='"+imgBack+"' style='border-right: 1px solid #00457C; border-left: 1px solid #00457C'>"
	// primer div: ESCUDO 
	sCadCabecera = sCadCabecera + "<div id='divCabecera' style='background-color: #000000'>";
	sCadCabecera = sCadCabecera + "<a href='"+miservidor+"/inicio.htm'><img src='/v70/cabecera_granada1.gif' alt='Ayuntamiento de Granada' title='Ayuntamiento de Granada' width='344px' height='35px' border=0/></a>";
	sCadCabecera = sCadCabecera + "</div>";
	// creacion del div del BUSCADOR Y ACCESOS RáPIDOS
	sCadCabecera = sCadCabecera + "<div id='buscadorRapido' class='buscaAccesos'>";
	if (direccionURL.indexOf("wbuscar") == -1)
	{
		sCadCabecera = sCadCabecera + "<label>Buscar</label>";
		sCadCabecera = sCadCabecera + "<input id='query' class='stxt' type='text' style='height: 17px;' onkeypress='Intro(event);'/>";
		sCadCabecera = sCadCabecera + "<a><img class='imagenCentradaSinBorde' style='margin-top: 2px' src='/v70/buscar.gif' alt='Buscar' title='Buscar' onclick='Intro2()' onmouseover='ManoPointer(this);'/></a>";
	}
	sCadCabecera = sCadCabecera + "<a href='"+miservidor+"/inicio.htm'><img class='imagenCentradaBordeIzq' src='/v70/home.gif' alt='Inicio' title='Inicio'/></a>";
	sCadCabecera = sCadCabecera + "<a href='"+miservidor+"/mapaweb.htm'><img class='imagenCentradaBordeIzq' src='/v70/mapa.gif' alt='Mapa web' title='Mapa web'/></a>";
	sCadCabecera = sCadCabecera + "<a href='"+miservidor+"/sugweb.nsf'><img class='imagenCentradaBordeIzq' src='/v70/mail.gif' alt='Sugerencias' title='Sugerencias'/></a>";
	sCadCabecera = sCadCabecera + "<a href='javascript:MostrarDivConfig()'><img class='imagenCentradaBordeIzq' src='/v70/config.gif' alt='Configurar tama&ntilde;o pantalla' title='Configurar tama&ntilde;o pantalla'/></a>";
	sCadCabecera = sCadCabecera + "</div>";
	// div de configuracion
  
	sCadCabecera = sCadCabecera + "<div id='divConfig' style='display:none; text-align: center; background-color: #000000; width:300px; height: 50px; position: absolute; margin-left: 480px;'>";
	sCadCabecera = sCadCabecera + "<form id='formConfig'><table width='100%' height='70px' border='0' class='textoContenido' style='margin-bottom: 5px; background-color: #000000; color:#ffffff;'><tbody>";
	sCadCabecera = sCadCabecera + "<tr align='center'>";
	sCadCabecera = sCadCabecera + "<td align='right'>Porcentaje </td><td><input type='radio' name='cfgancho' value='100%'/>100%</td>";
	sCadCabecera = sCadCabecera + "<td><input type='radio' name='cfgancho' value='96%'/>96%</td>";
	sCadCabecera = sCadCabecera + "<td><input type='radio' name='cfgancho' value='86%'/>86%</td>",
	sCadCabecera = sCadCabecera + "<td><input type='radio' name='cfgancho' value='60%'/>60%</td>";
	sCadCabecera = sCadCabecera + "</tr>"
	sCadCabecera = sCadCabecera + "<tr align='center' style='border-bottom: 1px solid #ffffff'>";
	sCadCabecera = sCadCabecera + "<td align='right'>Pixels</td><td><input type='radio' name='cfgancho' value='1200'/>1200px</td>";
	sCadCabecera = sCadCabecera + "<td><input type='radio' name='cfgancho' value='1100'/>1100px</td>";
	sCadCabecera = sCadCabecera + "<td><input type='radio' name='cfgancho' value='1000'/>1000px</td>";
	sCadCabecera = sCadCabecera + "<td><input type='radio' checked='' name='cfgancho' value='800'/>800px</td>";
	sCadCabecera = sCadCabecera + "</tr>";
	sCadCabecera = sCadCabecera + "<tr>";	
	sCadCabecera = sCadCabecera + "<td colspan=3 align=right><a class='textoContenido' style='background-color: #000000; color:#ffffff; text-decoration: none' href='javascript:BorrarConfig();'>Borrar configuraci&oacute;n</a></td>";
	sCadCabecera = sCadCabecera + "<td colspan=1 align=right><a class='textoContenido' style='background-color: #000000; color:#ffffff; text-decoration: none' href='javascript:ActualizaConfig();'>Aceptar</a></td>";
	sCadCabecera = sCadCabecera + "<td colspan=1 align=right><a class='textoContenido' style='background-color: #000000; color:#ffffff; text-decoration: none' href='javascript:MostrarDivConfig();'>Cancelar</a></td>";
	sCadCabecera = sCadCabecera + "</tr>";
	sCadCabecera = sCadCabecera + "</tbody></table></form></div>";

		
	
	// segundo div :IMAGEN GRANADA	
	if (ID_CATEG == 0) srcAux = "/v70/cabecera_ciudad.jpg"; // la ciudad
	else if (ID_CATEG == 1) srcAux = "/v70/cabecera_ayto.jpg"; // el ayuntamiento
	else if (ID_CATEG == 2) srcAux = "/v70/cabecera_legislacion.jpg"; // legislacion
	else if (ID_CATEG == 3) srcAux = "/v70/cabecera_servicios.jpg"; // servicios
	else if (ID_CATEG == 4) srcAux = "/v70/cabecera_cultura.jpg"; // cultura
	else if (ID_CATEG == 5) srcAux = "/v70/cabecera_empleo.jpg"; // empleo
	else if (ID_CATEG == 6) srcAux = "/v70/cabecera_bsocial.jpg"; // bsocial
	else srcAux = "/v70/cabecera_granada2.jpg"; 
	
	// capa con el t&iacute;tulo de la imagen
	if (ID_CATEG == 0) txtAux = WWARBOL[0][0]; // la ciudad
	else if (ID_CATEG == 1) txtAux = WWARBOL[1][0]; // el ayuntamiento
	else if (ID_CATEG == 2) txtAux = WWARBOL[2][0]; // legislacion
	else if (ID_CATEG == 3) txtAux = WWARBOL[3][0]; // servicios
	else if (ID_CATEG == 4) txtAux = WWARBOL[4][0]; // cultura
	else if (ID_CATEG == 5) txtAux = WWARBOL[5][0]; // empleo
	else if (ID_CATEG == 6) txtAux = "Bienestar Social"; // bsocial
	else txtAux = DevuelveTitCab();
	sCadCabecera = sCadCabecera + "<div><img src='" + srcAux + "' alt='Imagen de Granada' title='Imagen de Granada' width='780px' height='100px' /><div class='tituloImagenCab'>"+txtAux+"</div></div>";
	
	// creacion del MENU: div CATEGORIAS 
	if (ID_NAV[0] == "0") sCadCabecera = sCadCabecera + "<div id='categorias' class='categoria'>";
	else sCadCabecera = sCadCabecera + "<div id='categorias' class='categoria' style='margin-top: -2px'>";
	
	
	sCadCabecera = sCadCabecera + "<ul id='nav' class='textoBlancoMenuHor'>"
	var h=100;
	for(i=0; i<WWARBOL.length;i++)
	{
	    h=h+1;
	    var sFunc = "javascript:rellenaul("+i+","+h+")";
		if (ID_CATEG != 9 && i==ID_CATEG) 
		{
		  if (WWARBOL[i][0] == "Bienestar Social") sCadCabecera = sCadCabecera + "<li onmouseover='"+sFunc+"' style='background: #507694'><a href='"+miservidor+"/inet/bsocial.nsf/inicio?openpage' onmouseover='ManoPointer(this);'>"+(WWARBOL[i][0]).toLowerCase()+"</a><div id='ssc"+i+"'>";
		  else sCadCabecera = sCadCabecera + "<li onmouseover='"+sFunc+"' style='background: #507694'><a href='"+miservidor+"#'>"+(WWARBOL[i][0]).toLowerCase()+"</a><div id='ssc"+i+"'>";
		}
		else 
		{
		  if (WWARBOL[i][0] == "Bienestar Social") sCadCabecera = sCadCabecera + "<li onmouseover='"+sFunc+"'><a href='"+miservidor+"/inet/bsocial.nsf/inicio?openpage' onmouseover='ManoPointer(this);'>"+(WWARBOL[i][0]).toLowerCase()+"</a><div id='ssc"+i+"'>";
		  else sCadCabecera = sCadCabecera + "<li onmouseover='"+sFunc+"'><a href='"+miservidor+"#'>"+(WWARBOL[i][0]).toLowerCase()+"</a><div id='ssc"+i+"'>";
		}	
		
		
		
		sCadCabecera = sCadCabecera + "</div></li>";
	}
	sCadCabecera = sCadCabecera + "</ul></div>";
	
	
	// FINAL cierre de la fila cabecera
	sCadCabecera = sCadCabecera + "</td></tr>";
	document.write(sCadCabecera); 
	
	// INICIO creacion de la fila cuerpo
	var sCadCuerpo = "";
	sCadCuerpo = "<tr><td id='tdColLat' class='stTdColLateral' width='184px'>";
	sCadCuerpo = sCadCuerpo + "<div id='divCol1' class='columnaLateral'>";
	
	// creacion del menu de la columna lateral
	// Tema_ESTILOS
	//if (ID_NAV[0] == "9") elem_ul.setAttribute("style", "padding-top: 15px");//Opera
	var iLengthCat = 0;
		
	if (ID_CATEG == 99 && ID_SUBCATEG == 99) 
	{
		ID_CATEG = iID_CATEG;// variable tipo int definida en variables globales para ver que categor&iacute;a mostrar en la columna lateral
		ID_SUBCATEG = 0;
		// variable boleana para ver si los  valores de IDCATEG y de IDSUBCATEG vienen informados
		bEstas = false;
	}
	else
	{
		// si idcateg e idsubcateg son distintos de 99 vemos si son validos respecto a WWARBOL
		if (EsSubCatValida(ID_CATEG, ID_SUBCATEG) == false)
		{
		  ID_CATEG = iID_CATEG;// variable tipo int definida más arriba para ver que categor&iacute;a mostrar en la columna lateral
		  ID_SUBCATEG = 0;
		  bEstas = false;
		}	
	}  
		
	// creacion de la label de la categoria
	sCadCuerpo = sCadCuerpo + "<label class='textoAzulTitulos' style='margin-top: 10px;';>"+WWARBOL[ID_CATEG][0]+"</label>";		 
	//creacion de la linea simple azul  
    sCadCuerpo = sCadCuerpo + "<table width='92%' style='border-top:#00457c 1px solid' align=center><tr><td></td></tr></table>";
	if (ID_NAV[0] == "9") sCadCuerpo = sCadCuerpo + "<ul class='textoMenuGrisVertical' style='margin-top: 18px'>";
	else sCadCuerpo = sCadCuerpo + "<ul class='textoMenuGrisVertical'>";
	  
	  
	
	if (ID_NAV[0] == "0") iLengthCat = WWARBOL[ID_CATEG].length - 1; //IE
	else iLengthCat = WWARBOL[ID_CATEG].length; // resto exp
	for(j=0; j<iLengthCat;j++)
	{	 
		if (j>0)
		{	
		  // tratamiento de los elementos de la subcategoria
		  if (j==ID_SUBCATEG)
		  {
			 var iLengthSubCat = 0;
			 if (ID_NAV[0] == "0") iLengthSubCat = WWARBOL[ID_CATEG][ID_SUBCATEG].length - 1;// IE
			 else iLengthSubCat = WWARBOL[ID_CATEG][ID_SUBCATEG].length;//resto exp
			 
			 if (j!=(iLengthCat-1))
			 {
				if (ID_NAV[0] == "9") sCadCuerpo = sCadCuerpo + "<li style='padding-top: 3px; padding-bottom: 3px'>";// opera 
				else sCadCuerpo = sCadCuerpo + "<li>";
			 }
			 else
			 {
				if (ID_NAV[0] == "9") sCadCuerpo = sCadCuerpo + "<li style='padding-top: 3px; padding-bottom: 3px; border-bottom: 1px solid #00467E'>";// opera 
				else sCadCuerpo = sCadCuerpo + "<li style='border-bottom: 1px solid #00467E'>";				 
			 } 
			 if (typeof(sTituloPagina) == "undefined")	
			 {	  
				var miServAux = miservidor;
				if ((WWARBOL[ID_CATEG][ID_SUBCATEG][1]).substr(0,4) == "http") miServAux = "";	  
				sCadCuerpo = sCadCuerpo + "<img src='/v70/vin_tazul.gif'/><a style='color: #00467E' href='"+miServAux+""+ WWARBOL[ID_CATEG][ID_SUBCATEG][1] +"'>"+WWARBOL[ID_CATEG][ID_SUBCATEG][0]+"</a>";
				sCadCuerpo = sCadCuerpo + "<ul class='textoMenuGrisVertical'>";
			 
				for (k=0; k<iLengthSubCat;k++)
				{
					if (k>1)
					{
						if (k!=(iLengthSubCat-1))
						{
						  if (ID_NAV[0] == "9") sCadCuerpo = sCadCuerpo + "<li style='padding-top: 3px; padding-bottom: 3px'>";// opera 
						  else sCadCuerpo = sCadCuerpo + "<li>"; 
						}
						else 
						{
						  //esto oculta la ultima linea gris de las sub-subcategorias en el menu vertical
						  if (ID_NAV[0] == "9") sCadCuerpo = sCadCuerpo + "<li style='padding-top: 3px; padding-bottom: 3px'; border-bottom: 0px solid>";// opera 
						  else sCadCuerpo = sCadCuerpo + "<li style='border-bottom: 0px solid'>";
						}
						// si es la subcategor&iacute;a seleccionada la ponemos azul
						var miServAux = miservidor;
						if ((WWARBOL[ID_CATEG][ID_SUBCATEG][k][1]).substr(0,4) == "http") miServAux = "";
						if (k == ID_SSCATEG) sCadCuerpo = sCadCuerpo + "<img src='/v70/vin_tazul.gif'/><a style='color: #00467E' href='"+miServAux+""+ WWARBOL[ID_CATEG][ID_SUBCATEG][k][1] +"'>"+WWARBOL[ID_CATEG][ID_SUBCATEG][k][0]+"</a></li>";
						else sCadCuerpo = sCadCuerpo + "<img src='/v70/vin_gris.gif'/><a href='"+miServAux+""+ WWARBOL[ID_CATEG][ID_SUBCATEG][k][1] +"'>"+WWARBOL[ID_CATEG][ID_SUBCATEG][k][0]+"</a></li>";			
					}
				}
				sCadCuerpo = sCadCuerpo + "</ul></li>";
			 }
			 else 
			 {
				var miServAux = miservidor;
				if ((WWARBOL[ID_CATEG][ID_SUBCATEG][1]).substr(0,4) == "http") miServAux = "";
				sCadCuerpo = sCadCuerpo + "<img src='/v70/vin_azul.gif'/><a style='color: #00467E' href='"+miServAux+""+ WWARBOL[ID_CATEG][ID_SUBCATEG][1] +"'>"+WWARBOL[ID_CATEG][ID_SUBCATEG][0]+"</a>";
			 
			 }
			 
		  }
		  else
		  {
			 
			 // si la tercera coordenada de windice no vale 0 o no está informada se 
			 // veran todas las subcategor&iacute;as de la categor&iacute;a
			 if (ID_EXPAND != 0)
			 {
				if (j!=(iLengthCat-1))
				{
					if (ID_NAV[0] == "9") sCadCuerpo = sCadCuerpo + "<li style='padding-top: 3px; padding-bottom: 3px'>";// opera 
					else sCadCuerpo = sCadCuerpo + "<li>";
				}
				else
				{
					if (ID_NAV[0] == "9") sCadCuerpo = sCadCuerpo + "<li style='padding-top: 3px; padding-bottom: 3px; border-bottom: 1px solid #00467E'>";// opera 
					else sCadCuerpo = sCadCuerpo + "<li style='border-bottom: 1px solid #00467E'>";				 
				}
				var miServAux = miservidor;
				if ((WWARBOL[ID_CATEG][j][1]).substr(0,4) == "http") miServAux = "";
				sCadCuerpo = sCadCuerpo + "<img src='/v70/vin_azul.gif'/><a style='color: #00467E' href='"+miServAux+""+ WWARBOL[ID_CATEG][j][1] +"'>"+WWARBOL[ID_CATEG][j][0]+"</a></li>";
			 }				
		  }		  
		}						 
	}
	
	sCadCuerpo = sCadCuerpo + "</ul>"; 
	sCadCuerpo = sCadCuerpo + "<div class='lineaHorAzulSimple' style='margin-left: 9px;'></div><br>";
	
	//saca banner
	if (typeof(WWBANNER[ID_CATEG][ID_SUBCATEG]) != "undefined")  sCadCuerpo = sCadCuerpo + "<div>"+WWBANNER[ID_CATEG][ID_SUBCATEG]+"</div>";
	else sCadCuerpo = sCadCuerpo + "<div>"+WWBANNER[ID_CATEG][0]+"</div>";
	
	//cerrar el divCol1
	sCadCuerpo = sCadCuerpo + "</div>";
	//cerrar el tdColLateral
	sCadCuerpo = sCadCuerpo + "</td>";	
	
	// creacion de la celda de la columna PRINCIPAL
	if (ID_NAV[0] == "0") 
	{
		//alert("formando el td donde el sAnchoPant vale: " + sAnchoPant + " y sPorcentCue vale: " + sPorcentCue);
		sCadCuerpo = sCadCuerpo + "<td id='tdColPpal' class='stTdColPpal' width='"+sPorcentCue+"'>";
	}
	else sCadCuerpo = sCadCuerpo + "<td id='tdColPpal' class='stTdColPpal' style='border-top: 24px solid #00457C;'>";
	// "TABLA ROJA": 1ª TR contenida en el tdColPpal: TRTitulo (tendrá el tdTitulo)
	sCadCuerpo = sCadCuerpo + "<table width='100%' height='100%' cellpadding=0 cellspacing=0  style='padding-right: 9px'><tbody><tr><td class='stTdColTitulo' style='padding-bottom: 0px'>";
	
	
	// SECCION DE "ESTAS EN"
	if (bEstas == true)
	{
		
		// llamada a la funcion EsSubCatValida, devuelve false si el ID_SUBCATEG 
		// es mayor que el calculado del array WWARBOL para el ID_CATEG que traemos
		if (EsSubCatValida(ID_CATEG, ID_SUBCATEG) == true)
		{
		  if (typeof(sTituloPagina) != "undefined")
		  {
			 sCadCuerpo = sCadCuerpo + "<label id='lblEstas' class='textoNegroEstas' style='margin-left: 1px'>Est&aacute;s en: </label>";
			 sCadCuerpo = sCadCuerpo + "<label id='lblInicio' class='textoNegroEstas' style='text-decoration: underline; cursor: pointer;' onclick=window.open('/inicio.htm')> Inicio</label>";
			 sCadCuerpo = sCadCuerpo + "<label id='lblSigno' class='textoNegroEstas'>"+" > " + sTituloPagina+"</label><br>";
			 sCadCuerpo = sCadCuerpo + "<hr style='visibility: hidden'/><label id='lblTitulo' class='textoAzulTitulos' style='padding-left:10px;'>"+sTituloPagina+"</label>";
		  
		  }
		  else
		  {
			 // ultimo sitio del estas en
			 if (ID_SSCATEG == 99) // no viene informada la subsubcategoria
			 {		  
				sCadCuerpo = sCadCuerpo + "<label id='lblEstas' class='textoNegroEstas' style='margin-left: 1px;'>Est&aacute;s en: </label>";
				sCadCuerpo = sCadCuerpo + "<label id='lblInicio' class='textoNegroEstas' style='text-decoration: underline; cursor: pointer;' onclick=window.open('/inicio.htm') > Inicio</label>";
				sCadCuerpo = sCadCuerpo + "<label id='lblSigno' class='textoNegroEstas'>"+ " > " + WWARBOL[ID_CATEG][0] + " > " + WWARBOL[ID_CATEG][ID_SUBCATEG][0]+"</label><br>";
				sCadCuerpo = sCadCuerpo + "<hr style='visibility: hidden'/><label id='lblTitulo' class='textoAzulTitulos' style='padding-left: 10px;'>"+WWARBOL[ID_CATEG][ID_SUBCATEG][0]+"</label>";
			 }
			 else// viene informada la subsubcategoria
			 {
				sCadCuerpo = sCadCuerpo + "<label id='lblEstas' class='textoNegroEstas' style='margin-left: 1px'>Est&aacute;s en: </label>";
				sCadCuerpo = sCadCuerpo + "<label id='lblInicio' class='textoNegroEstas' style='text-decoration: underline; cursor: pointer;' onclick=window.open('/inicio.htm')> Inicio</label>";
				sCadCuerpo = sCadCuerpo + "<label id='lblSigno' class='textoNegroEstas'>"+" > " + WWARBOL[ID_CATEG][0] + " > " + WWARBOL[ID_CATEG][ID_SUBCATEG][0] + " > " + WWARBOL[ID_CATEG][ID_SUBCATEG][ID_SSCATEG][0]+"</label><br>";
				sCadCuerpo = sCadCuerpo + "<hr style='visibility: hidden'/><label id='lblTitulo' class='textoAzulTitulos' style='padding-left:10px;'>"+WWARBOL[ID_CATEG][ID_SUBCATEG][0] + " - " + WWARBOL[ID_CATEG][ID_SUBCATEG][ID_SSCATEG][0]+"</label>";
			 }
		  }
					
		}
		else// no viene informada la subcategor&iacute;a, solo pondremos la categoria
		{
		  sCadCuerpo = sCadCuerpo + "<label id='lblEstas' class='textoNegroEstas' style='margin-left: 1px'>Est&aacute;s en: </label>";
		  sCadCuerpo = sCadCuerpo + "<label id='lblInicio' class='textoNegroEstas' style='text-decoration: underline; cursor: pointer;' onclick=window.open('/inicio.htm')> Inicio</label>";
		  sCadCuerpo = sCadCuerpo + "<label id='lblSigno' class='textoNegroEstas'>"+" > " + WWARBOL[ID_CATEG][0]+"</label><br>";
		  sCadCuerpo = sCadCuerpo + "<hr style='visibility: hidden'/><label id='lblTitulo' class='textoAzulTitulos' style='padding-left:10px;'>"+WWARBOL[ID_CATEG][0]+"</label>";
		}
	}
	else
	{
		var sTitCab = DevuelveTitCab();
		sCadCuerpo = sCadCuerpo + "<hr style='visibility: hidden'/><label id='lblTitulo' class='textoAzulTitulos' style='padding-left:10px;'>"+sTitCab+"</label>";
	}
	
	if (ID_NAV[0] == "0") sCadCuerpo = sCadCuerpo + "<hr style='margin-top: -5px; margin-bottom: 0px' size=1 width='100%'/>"
	else sCadCuerpo = sCadCuerpo + "<hr style='margin-top: 2px; margin-bottom: 0px' size=1 />"
	// FINAL cierre de la 1ª TR titulo y el td colspan=2
	sCadCuerpo = sCadCuerpo + "</td></tr></tbody></table>";
	
	
	
	// 2ª TR contenida en el tdColPpal: TRContent: tendrá div ppal tdTira.setAttribute("valign", "top"); 
//	if (ID_NAV[0] == "0") sCadCuerpo = sCadCuerpo + "<table id='tablaContent' width='100%' cellpadding=0 cellspacing=0 style='padding-right:9px; margin-top: -8px'><tbody><tr><td id='idTdColTira' class='stTdColTira' style='padding-bottom: 0px' valign='top'><div id='divColLateral' class='columnaTiraLateral'>";
//	else sCadCuerpo = sCadCuerpo + "<table id='tablaContent' width='100%' cellpadding=0 cellspacing=0 style='padding-right:9px;'><tbody><tr><td id='idTdColTira' class='stTdColTira' style='padding-bottom: 0px' valign='top'><div id='divColLateral' class='columnaTiraLateral' style='margin-top:-2px;'>";

	if (ID_NAV[0] == "0") sCadCuerpo = sCadCuerpo + "<table id='tablaContent' width='100%' cellpadding=0 cellspacing=0 style='margin-top: -8px'><tbody><tr><td id='idTdColTira' class='stTdColTira' style='padding-bottom: 0px' valign='top'><div id='divColLateral' class='columnaTiraLateral' style='margin-top:-9px;'>";
	else sCadCuerpo = sCadCuerpo + "<table id='tablaContent' width='100%' cellpadding=0 cellspacing=0><tbody><tr><td id='idTdColTira' style='padding-bottom: 0px;' valign='top' width='42px'><div id='divColLateral' class='columnaTiraLateral' style='margin-top:-2px; padding-right: 25px'>";
	
	// tira lateral
	sCadCuerpo = sCadCuerpo + "<map name='tira_lateral'>";
	sCadCuerpo = sCadCuerpo + "<area shape='rect' title='Imprimir p&aacute;gina' alt='Imprimir p&aacute;gina' coords='1,2,19,22' href='javascript:Imprime()'>";
	sCadCuerpo = sCadCuerpo + "<area shape='rect' title='Enviar p&aacute;gina' alt='Enviar p&aacute;gina' coords='2,27,20,48' href='mailto:?subject=Visita esta URL: " + document.title + "&body=Visita la siguente URL:  " + location.href + " . Seguro que te va a gustar! Saludos.' target='_blank'>";
	sCadCuerpo = sCadCuerpo + "<area shape='rect' title='Aumentar tama&ntilde;o texto' alt='Aumentar tama&ntilde;o texto' coords='3,53,20,69' href='javascript:Aumenta()'>";
	sCadCuerpo = sCadCuerpo + "<area shape='rect' title='Disminuir tama&ntilde;o texto' alt='Disminuir tama&ntilde;o texto' coords='3,78,21,90' href='javascript:Disminuye()'>";
	sCadCuerpo = sCadCuerpo + "</map>";
	sCadCuerpo = sCadCuerpo + "<img class='imagenCentradaCuerpo' src='/v70/tira_lateral.gif' usemap='#tira_lateral'></div>";
	
	// FINAL cierre de la tdColTira
	sCadCuerpo = sCadCuerpo + "</td>";
	
	//creacion de la td del div PPAL
	if (ID_NAV[0] == "0") sCadCuerpo = sCadCuerpo + "<td style='padding-right: 15px'><div id='divColPpal' class='columnaPrincipal'>"; 
	else sCadCuerpo = sCadCuerpo + "<td style='padding-right: 10px'><div id='divColPpal' class='columnaPrincipal'>"; 
	
	// FINAL cierre de la tabla cuerpo
	//sCadCuerpo = sCadCuerpo + "</td></tr></tbody></table>";
	document.write(sCadCuerpo);
}

/*
NOMBRE: CerrarParrafo()
DEFINICION: Para IE cerrará la etiqueta <p> que se genera automaticamente desde Lotus.
TIPO: Funcion sin parámetros de entrada.
EVENTOS DE USO: Se llamará justo antes de generar la cabecera.
PARAMETROS: Ninguno
*/
function CerrarParrafo()
{	
	if (ID_NAV[0] == "0")// solo para IE
	{
		var sInner = LTrim(document.body.innerHTML);
		var sInnerL = sInner.toLowerCase();
		if (sInnerL.substr(0,3) == "<p>")
		{
		  document.write("</p>");
		  bCreadoP = true;
		}
	}	
}

/*
NOMBRE: LTrim()
DEFINICION: Devuelve una cadena sin los espacios del principio.
EVENTOS DE USO: Se llamará en la funcion CerrarPArrafo.
PARAMETROS: Ninguno
*/
function LTrim(s){
	var i=0;
	var j=0;
	
	// Busca el primer caracter <> de un espacio
	for(i=0; i<=s.length-1; i++)
		if(s.substring(i,i+1) != ' '){
			j=i;
			break;
		}
	return s.substring(j, s.length);
}


// llamada a las funciones
CerrarParrafo();
GenerarCodigo();


/*
NOMBRE: pie()
DEFINICION: Generará con JS el pie de la portada
TIPO: Funcion sin parámetros de entrada.
EVENTOS DE USO: Se le hace llamada al final de cada página: portada y resto
PARAMETROS: Ninguno
*/
function pie(){


var sCadPie = "";
	var Digital=new Date();
	var year=Digital.getFullYear();
	sCadPie = "</div></td></tr></tbody></table></td></tr>";// fin de la fila central(la del cuerpo: columna lateral y principal)
	// inicio de la fila del pie	
	sCadPie = sCadPie + "<tr><td colspan=2 bgcolor='#00457c'>";
	//CON IMAGEN 3WC: sCadPie = sCadPie + "<table cellpadding=0 cellspacing=0 width=100%><tbody><tr><td bgcolor='#00457c' align='center'><div id='divPie' class='pie'><div id='textoCentrado' class='textoBlancoMenuHor'>Ayuntamiento de Granada. Todos los derechos reservados. &copy; 1998-"+year+"</div><div class='textoBlancoPie'>Plaza del Carmen n&deg; 5 | 18071 Granada | Tel. Centralita 958 248 100 | <a href='"+miservidor+"/inet/hwgr.nsf/corta/FB4A?opendocument' style='color: #ffffff'>Informaci&oacute;n 010</a></div></div></td><td align='right' bgcolor='#00457c' width='100px'><img src='/v70/w3cAA.gif' style='border: 1px solid #00457c; height: 20px; width: 60px' title='Página accesible para el Contenido Web 1.0 con el nivel Doble A' alt='Página accesible para el Contenido Web 1.0 con el nivel Doble A' /></td></tr></tbody></table>";
	sCadPie = sCadPie + "<table cellpadding=0 cellspacing=0 width=100%><tbody><tr><td bgcolor='#00457c' align='center'><div id='divPie' class='pie'><div id='textoCentrado' class='textoBlancoMenuHor'>Ayuntamiento de Granada. Todos los derechos reservados. &copy; 1998-"+year+"</div><div class='textoBlancoPie'>Plaza del Carmen n&deg; 5 | 18071 Granada | Tel. Centralita 958 248 100 | <a href='"+miservidor+"/inet/hwgr.nsf/corta/FB4A?opendocument' style='color: #ffffff'>Informaci&oacute;n 010</a></div></div></td></td></tr></tbody></table>";
	sCadPie = sCadPie + "</td></tr></tbody></table>";
	document.write(sCadPie);
	var dMiBody = document.getElementById("mibody7");
	AsignarAccesibilidad(dMiBody, "mibody7"); 
	dMiBody = document.getElementById("mibody");
	AsignarAccesibilidad(dMiBody, "mibody");
}
  

/*
NOMBRE: AsignarAccesibilidad()
DEFINICION: Le asignará el alt y el title a cada una de las fotos del elemento pasado como parámetro
TIPO: Funcion con parámetros de entrada.
EVENTOS DE USO: Se le hace llamada en la Funcion pie()
PARAMETROS: elemento; en el caso usado es el div mibody
*/
function AsignarAccesibilidad(elemento, idDivPrimario)
{
	
	if (elemento != null)
	{
		/* Si el elemento tiene hijos, los exploramos recursivamente */
		if(elemento.childNodes.length > 0)
		{
		  for(var i=0; i<elemento.childNodes.length ; i++)
		  {
			 AsignarAccesibilidad(elemento.childNodes.item(i), idDivPrimario);
		  }
		}
		
		/* Comprobamos si el elemento es de tipo Imagen */
		if(elemento.tagName == "IMG")
		{
		  if (typeof(elemento.alt) == "undefined") elemento.setAttribute("alt", document.title);
		  if (elemento.alt.length < 3) elemento.setAttribute("alt", document.title)
		  else elemento.setAttribute("alt", elemento.alt+" ");
		  
		  if (typeof(elemento.title) == "undefined") elemento.setAttribute("title", elemento.alt);
		  if (elemento.title.length <3 ) elemento.setAttribute("title", elemento.alt);
		  if (idDivPrimario == "mibody7") elemento.setAttribute("border", 1);//diseño para las fotos
		}
		//if(elemento.tagName == "TABLE") elemento.setAttribute("border", 0);
	}
} 



/*
NOMBRE: GenerarMapaSite()
DEFINICION: Generará el contenido de la página "mapaweb.html"
TIPO: Funcion sin parámetros de entrada.
EVENTOS DE USO: Se le hace llamada en la página "mapaweb.html"
PARAMETROS: Ninguno
*/
function GenerarMapaSite()
{ 

	setmenus();
	// variable contadora del bucle de categorias
	var iCont = 0;
	var n=0;
	//detaccion del div ce la columna principal
	var divColPpal = document.getElementById("divColPpal");
	
	// creacion de la tabla contenedora de mapa del sitio
	var tableMap = document.createElement("table");
	tableMap.setAttribute("width", "95%");
	tableMap.setAttribute("cellSpacing", 0);
	tableMap.setAttribute("cellPadding", 0);
			
	// creacion del tbody
	var tBodyMap = document.createElement("tbody");
		
	
	// creacion de la fila contenedora de las dos celdas
	var trMap = document.createElement("tr");
	trMap.setAttribute("style", "text-decoration:none; list-style: none; valign:top");
	
	// creacion de una de las celdas contenedoras de las dos celdas
	var tdMap1 = document.createElement("td");
	if (ID_NAV[0] == "0") 
	{
		tdMap1.style.verticalAlign = "top";
		tdMap1.style.width = "270px";
	}
	else tdMap1.setAttribute("style", "vertical-align: top; width:200px");
	
	// creacion de una de las celdas contenedoras de las dos celdas
	var tdMap2 = document.createElement("td");
	if (ID_NAV[0] == "0") 
	{	
		tdMap2.style.verticalAlign = "top";
		tdMap2.style.width = "260px";
	}
	else tdMap2.setAttribute("style", "vertical-align: top; width:200px");
		
	// recorrido por las categor&iacute;as
	for(i=0; i<WWARBOL.length;i++)
	{
		// creacion de las <a> de las categorias
		var elem_a_cat = document.createElement("a");
		var elem_atext_cat = document.createTextNode((WWARBOL[i][0]));
		//elem_a_cat.setAttribute("href", "#");
		elem_a_cat.appendChild(elem_atext_cat);
			 
		// creacion del div cat
		var divcat = document.createElement("div");
		divcat.className = "tablaContenido"; 
		divcat.style.marginBottom = "5px"; 
		divcat.style.fontWeight = "bold"; 
		//divcat.style.width = "200px"; 
		// añadir los a_cat al divcat
		divcat.appendChild(elem_a_cat);		
						
		// creacion de los <ul> que contendrán las categorias
		var elem_ul_cat = document.createElement("ul"); 
		
		// añadir los <divcat> al <ul_cat>
		elem_ul_cat.appendChild(divcat);
					
		var iLength = 0;
		if (ID_NAV[0] == "0") iLength = WWARBOL[i].length - 1;//IE
		else iLength = WWARBOL[i].length;//resto exp
		
				
		// recorrido por las subcategorias	
		for(j=0; j<iLength;j++)
		{	
		  if (j!=0)
		  {	
			 var iLengthSubCat = 0;
			 //tratamiento de las subcategorias
			 if (ID_NAV[0] == "0") iLengthSubCat = WWARBOL[i][j].length - 1;// IE
			 else iLengthSubCat = WWARBOL[i][j].length;//resto exp
			 // creacion de los <li_sub> de las subcategorias	
			 var img = document.createElement("img");
			 if (iLengthSubCat>2)  
			 {
				img.setAttribute("src", "/v70/vin_tazul2.gif");
				img.setAttribute("id", WWARBOL[i][j][0].substr(0,2) + n)
			 }
			 else img.setAttribute("src", "/v70/vin_azul.gif");
			 
			 if (ID_NAV[0] == "0") img.style.marginRight= "4px";
			 else img.setAttribute("style", "margin-right: 4px");
			 var elem_li_sub = document.createElement("li");
			 elem_li_sub.style.listStyle = "none";
			 elem_li_sub.style.marginLeft = "10px";
			 elem_li_sub.style.color ="#00457c";
			 var elem_a_sub = document.createElement("a");
			 elem_atext_sub = document.createTextNode((reemplazaacute(WWARBOL[i][j][0])));
			 var elem_atext_sub;
			 if (iLengthSubCat>2)  
			 {
				//elem_atext_sub = document.createTextNode((WWARBOL[i][j][0] + " [+]"));
				elem_a_sub.setAttribute("href", ("javascript:Menus('"+WWARBOL[i][j][0].substr(0,1) + n +"', '"+WWARBOL[i][j][0].substr(0,2) + n+"')"));				
				elem_a_sub.style.cursor='pointer';
			 }
			 else  
			 {
				//elem_atext_sub = document.createTextNode((WWARBOL[i][j][0]));
				elem_a_sub.setAttribute("href", (WWARBOL[i][j][1]));
			 }
						  
			 elem_a_sub.appendChild(elem_atext_sub);
			 elem_li_sub.appendChild(img);
			 elem_li_sub.appendChild(elem_a_sub);
			 //añadir cada <li_sub> subcat al <ul_sub> que cuelga de cada <li_cat> de categoria			 
			 
			 
			 //alert("len de " + WWARBOL[i][j][0] +": " + iLengthSubCat);
			 if (iLengthSubCat>2)
			 {
				var elem_ul2 = document.createElement("ul");
				elem_ul2.className = "textoMenuGrisVertical";
				elem_ul2.setAttribute("id", WWARBOL[i][j][0].substr(0,1) + n);
				n++;
				for (k=0; k<iLengthSubCat;k++)
				{
					if (k>1)
					{
						// crear los <li> de las subcategorias
						var elem_li2 = document.createElement("li");
						// Tema_ESTILOS
						elem_li2.style.display = "none";
						if (ID_NAV[0] == "9") elem_li2.setAttribute("style", "padding-top: 6px");// opera
						
						var elem_a2 = document.createElement("a");
						var elem_atext2 = document.createTextNode(reemplazaacute(WWARBOL[i][j][k][0]));	
						elem_a2.setAttribute("href", WWARBOL[i][j][k][1]);
						elem_a2.appendChild(elem_atext2);
						var img2 = document.createElement("img");
						img2.setAttribute("src", "/v70/vin_azulh.gif");
						elem_li2.appendChild(img2);
						elem_li2.appendChild(elem_a2);
						elem_li2.style.borderBottom ="0px solid";
						elem_li2.style.paddingLeft ="25px";
						elem_ul2.appendChild(elem_li2);				
					}
				}
				elem_li_sub.appendChild(elem_ul2);
			 }	
			 elem_ul_cat.appendChild(elem_li_sub); 
		  }		  
		}	  
		
		// aumento del contador
		iCont++;
		if (iCont<5) 
		{
		  tdMap1.appendChild(elem_ul_cat);
		  // añadir el td al tr
		  trMap.appendChild(tdMap1);
		}
		else
		{
		  tdMap2.appendChild(elem_ul_cat);
		  // añadir el td al tr
		  trMap.appendChild(tdMap2);
		}
	}	  
	  
	// añadir el tr a la tabla
	tBodyMap.appendChild(trMap);
	
	// añadir el tr a la tabla
	tableMap.appendChild(tBodyMap);
	
	// añadir la tabla al div de categorias
	divColPpal.appendChild(tableMap);	  
} 

//ReemplazaTodo(string, text, by).replace(/[.]/g,''); 
function reemplazaacute(texto)
{
	texto = texto.replace(/&aacute;/g, "á")
	texto = texto.replace(/&Aacute;/g, "Á")
	texto = texto.replace(/&eacute;/g, "é")
	texto = texto.replace(/&Eacute;/g, "É")
	texto = texto.replace(/&iacute;/g, "í")
	texto = texto.replace(/&Iacute;/g, "Í")
	texto = texto.replace(/&oacute;/g, "ó")
	texto = texto.replace(/&Oacute;/g, "Ó")
	texto = texto.replace(/&uacute;/g, "ú")
	texto = texto.replace(/&Uacute;/g, "Ú")
	texto = texto.replace(/&iquest;/g, "¿") 
	
	return texto
}


/*FUNCIONES RELACIONADAS CON EL PLEGADO DE MENU*/
var menusweb = new Array();
function setmenus()
{
	var n=0;
	for(i=0; i<WWARBOL.length;i++)
	{			  
		var iLength = 0;
		if (ID_NAV[0] == "0") iLength = WWARBOL[i].length - 1;//IE
		else iLength = WWARBOL[i].length;//resto exp		 
		// recorrido por las subcategorias	
		for(j=0; j<iLength;j++)
		{	
		  if (j!=0)
		  {				
			 //tratamiento de las subcategorias
			
			 var iLengthSubCat = 0;
			 if (ID_NAV[0] == "0") iLengthSubCat = WWARBOL[i][j].length - 1;// IE
			 else iLengthSubCat = WWARBOL[i][j].length;//resto exp			 
			 if (iLengthSubCat>2)
			 {				
				menusweb[n] = WWARBOL[i][j][0].substr(0,1) + n;  
				n++;			  
			 }	
			
		  }		  
		} 
	}
}


function Menus(ident, idImg)
{	
	var nose = "";
	nose = ident;
	
	if(document.getElementById(nose).childNodes.item(0).style.display == "none") 
	{
		Desplegar(nose);
	}
	else 
	{
		Plegar(nose);
	}
	document.getElementById(idImg).setAttribute("src", "/v70/vin_tazul3.gif");
}


/* Despliega el Men&uacute; (UL) seleccionado */
function Desplegar(id)
{
	/* Plegamos todos menos el indicado */
	PlegarTodos(id);

	/* Desplegamos el indicado */
	var i=0;
	var numElems = document.getElementById(id).childNodes.length;
	funcAsync = null;
	
	setTimeout(funcAsync = function(evt)
	{
		if(i < numElems)
		{
		  if(document.getElementById(id).childNodes.item(i).tagName == "LI")
		  {
			 document.getElementById(id).childNodes.item(i).style.display = "";
			 //document.getElementById(id).parentNode.firstChild.setAttribute("src", "/v70/vin_tazul2.gif");  
		  }		
		  i++;		  
		  if(i <= numElems) setTimeout(funcAsync,10);
		}
	},10);	
}

/* Pliega el Men&uacute; (UL) seleccionado */
function Plegar(id)
{
	var i = document.getElementById(id).childNodes.length-1;
	funcAsync = null;
	
	setTimeout(funcAsync = function(evt)
	{
		if(i >= 0)
		{
		  if(document.getElementById(id).childNodes.item(i).tagName == "LI")
		  {
			 document.getElementById(id).childNodes.item(i).style.display = "none";
		  }			
		  document.getElementById(id).parentNode.firstChild.setAttribute("src", "/v70/vin_tazul2.gif");			 
		  i--;		  
		  if(i >= 0) setTimeout(funcAsync,10);			 
		}
	},10);	
}


/* Pliega todos los men&uacute;s (opcional: menos el indicado)*/
function PlegarTodos(idOpcional)
{  
	for(var i=0; i<menusweb.length; i++)
	{
		if(menusweb[i] != idOpcional)
		{
		  var elem = document.getElementById(menusweb[i]);		  
		  
		  for(var j=0; j<elem.childNodes.length; j++)
		  {
			 if(elem.childNodes.item(j).tagName == "LI") elem.childNodes.item(j).style.display = "none";
			 elem.childNodes.item(j).parentNode.parentNode.firstChild.setAttribute("src", "/v70/vin_tazul2.gif"); 
		  }
		}
	}
}

/*FUNCIONES RELACIONADAS CON LAS COOKIES: SE REPITEN EN EL WPORT7.JS*/
/* Estas cinco funciones las ponemos aqui por 
compatibilidad con la anterior vesion de la Web */
function wwopts(){}
function wwopt2(tipo){}
function wwopt3(tipo){}
function CojeVCuki(indice) 
{
	var galleta = document.cookie
	//busca el final del valor, dado por ;, a partir de indice
	var finDeCadena = galleta.indexOf(";", indice)
	//si no existe el ;, el final del valor lo marca la longitud total de la cookie
	if (finDeCadena == -1) finDeCadena = galleta.length
	return unescape(galleta.substring(indice, finDeCadena))
}
function CojeCuki(nombre) {
	var galleta = document.cookie
	var arg = nombre + "="
	var alen = arg.length
	var glen = galleta.length
	var i = 0
	while (i < glen) 
	{
		var j = i + alen			//posiciona j al final del nombre del valor
		if (galleta.substring(i, j) == arg)	//si en la cookie estamo ya en nombre del valor		
			return CojeVCuki(j)		//devuleve el valor, que esta a partir de j
		i = galleta.indexOf(" ", i) + 1		//pasa al siguiente
		if (i == 0) break			//fin de la cookie
	}
	return null					//no se encuentra el nombre del valor
}
/* fin cinco funciones */
function ActualizaConfig(){
 var _90dias = Caduca(90)
 var micfg = formConfig;
 var ancho = "778px"; 
 var sAnchoCuerpo = "";
 for (var i = 0; i < 8; i++) {
	if (micfg.cfgancho[i].checked) ancho = micfg.cfgancho[i].value;
 }
 GuardarCookie('cfgancho', ancho, _90dias); 

 window.location.reload(true); 
}


function Caduca(dias) {
 var hoy = new Date();
 var msEnXDias = eval(dias) * 24 * 60 * 60 * 1000;
 hoy.setTime(hoy.getTime() + msEnXDias);
 return (hoy.toGMTString());
}

function GuardarCookie (nombre, valor, caducidad) {
 if(!caducidad) caducidad = Caduca(0);
 document.cookie = nombre + "=" + escape(valor) + "; expires=" + caducidad + "; path=/";
}

function CojerValorCookie(indice) {
 //indice indica el comienzo del valor
 var galleta = document.cookie
 //busca el final del valor, dado por ;, a partir de indice
 var finDeCadena = galleta.indexOf(";", indice)
 //si no existe el ;, el final del valor lo marca la longitud total de la cookie
 if (finDeCadena == -1)
 finDeCadena = galleta.length
 return unescape(galleta.substring(indice, finDeCadena))
 }
 
 
function CojerCookie(nombre) {
 var galleta = document.cookie
 //construye la cadena con el nombre del valor
 var arg = nombre + "="
 var alen = arg.length //longitud del nombre del valor
 var glen = galleta.length //longitud de la cookie
 var i = 0
 while (i < glen) {
 var j = i + alen //posiciona j al final del nombre del valor
 if (galleta.substring(i, j) == arg) //si en la cookie estamo ya en nombre del valor
 return CojerValorCookie(j) //devuelve el valor, que esta a partir de j
 i = galleta.indexOf(" ", i) + 1 //pasa al siguiente
 if (i == 0)
 break //fin de la cookie
 }
 return null //no se encuentra el nombre del valor
}


function EliminaCookie (nombreCookie){
	document.cookie = nombreCookie + "=; expires=Thu, 01-Jan-1970 00:00:01 GMT; path=/";
}

function BorrarConfig()
{
	EliminaCookie('cfgancho');
	window.location.reload(true);
}

function Caduca7(minutos) {
	var hoy = new Date();
	var msEnXDias = eval(minutos) * 60 * 1000;
	hoy.setTime(hoy.getTime() + msEnXDias);
	return (hoy.toGMTString());
}

function GuardaCuki7 (nombre, valor) {
	var caducidad = Caduca7(30);
	document.cookie = nombre + "=" + escape(valor) + "; expires=" + caducidad + "; path=/";
}

/*
NOMBRE: MontaImagen()
DEFINICION: Funcion que monta las imagenes en una tabla, haciendo document.write de la misma
EVENTOS DE USO: Cuando queremos montar una imagen que va a ser hipervinculo.
PARAMETROS: sHref: durecci&oacute;n a adonde nos dirijimos al pulsar sobre la tabla, sTitulo: texto que
se ve en la parte baja de la tabla, sSrcGrafico: SRC de donde debemos coger la imagen
*/
function MontaImagen(sHref, sTitulo, sSrcGrafico)
{
	var sCadena = "";
	sCadena = "<table cellspacing=0 cellpadding=0 width='120px' height='120px' style='border-top: solid 1px #c0c0c0; border-left: solid 1px #c0c0c0; border-right: outset 3px #c0c0c0; border-bottom: outset 3px #c0c0c0;' >";
	sCadena = sCadena + "<tr><td colspan='2' width='120px' height='100px' align='center'><a href='" + sHref + "'><img border=0 src='" + sSrcGrafico + "' alt='" + sTitulo + "' title='" +sTitulo + "' /></a></td></tr>";
	sCadena = sCadena + "<tr><td width='30px' height='20px'><a href='" + sHref + "'><img border=0 src='/v70/wBoton.gif' alt='" + sTitulo + "' title='" +sTitulo + "'/></a></td>";
	sCadena = sCadena + "<td style='font-family: Verdana; font-size:12px; color:#000000' width='90px' height='20px' background='/v70/wFonfo.jpg'><a href='" + sHref + "' style='text-decoration: none; color:#000000'>"+ sTitulo +"</a></td></tr>";
	sCadena = sCadena + "</table>";
	document.write(sCadena);
}

/*
NOMBRE: MontaImagenAlt()
DEFINICION: Funcion que monta las imagenes en una tabla, haciendo document.write de la misma
EVENTOS DE USO: Cuando queremos montar una imagen que va a ser hipervinculo.
PARAMETROS: sHref: durecci&oacute;n a adonde nos dirijimos al pulsar sobre la tabla, sTitulo: texto que
se ve en la parte baja de la tabla, sSrcGrafico: SRC de donde debemos coger la imagen
*/
function MontaImagenAlt(sHref, sTitulo, sSrcGrafico, sAlt)
{
	var sCadena = "";
	sCadena = "<table cellspacing=0 cellpadding=0 width='120px' height='120px' style='border-top: solid 1px #c0c0c0; border-left: solid 1px #c0c0c0; border-right: outset 3px #c0c0c0; border-bottom: outset 3px #c0c0c0;' >";
	sCadena = sCadena + "<tr><td colspan='2' width='120px' height='100px' align='center'><a href='" + sHref + "'><img border=0 src='" + sSrcGrafico + "' alt='" + sAlt + "' title='" +sAlt + "' /></a></td></tr>";
	sCadena = sCadena + "<tr><td width='30px' height='20px'><a href='" + sHref + "'><img border=0 src='/v70/wBoton.gif' alt='" + sAlt + "' title='" +sAlt + "'/></a></td>";
	sCadena = sCadena + "<td style='font-family: Verdana; font-size:12px; color:#000000' width='90px' height='20px' background='/v70/wFonfo.jpg'><a href='" + sHref + "' style='text-decoration: none; color:#000000'>"+ sTitulo +"</a></td></tr>";
	sCadena = sCadena + "</table>";
	document.write(sCadena);
	
}

/*
Funcion que cambia el aspecto del mensaje que devuelve lotus cuando
no ha encontrado ningun documento en la vista. Recibe como parametro
el id del div o td que contiene el campo $$ViewBody
*/
function CambiarNingun(idcontenedor)
{	
	var divMje = document.getElementById(idcontenedor);	
	if (divMje.innerHTML == "<h2>No se ha hallado ningún documento</h2>" || divMje.innerHTML == "<H2>No se ha hallado ningún documento</H2>")
	{
		divMje.innerHTML = "<br><b>No se ha hallado ninguna p&aacute;gina en esta categor&iacute;a.</b>&nbsp;<a href='javascript: onClick=history.back()'>Volver</a><br><br>";
	}	
}

function CambiarNingunPor(idcontenedor, pormensaje)
{	
	var divMje = document.getElementById(idcontenedor);	
	if (divMje.innerHTML == "<h2>No se ha hallado ningún documento</h2>" || divMje.innerHTML == "<H2>No se ha hallado ningún documento</H2>")
	{
		divMje.innerHTML = "<br><b>"+pormensaje+"</b>&nbsp;<a href='javascript: onClick=history.back()'>Volver</a><br><br>";
	}	
}