/*	AUTOR: Centro de Proceso de Datos
	FECHA: 22/06/2007-28/05/2010
	TIPO DOCUMENTO: Archivo JScript
	DESCRIPCION DOCUMENTO: Archivo JScript que maqueta la pagina.
	VERSION: A4S (/inicio.nsf/utils)
*/
/* ********************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%";}

var sCadenaNSF = ""; // variable usada para obtener la cadena NSF  para las búsquedas personalizadas
if (typeof(miservidor) == "undefined") miservidor = "";

var ID_CATEG = 99;// identificador de Categoría
var ID_SUBCATEG = 99;// identificador de subcategoria
var ID_EXPAND = 1; //identificador de categoría expandida
var ID_SSCATEG = 99;// identificador de Subcategoria dentro de las subcategorias
var bEncontrado = false; //variable boleana que indica si el archivo de la URL ha sido encontrado en el array

/* 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;
var FUENTE_ACTUAL = 11;	//Usada en las funciones de Aumenta y disminuye
var tSubCategAux = "";	//Para cuando no viene subcategoria
var bEstas = true;	// Informará el "Estas en" o no, si bEstas es false no se informa.
var bCreadoP = false;	// Indica si el Lotus ha generado un <p> automaticamente
var bColPpalMayor = true; // Se usa en el firefox para cuando la columna ppal es mayor q la columna lateral
var ID_NAV = new Array(2); //identificador de navegador

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

//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: 
if (typeof(WWBANNER) == "undefined"){
	var WWBANNER = new Array(7);
	//la ciudad
	WWBANNER[0] = new Array();
	WWBANNER[0][0] = "<label class='textoNaranjaTitulos'>Sede Electr&oacute;nica</label><table width='92%' style='border-top:#db530a 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/sedeelectronica.nsf'><center><img style='border: 0px; margin: 2px' src='/v70/icose.gif' alt='Sede Electr&oacute;nica' title='Sede Electr&oacute;nica' 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' 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] = WWBANNER[0][0];
	WWBANNER[1][1] = bannercarpeta();
	WWBANNER[1][10] = bannerarchivo();
		
	//legislacion
	WWBANNER[2] = new Array();
	WWBANNER[2][0] = WWBANNER[0][0];
	//servicios
	WWBANNER[3] = new Array();
	WWBANNER[3][0] = WWBANNER[0][0]
	WWBANNER[3][2] = bannerigualdad();
	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' src='/v70/medamb.jpg' alt='Medio Ambiente' title='Medio Ambiente'  /></center></a><br><label class='textoAzulTitulos' >Pacto de los Alcaldes</label><table width='92%' style='border-top:#00457c 1px solid' align=center><tr><td></td></tr></table><a href='"+miservidor+"/inet/wambiente.nsf/wwtod/2FE2D4F002659232C1257646003490E4'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/obj.nsf/in/GJELGYD/$file/Eumayors160.gif' alt='Pacto de los Alcaldes' title='Pacto de los Alcaldes' /></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+"/sedeelectronica.nsf'><center><img style='border: 0px; margin: 2px 2px 2px 2px' src='/v70/icose.gif' alt='Sede Electr&oacute;nica' title='Sede Electr&oacute;nica' style='height: 100px; width:163px;' /></center></a><div class='lineaHorNaranjaSimple'></div><br>";
	//cultura
	WWBANNER[4] = new Array();
	WWBANNER[4][0] = WWBANNER[0][0];
	//empleo
	WWBANNER[5] = new Array();
	WWBANNER[5][0] = WWBANNER[0][0];
	//bsocial
	WWBANNER[6] = new Array();
	WWBANNER[6][0] = WWBANNER[0][0];
}
if (typeof(WWBANNER[3][2]) == "undefined") WWBANNER[3][2] = bannerigualdad();

/* *********** 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("200px", "190px" ,"190px", "210px", "160px", "140px", "140px", "140px"); 
var ANCHOSSUBCAT = new Array("170px", "190px" ,"185px", "180px", "160px", "140px", "140px", "140px"); 

/* array de categorias y subcategorias */	
var WWARBOL = [
['La Ciudad',
	['Fotograf&iacute;as', '/fotos.htm',
		['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/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'],
	],['Arboles y parques', '/arboles.htm',
		['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', '/inicio.nsf/enlaces',
		['Web de turismo','http://www.granadatur.com'],
		['Webs de Granada','/inicio.nsf/enlaces'],
	],['L&iacute;neas autobuses', '/bus.htm'],
	['Granada en cifras', '/granadaencifras.htm',
		['Estad&iacute;sticas', '/granadaencifras.htm'],
	],['Callejero y planos', '/plano.nsf',
		['Planos Generales', '/plano.nsf'],
		['Listado Calles', '/plano.nsf/listacalles'],
		['Callejero', 'http://geoweb.granada.org/visorweb/util/visor_bienvenida.html?windice=0,6'],
		['Bolet&iacute;n de novedades', '/intranet/bolcalles.nsf'],
	],['Gu&iacute;a de recursos', '/recursos.htm',
		['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', '/otras.htm',
		['Accesos globales', '/otras.htm'],
		['Accesos/tipo', '/ptoencu.nsf/wwacc?openview&count=50'],
		['Accesos/mes', '/ptoencu.nsf/wwmes'],
		['novedades/d&iacute;a', '/inet/wbuscar2.nsf/wwtodnov/0'],
		['novedades/tipo', '/inet/wbuscar2.nsf/wwtodnov/1'],
		['Calculadora euros', '/euros.htm'],
		['Calendario', '/calendario.htm'],
	],['Calendario laboral', '/calendario.htm'],
],
['El Ayuntamiento',	/* windice=1*/
	['Sede Electr&oacute;nica', '/sedeelectronica.nsf',
		['Sobre la Sede','/inicio.nsf/mn/s00'],
		['Gu&iacute;a de uso','/inicio.nsf/mn/s01'],
		['Carta de Servicios','/inicio.nsf/mn/s02'],
		['Tramitaci&oacute;n','/inicio.nsf/mn/s03'],
		['Carpeta Ciudadana','/inicio.nsf/mn/s04'],
		['Tabl&oacute;n Edictos','/inicio.nsf/mn/s06'],
		['Utilidades','/inicio.nsf/mn/s05'],
	],['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'],
	],['Corporaci&oacute;n/organigrama', '/corporacion.htm'],
	['Contrataci&oacute;n', '/contratacion.htm',
		['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','/inicio.nsf/mn/s06'],
	['Impresos', '/inet/wgr.nsf/impresos?openpage'],
	['Informaci&oacute;n al ciudadano', '/ciudadano.htm',
		['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'],
	],['Contrataci&oacute;n PMD', '/contratapmd.nsf',
		['Anuncios Informaci&oacute;n previa','/contratapmd.nsf/anuprev'],
		['Hist&oacute;rico de Anuncios','/contratapmd.nsf/anuhis'],
		['Informaci&oacute;n &uacute;til','/contratapmd.nsf/wwgen'],
		['Normativa aplicable','/contrata.nsf/wwgen/normativa'],
		['Licitaciones por Plazo','/contratapmd.nsf/wwbyfecha'],
		['Licitaciones por Expte','/contratapmd.nsf/wwbyexpte'],
		['Contrataciones programadas','/contratapmd.nsf/conprog'],
		['Adjudicaciones','/contratapmd.nsf/adjdef'],
		['Procedimientos anulados','/contratapmd.nsf/anuladas'],
		['Hist&oacute;rico de Licitaciones','/contratapmd.nsf/lichis'],
		['Anuncios PMD en BOP','/contratapmd.nsf/todosanuncios'],
	],['Gerencia Urbanismo/Obras','/inet/wgr.nsf/gerencia',
		['Todos los Anuncios','/inet/wgr.nsf/wwgertod'],
		['Proyectos y planes','/inet/wgr.nsf/wwgerproy'],
		['Estudios','/inet/wgr.nsf/wwgerest'],
		['Empleo','/inet/wgr.nsf/wwgeremp'],
		['Perfil contratante','/contratagerencia.nsf'],
	],
],
['Legislaci&oacute;n',		/* windice=2*/
	['General', '/normativa.htm',
		['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;squedas','/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'],
	],['Plenos y Juntas de gobierno', '/inet/wplenos.nsf',
		['Plenos' ,'/inet/wplenos.nsf/resumen/pleno'],
		['Juntas de gobierno' ,'/inet/wplenos.nsf/resumen/comision'],
		['Novedades' ,'/inet/wplenos.nsf/wwnov'],
	],
],
['Servicios',	/* windice=3*/
	['Bodas y Palacios', '/palacios.htm',
		['Info.General', '/inet/palacios.nsf/infgeneral'],
		['Fotos y planos', '/inet/palacios.nsf/fotosplanos'],
		['Carmen Martires', '/inet/palacios.nsf/edbynombre/58475794CDC857ECC1257188003A3DA0'],
		['Palacio c&oacute;rdovas', '/inet/palacios.nsf/edbynombre/3B401F932CB2D470C12571E8002AF23E'],
		['Quinta Alegre', '/inet/palacios.nsf/edbynombre/6FB8263C6062696FC1257249003D52C9'],
		['Comentarios', '/inet/comenta.nsf/comenta'],					
	],['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'],
		['IV Plan 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'],
		['Pacto Local', '/inet/wmujer8.nsf/vistaxml?OpenPage&tipoxml=9'],
		['Hist&oacute;rico de Planes', '/inet/wmujer8.nsf/vistaxml?OpenPage&tipoxml=8'],
		['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/hwgr.nsf/wweco8?openview&windice=3,3'],
		['Ordenanzas fiscales','/inet/wgr.nsf/wwefis?openview&windice=3,3'],
		['Hist&oacute;r.Ord.fiscales ','/inet/hwgr.nsf/wweord?openview&windice=3,3'],
		['Callejero fiscal por calle', '/inet/wcallfis.nsf/wwcall0'],
		[' " por categor&iacute;a', '/inet/wcallfis.nsf/wwcategoria'],
		[' " por c&oacute;digo', '/inet/wcallfis.nsf/wwcall2'],
		[' " por ejercicio', '/inet/wcallfis.nsf/wwcall3'],
		['Ep&iacute;grafes IAE', '/inet/wcallfis.nsf/wwiae0'],
		[' " por tipo activ.', '/inet/wcallfis.nsf/wwiae1'],
		[' " por actividad', '/inet/wcallfis.nsf/wwiae2'],
	],['Educaci&oacute;n', '/inet/wgr.nsf/wwedu?openview&windice=3,4'],
	['Gabinete de Comunicaci&oacute;n', '/gabineteprensa.htm',
		['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', 'http://granajoven.granada.org/'],
	['Medio ambiente', '/inet/wambiente.nsf',
		['Directorio y Presentaci&oacute;n', '/inet/wambiente.nsf/directorio'],
		['Control Actividades', '/inet/wambiente.nsf/ww1'],
		['Calidad del aire', '/inet/wambiente.nsf/wwaire'],
		['Gesti&oacute;n residuos', '/inet/wambiente.nsf/residuos'],
		['Ecoparque', '/inet/wambiente.nsf/ww2'],
		['Ac&uacute;stica ambiental', 'http://geoweb.granada.org/visorweb/util/visor_maparuidos.html'],
		['Aguas', '/inet/wambiente.nsf/wwaba'],
		['Noticias', '/inet/wgr.nsf/wwimedact'],
		['Sugerencias', '/inet/sugmedamb.nsf/'],
	],['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',
		['General', '/inet/wparciu.nsf/wwtod'],
		['Novedades', '/inet/wparciu.nsf/wwnov'],
		['Recursos ciudadanos', '/inet/wpim.nsf/'],
		['Centros C&iacute;vicos', '/inet/cencivicos.nsf'],
		['C.C.Beiro', '/inet/cencivicos.nsf/wwalias/beiro'],
		['C.C.Chana', '/inet/cencivicos.nsf/wwalias/chana'],
		['C.C.Genil', '/inet/cencivicos.nsf/wwalias/genil'],
		['C.C.Lancha Genil', '/inet/cencivicos.nsf/wwalias/lancha'],
		['C.C.Norte', '/inet/cencivicos.nsf/wwalias/norte'],
		['C.C.Pl.Ilusi&oacute;n', '/inet/cencivicos.nsf/wwalias/ilusion'],
		['C.C.Ronda-M.Mond&eacute;jar', '/inet/cencivicos.nsf/wwalias/mondejar'],
		['C.C.Zaid&iacute;n', '/inet/cencivicos.nsf/wwalias/zaidin'],
	],['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 por a&ntilde;os', '/inet/wprotcivil.nsf/wwejer'],
		['Enlaces', '/inet/wprotcivil.nsf/wwenla'],
	],['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/buscaindice?open&indice=BAA0020F',
		['Gu&iacute;a B&aacute;sica Reclamaciones', '/inet/wgr.nsf/buscaindice?open&indice=BAA0020F'],
	],['Agenda 21 Local', '/inet/agenda21.nsf',		
		['Antecedentes Implantaci&oacute;n', '/inet/agenda21.nsf/w01'],
		['Proyectos colaboraciones', '/inet/agenda21.nsf/w02'],
		['Agenda 21 escolar', '/inet/agenda21.nsf/w03'],
		['Foro 21', '/inet/agenda21.nsf/w04'],
		['Difusi&oacute;n y Medios', '/inet/agenda21.nsf/w05'],
		['Boletines', '/intranet/bolagenda21.nsf'],
		['¿Cómo ser sostenible?', '/inet/agenda21.nsf/w07'],
		['Links de inter&eacute;s', '/inet/agenda21.nsf/w08'],
		['¿Quiénes somos?', '/inet/agenda21.nsf/w09'],
		['Novedades', '/inet/agenda21.nsf/wwnov10'],
		['Sugerencias', '/inet/sugag21.nsf'],
	],['Centros C&iacute;vicos', '/inet/cencivicos.nsf/'],
],
['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'],
],
['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'],
],

['Turismo', /* windice=6*/
	['Web de Turismo' , 'http://www.granadatur.com'],
	['Mapas y planos' , '/plano.nsf'],
]
];

/* NOMBRE: DetectaNavegador()
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 */
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]--> ");

/*	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
*/
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");
	}
}
}
/*	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 */
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++){if (j>0) iContSubCat++;}// bucle de subcategorias
		}
	}
	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);
	}	
}

/*
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"){
			mbody.style.fontSize = sizetxt;// IE
		} 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"){
			elementos[x].style.fontSize = FUENTE_ACTUAL; // IE
		} 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="<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: -47px; 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' name='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;
	var colactiva="";
	for(i=0; i<WWARBOL.length;i++){
		h=h+1;
		var sFunc = "javascript:rellenaul("+i+","+h+")";
		colactiva="";
		if (ID_CATEG != 9 && i==ID_CATEG){ colactiva=" style='background: #507694'"} //categoria activa
		sCadCabecera = sCadCabecera + "<li onmouseover='"+sFunc+"'"+colactiva+"><a href='/inicio.nsf/mn/w0"+i+"'>"+(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' style='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

	var tmptxt="";
	
	if (typeof(WWBANNER[ID_CATEG][ID_SUBCATEG]) != "undefined")  tmptxt = WWBANNER[ID_CATEG][ID_SUBCATEG];
	else tmptxt= WWBANNER[ID_CATEG][0];
	
	if (typeof(wvisitadas) != "undefined"){
// poner los div para las páginas mas visitadas y accesos
		var txutil="";
		if(navigator.appName == "Netscape")txutil="<div style='margin-left:4px; margin-right:4px; padding: 4px'>"+"<div id='semanales' class='textocontenido' style='text-align:left; margin-bottom:4px'></div>";
		else txutil="<div style='margin-left:4px; margin-right:4px; padding: 4px; margin-top:-15px'>"+"<div id='semanales' class='textocontenido' style='text-align:left; margin-bottom:4px'></div>";
		txutil=txutil+"<div id='mensuales' class='textocontenido' style='text-align:left; margin-bottom:4px'></div>";
		txutil=txutil+"<div id='accesos' class='textocontenido' style='text-align:left; margin-bottom:4px'></div>";
		txutil=txutil+"<div id='actualizadas' class='textocontenido' style='text-align:left; margin-bottom:4px'></div>";
		txutil=txutil+"<div id='aleatorias' class='textocontenido' style='text-align:left; margin-bottom:4px'></div>";
		txutil=txutil+"<div id='destacadas' class='textocontenido' style='text-align:left; margin-bottom:4px'></div>";
		tmptxt=txutil+"<br>"+tmptxt+"<div id='access' style='width:100%'></div></div>";
	}
	sCadCuerpo = sCadCuerpo +"<div>"+ tmptxt+"</div></div></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' style='width:100%'>" // ='"+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>";
	
	if (ID_NAV[0] == "0") sCadCuerpo = sCadCuerpo + "<table id='tablaContent' style='width:100%;padding-top:0px' cellpadding=0 cellspacing=0><tbody><tr><td id='idTdColTira' class='stTdColTira' style='padding-bottom:0px;width:42px;vertical-align:top;margin:2px'><div id='divColLateral' class='columnaTiraLateral' style='margin-top:-3px;width:40px'>";
	else sCadCuerpo = sCadCuerpo + "<table id='tablaContent' width='100%' cellpadding=0 cellspacing=0><tbody><tr><td id='idTdColTira' style='padding-bottom:0px;width:42px;vertical-align:top'><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' style='padding-top:5px'>"; 
	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>"
	sCadPie = sCadPie +"<td align='right' bgcolor='#00457c' valign='middle'><img src='/v70/w3cA.gif' style='border: 1px solid #00457c; height: 20px; width: 60px' title='P&aacute;gina accesible para el Contenido Web 1.0 con el nivel A' alt='P&aacute;gina accesible para el Contenido Web 1.0 con el nivel A' /></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");
	
	if (typeof(wvisitadas)!= "undefined") CargarContenido2 ("/"+wvisitadas+".htm");
}

/*
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);
	}
}

//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 = document.getElementById("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>";
	}	
}

//_____________________________ de menuaccesos (el dia del cumple de las señoras) __________________________________________

function aleatorio2(){
    var idsm = ["destaca","aleatoria","massem","masmes"];
    miFecha = new Date();
    ver=miFecha.getSeconds() % 4;
    //alert(ver);
    cerrartodos2();
    accmuestra2(idsm[ver]);
} 

function cerrartodos2(){ 
    var idsm = ["destaca","aleatoria","massem","masmes"];
    for (i=0; i<idsm.length;i++){    
    var divm = document.getElementById(idsm[i]);
    var imgm = document.getElementById(idsm[i]+"img");
    if (typeof(divm) != "undefined" && divm != null){
            divm.style.display="none";
            imgm.src = '/v70/plegado.gif';
        }
    }
}


function CargarContenido2 (url) 
{
    var pagina_requerida = false;
    // Si es Mozilla, Safari etc
    if (window.XMLHttpRequest)
    {        
   
        pagina_requerida = new XMLHttpRequest ();
    } 
    else if (window.ActiveXObject)
    {
        // pero si es IE
       if (ID_NAV[0] == "0" && ID_NAV[1] == "1")
        {
            pagina_requerida = new ActiveXObject ("Msxml2.XMLHTTP");
        }
        else
        {            
                pagina_requerida = new ActiveXObject ("Microsoft.XMLHTTP");           
        }
    } 
    else
    return false;
    /* Invocamos la propiedad onreadystatechange, (cambio en el estado de la carga)
    entonces cuando el objeto llegue a este punto se llamará a una funcion que gestionará el resto del proceso */
    pagina_requerida.onreadystatechange = function (){ CargarPagina2 (pagina_requerida); }
    pagina_requerida.open ('GET', url, true); // asignamos los métodos open y send
    pagina_requerida.send (null);
}	

function CargarPagina2 (pagina_requerida){
	var fragmentotexto = new Array();
	if (pagina_requerida.readyState == 4){
		if (pagina_requerida.status == 200){
			fragmentotexto = pagina_requerida.responseText.split('@');	
			if (typeof(fragmentotexto[1]) != "undefined" && fragmentotexto[1] != "" && fragmentotexto[1].indexOf('mostrardiv')!= -1) document.getElementById("semanales").innerHTML = fragmentotexto[1];
			else {
			document.getElementById("semanales").style.display="none";
			if (fragmentotexto[1].indexOf('tabacces')!= -1) document.getElementById("access").innerHTML = "<br>"+fragmentotexto[1];
			}
			if (typeof(fragmentotexto[2]) != "undefined" && fragmentotexto[2] != "" && fragmentotexto[2].indexOf('mostrardiv')!= -1) document.getElementById("mensuales").innerHTML = fragmentotexto[2];
			else {
			document.getElementById("mensuales").style.display="none";
			if (fragmentotexto[2].indexOf('tabacces')!= -1) document.getElementById("access").innerHTML = "<br>"+fragmentotexto[2];
			}
			if (typeof(fragmentotexto[3]) != "undefined" && fragmentotexto[3] != "" && fragmentotexto[3].indexOf('mostrardiv')!= -1) document.getElementById("accesos").innerHTML = fragmentotexto[3];
			else {
			document.getElementById("accesos").style.display="none";
			if (fragmentotexto[3].indexOf('tabacces')!= -1) document.getElementById("access").innerHTML = "<br>"+fragmentotexto[3];
			}
			if (typeof(fragmentotexto[4]) != "undefined" && fragmentotexto[4] != "" && fragmentotexto[4].indexOf('mostrardiv')!= -1) document.getElementById("actualizadas").innerHTML = fragmentotexto[4];
			else {
			document.getElementById("actualizadas").style.display="none";
			if (fragmentotexto[4].indexOf('tabacces')!= -1) document.getElementById("access").innerHTML = "<br>"+fragmentotexto[4];
			}
			if (typeof(fragmentotexto[5]) != "undefined" && fragmentotexto[5] != "" && fragmentotexto[5].indexOf('mostrardiv')!= -1) document.getElementById("aleatorias").innerHTML = fragmentotexto[5];
			else {
			document.getElementById("aleatorias").style.display="none";
			if (fragmentotexto[5].indexOf('tabacces')!= -1) document.getElementById("access").innerHTML = "<br>"+fragmentotexto[5];
			}
			if (typeof(fragmentotexto[6]) != "undefined" && fragmentotexto[6] != "" && fragmentotexto[6].indexOf('mostrardiv')!= -1) document.getElementById("destacadas").innerHTML = fragmentotexto[6];
			else {
			document.getElementById("destacadas").style.display="none";
			if (fragmentotexto[6].indexOf('tabacces')!= -1) document.getElementById("access").innerHTML = "<br>"+fragmentotexto[6];
			}
			aleatorio2();
		}
	}
}

function mostrardiv(tipo) {
	var mira=0;
	var item=document.getElementById(tipo);
	if (item != null){
	    if (item.style.display == "none" ) mira=1;
	}
	cerrartodos2();
	if (mira>0) accmuestra2(tipo)

}

function accmuestra2(tipo){
    var div=document.getElementById(tipo);    
    if (div != null){ 
        div.style.display = '';       
        document.getElementById(tipo+"img").src = '/v70/desplegado.gif';    
    }
}

function linkizda(dbf, vista,txt){
	return "<li style='padding-left:8px'><img src='/v70/vin_azul.gif'/><a href='/inet/"+dbf+".nsf/"+vista+"'>"+txt+"</a></li>";
}

function archicomun(dbf,txt){
	var dirURL = document.location.href.toLowerCase();
	var tx="<li><a href='javascript:ve2no(\""+dbf+"00\")'><img src='/v70/vin_tazul.gif' class='border0'>"+txt+"</a></li>";
	tx=tx+"<ul class='textoMenuGrisVertical' id='"+dbf+"00'";
	if (dirURL.indexOf(dbf)== -1) tx=tx+"style='display:none'";
	tx=tx+">"+linkizda(dbf,"inicio","Presentacion");
	tx=tx+linkizda(dbf,"wbysignatura","por signatura");
	tx=tx+linkizda(dbf,"wbyfecha","por fecha");
	switch (dbf) {
		case "warchislibros" :
			tx=tx+linkizda(dbf,"wbyarea","por &aacute;rea");
			tx=tx+linkizda(dbf,"wbyserie","por serie");
			tx=tx+linkizda(dbf,"wconfotos","con imagenes");
			break;
		case "wlegajos" :
			tx=tx+linkizda(dbf,"wbyarea","por &aacute;rea");
			tx=tx+linkizda(dbf,"wbyserie","por serie");
			tx=tx+linkizda(dbf,"wconfotos","con imagenes");
			break;
		case "wfot_arc" :
			tx=tx+linkizda(dbf,"wconfotos","imagenes");
			tx=tx+linkizda(dbf,"wbyregistro","por registro");
		case "juzgadoaguas" :
			tx=tx+linkizda(dbf,"wbyarea","por &aacute;rea");
			tx=tx+linkizda(dbf,"wbyserie","por serie");
			tx=tx+linkizda(dbf,"wclasifica","por cod.Clasif.");
			break;	
		default:
			tx=tx+linkizda(dbf,"wbyautor","por autor");
			tx=tx+linkizda(dbf,"wbyregistro","por registro");
	}
	return tx+"</ul>"
}

function bannerarchivo(){
	var dirURL = document.location.href.toLowerCase();
	var iniul="<ul class='textoMenuGrisVertical'>";
	var mihr="<hr width='92%' style='border:#db530a 1px solid;align=center'>"; 
	var milk="<li><img src='/v70/vin_azul.gif'><a href='/inet/archivomunpal.nsf/wbyclave/";
	var filk="</a></li>";
	var a0="<div style='text-align:center'><label class='textoNaranjaTitulos' style='padding-left:1px'>";
	a0=a0+"	Archivo Municipal</label>"+mihr;
	a0=a0+"<a href='/inet/archivomunpal.nsf'><img style='border: 0px; margin: 2px 2px 2px 2px' src='/bannerarchivo2.jpg' alt='Archivo Municipal' title='Archivo Municipal' style='height: 124px; width:163px;' /></a></div>";
	a0=a0+mihr+iniul+"<li><a href='javascript:ve2no(\"0inicio0\")'><img src='/v70/vin_tazul.gif' class='border0'> </a>";
	a0=a0+"<a href='/inet/archivomunpal.nsf/wbyclave/inicio'>Inicio</a></li>";
	a0=a0+"<ul class='textoMenuGrisVertical' id='0inicio0'"
	if (dirURL.indexOf('archivomunpal.nsf')== -1) a0=a0+" style='display:none'";
	a0=a0+milk+"ubicacion'>Ubicaci&oacute;n"+filk+milk+"noticias'>Noticias"+filk+milk+"virtual'>Visita Virtual"+filk+"</ul>";
	a0=a0+milk+"archivo'>El Archivo"+filk+milk+"servicios'>Servicios"+filk;

	a0=a0+"<li><a href='javascript:ve2no(\"fondosa\")'><img src='/v70/vin_tazul.gif' class='border0'> </a>";
	a0=a0+"<a href='/inet/archivomunpal.nsf/wbyclave/fondos'>Fondos Documentales</a><div id='fondosa'";
	if (dirURL.indexOf('archivomunpal.nsf')!= -1)a0=a0+" style='display:none'";
	a0=a0+">"+iniul+"<li class='titulorecibo'>Fondo Municipal"+iniul;
	a0=a0+archicomun("wlegajos","Docs.hist&oacute;ricos")+archicomun("warchislibros","Libros")+"</ul></li>";
	
	a0=a0+"<li class='titulorecibo'>Fondo Juzgado Aguas"+iniul+archicomun("juzgadoaguas","Juzgado Aguas")+"</li></ul>";
	
	a0=a0+iniul+"<li class='titulorecibo'>Fondo Centro Art&iacute;stico</li></ul>";
	a0=a0+iniul+"<li class='titulorecibo'>Colecciones"+iniul;
	
	a0=a0+archicomun("wgrabados","Grabados")+archicomun("wfot_arc","Fotograf&iacute;as");
	a0=a0+archicomun("wcartografia","Cartograf&iacute;a")+archicomun("wcarteles","Carteles")+"</ul></div></li>";
	a0=a0+milk+"conservacion'>Prevenci&oacute;n"+filk+milk+"normativa'>Normativa"+filk+milk+"buscar'>B&uacute;squedas"+filk;

	return a0+"</ul><div class='lineaHorAzulSimple' style='margin-left: 9px;'>"
}

function bannerigualdad(){
	var a0="<center><span class='textoNaranjaTitulos'>Igualdad de Oportunidades</span><hr style='width:92%;color:#db530A'><a href='"+miservidor+"/inet/wmujer8.nsf/pacto_local?OpenPage'><img style='border:0px;margin:2px' src='/v70/pactoconcilia.jpg' alt='Pacto local por la concilaci&oacute;n' title='Pacto local por la concilaci&oacute;n' /></a><br><br>";
	a0=a0+"<a href='"+miservidor+"/inet/wmujer8.nsf/ww09plan'><span class='textoNaranjaTitulos'>IV Plan de Igualdad</span><hr style='width:92%;color:#db530A'><img style='border:0px;margin:2px' src='/v70/4planconci.gif' alt='IV Plan de Igualdad' title='IV Plan de Igualdad' /></center></a><br>";
	return a0
}

function ve2no(id){
	if (document.getElementById(id).style.display == "none") document.getElementById(id).style.display = ""
	else document.getElementById(id).style.display = "none"
}

function ve2no2(id){
	if (document.getElementById(id)){
		var mimg=document.getElementById(id+"img");
		var mtxt=document.getElementById(id);
		if (mtxt.style.display == "none"){
			if (mimg) mimg.src = '/v70/desplegado.gif';
			mtxt.style.display = "";
		}else{
			if (mimg) mimg.src = '/v70/plegado.gif';
			mtxt.style.display = "none";
		}
	}
}

function bannercarpeta(){
	var a0="<div style='text-align:center'><label class='textoNaranjaTitulos' style='padding-left:1px'>Carpeta Ciudadana</label><hr width='92%' style='border:#db530a 1px solid;align=center'>";
a0=a0+"<a href='https://granada.org/simweb.nsf/entrada'><img src='/v70/oficina_virtual.jpg' alt='Oficina Virtual' title='Oficina Virtual' style='height: 100px; width: 163px; margin-left: 10px;'/></a>";
a0=a0+"</div><hr width='92%' style='border:#db530a 1px solid;align=center'>"; 
a0=a0+"<ul class='textoMenuGrisVertical'>";
a0=a0+"<li><img src='/v70/vin_tazul.gif'><a href='https://granada.org/simweb.nsf/entrada'>Carpeta Ciudadana</a>"
a0=a0+"<ul class='textoMenuGrisVertical'>";
a0=a0+link3("cgi-bin/produccion/simcgi.exe/menuCarpetas.sim/ROOT", "Men&uacute;");
a0=a0+link3("cgi-bin/produccion/simcgi.exe/DomiciliarRecibos7.sim/ROOT", "Domiciliaci&oacute;n");
a0=a0+link3("cgi-bin/produccion/simcgi.exe/ListarExpedientes7.sim/ROOT", "Expedientes");
a0=a0+link3("cgi-bin/produccion/simcgi.exe/VisualizarPadron7.sim/ROOT", "Padr&oacute;n");
a0=a0+link3("cgi-bin/produccion/simcgi.exe/GetNotificacion.sim/ROOT", "Notificaciones");
a0=a0+link3("cgi-bin/produccion/simcgi.exe/ConsultarRecibos7.sim/ROOT", "Pago recibos");
a0=a0+link3("reclasim.nsf", "Reclamaciones");
a0=a0+link3("simweb.nsf/editperfil7", "Suscripci&oacute;n");
a0=a0+link3("helpsim.nsf/ayuda?openpage", "Ayuda")+"</ul></li></ul><div class='lineaHorAzulSimple' style='margin-left: 9px;'>";
return a0;
}

function link3(enlace, texto){
	return "<li><img src='/v70/vin_tazul.gif'><a href='https://granada.org/"+enlace+"'>"+texto+"</a></li>";
}

function quitaAcentos(Text){
	var cadena="";
	var car=0;
	for (var j = 0; j < Text.length; j++){
		car=Text.charCodeAt(j);
		switch(car){
		case 225:cadena+="&aacute;";break;
		case 233:cadena+="&eacute;";break;
		case 237:cadena+="&iacute;";break;
		case 243:cadena+="&oacute;";break;
		case 250:cadena+="&uacute;";break;
		case 193:cadena+="&Aacute;";break;
		case 201:cadena+="&Eacute;";break;
		case 205:cadena+="&Iacute;";break;
		case 211:cadena+="&Oacute;";break;
		case 218:cadena+="&Uacute;";break;
		case 241:cadena+="&ntilde;";break;
		case 209:cadena+="&Ntilde;";break;
		case 252:cadena+="&uuml;";break;
		case 220:cadena+="&Uuml;";break;
		case 176:cadena+="&deg;";break;
		default:cadena+=Text.charAt(j);break;
		}
	}return cadena;
}