//buscador para productos dentro de la web
caracter = new Object(5)    
caracter[0] = 'á'  
caracter[1] = 'é'  
caracter[2] = 'í'  
caracter[3] = 'ó'  
caracter[4] = 'ú'  
  
caracter_nuevo = new Object(5)   
caracter_nuevo[0] = 'a'  
caracter_nuevo[1] = 'e'  
caracter_nuevo[2] = 'i'  
caracter_nuevo[3] = 'o'  
caracter_nuevo[4] = 'u'  
  
caracter_nuevo2 = new Object(5)   
caracter_nuevo2[0] = '[áa]'  
caracter_nuevo2[1] = '[ée]'  
caracter_nuevo2[2] = '[íi]'  
caracter_nuevo2[3] = '[óo]'  
caracter_nuevo2[4] = '[úu]'  

//var BaseDatos= new Array()
var BaseDatos

var totales     //numero de entradas encontradas   
var Pagina      //string que contendra la pagina a mostrar   
var Entradas        //string que va guardando las entrdas encontradas   
var clave1, clave2  //palabra a buscar   
  
//obtiene longitud de la base de datos   
var longitud = 0
  
  
function Buscaclave(FormBusqueda, desde) {   
    //busca la palabra clave en el array de palabras clave   
    //devuelve -1 si no hay coincidencias   
    var index = -1   
  
    //recorre el array en busca de la palabra clave (en cualquier parte)   
    for (x = desde; x < longitud; x++) {   
        if ( (BaseDatos[x].search(clave1) != -1) || (BaseDatos[x].search(clave2) != -1) ) {   
            index = x   
            break  
        }   
    }   
  
    return index  
}   
  
function IniciaPagina(FormBusqueda) {   
    //crea la pagina a visualizar y la muestra   
	Pagina='<div class="resultado_busqueda"><h3>Resultados de la b&uacute;squeda</h3>\n';
	if (totales != 0)   
        Pagina += '<p>Se han encontrado ' + totales + ' resultados que contienen la palabra <b>' + FormBusqueda.palabra.value + '</b>:</p>\n'  
    else  
        Pagina += '<p>No se han encontrado resultados para la palabra <b>' + FormBusqueda.palabra.value + '</b>.</p>\n'  
}   
  
function TerminaPagina() {   
  
    //final cuerpo   
	Pagina += '<p><a href="https://www.zalba-caldu.com" class="rojo_ZC" title="Volver al Inicio">Volver al Inicio</a></p>	</div>';
}    
	
function CreaEntradas(indice) {   
  
    var CadenasEntrada   
  
    //divide la cadena de resultados en subcadenas y escribe los resultados   
    CadenasEntrada = BaseDatos[indice].split(";")   
    Entradas += '<p><a class="azul" href="' + CadenasEntrada[0] + '.html" target="_self">' + CadenasEntrada[1] + '</a><br>\n'  
    Entradas += CadenasEntrada[2] + '</p>\n'  
}   
  
function MuestraPagina(Pagina) {   
    //muestra el contenido del display   
    /*window.document.open()   
    window.document.write(Pagina)
	window.document.close()  */
	var contenido = window.document.getElementById("cuerpo");
    contenido.innerHTML=Pagina;
}   
       
function IniciaBuscador(FormBusqueda,ruta) {   
       
    //inicia variables globales   
    var desde = 0   
    totales = 0   
    Pagina = ""  
    Entradas = ""  
	BaseDatos = new Array(
ruta+"otras secciones/centro_ayuda;Centro de ayuda Web;Información sobre cómo utilizar los contenidos y sobre como navegar por nuestras páginas;ayuda,help",
ruta+"otras secciones/siniestros;Siniestros;Declare sus siniestros y los tramitamos por usted.;siniestros",
ruta+"otras secciones/conozcanos;Conózcanos;Conoce Zalba-Caldú Correduría de Seguros.;Zalba,Caldu,Correduria,Seguros,Utebo,Casaza,servicio",
ruta+"otras secciones/diccionario;Diccionario;Conoce los términos más habituales que aparecen en las Condiciones generales de los seguros.;diccionario,seguros,medadiores,corredurias,definiciones",
ruta+"otras secciones/documentos_descargas;Documentos y descargas;Descargue los documentos para declarar un siniestro o modificar sus datos personales. Aquí también puede descargarse el catálogo de empresa y otra información.;catalogo,anuncios,siniestros,logos,zc,zalba,caldu",
ruta+"seguros/vehiculos/seguro_coche;Seguro de Coche;Contrate el seguro de coche y consiga coberturas personalizadas. Ahorre tiempo en caso de siniestro, nosotros tramitamos y gestionamos por usted con la compañía de seguros.;coches,vehiculos,automoviles",
ruta+"seguros/vehiculos/seguro_moto_quad;Seguro de Moto y Quad;Contrate el seguro de moto o quad y consiga coberturas personalizadas. Ahorre tiempo en caso de siniestro, nosotros tramitamos y gestionamos por usted con la compañía de seguros.;motos,ciclomotores,motocicletas,vespas,chopper",
ruta+"seguros/vehiculos/seguro_tuning;Seguro de Tuning;El seguro tuning que arregla tus modificaciones en caso de accidente con tu coche.;tuning,coche,vehiculo,automovil",
ruta+"seguros/vehiculos/seguro_camion;Seguro de Camión;Seguros para camiones y remolques. Seleccione entre las coberturas que le ofrecemos pensadas para el profesional del volante.;camiones,trailer,transportes,transportista,mercancias",
ruta+"seguros/vehiculos/seguro_autobus;Seguro de Autobuses;Seguros para autobuses, minibuses. Proteja los ocupantes y el vehículo. Disponemos de precios especiales para flotas.;autobus,transportes,pasajeros,microbus",
ruta+"seguros/vehiculos/seguro_flotas;Seguro de Flotas;Seguros especiales para flotas de vehículos: coches renting, coches leasing, coches alquiler, autobuses, minibuses, limusinas.;flotas,renting,leasing,alquiler,limusinas",
ruta+"seguros/vehiculos/seguro_taxi;Seguro para Taxis;Seguro para taxis en Aragón, coberturas pensadas para la actividad diaria de su coche. Incluya el subsidio por retirada de carnet, accidente o enfermedad.;taxistas",
ruta+"seguros/vehiculos/seguro_embarcacion_deportiva;Seguro para embarcaciones deportivas;Su seguro de embarcación deportiva para que se haga a la mar con seguridad.;barco, embarcacion, lancha, embarcacion deportiva, mar, asistencia nautica, esquiador, responsabilidad civil, patron, eslora, manga, casco",
ruta+"seguros/vehiculos_clasicos/seguro_coche_clasico;Seguro de Clásicos;Seguros para coches clásicos e históricos. Productos especiales para flotas y garajes de vehiculos históricos. Servicios especiales para clubes y asociaciones.;coches,vehiculos,automoviles,clasicos,clasicas,antiguos,antiguas,motociclismo",
ruta+"seguros/vehiculos_clasicos/seguro_moto_clasica;Seguro de Moto Clásica;Seguros para motos clásicas e históricas. Productos especiales para flotas y garajes de vehiculos históricos. Servicios especiales para clubes y asociaciones.;motos,ciclomotores,motocicletas,vespas,chopper,clasicos,clasicas,antiguas,motociclismo",
ruta+"seguros/vehiculos_clasicos/seguro_flota_clasicos;Seguro de Flotas de Clásicos;El seguro para una flota de coches clásicos y motos. Servicios especiales para clubes y asociaciones.;coches,vehiculos,automoviles,clasicos,clasicas,antiguos,antiguas,motos,ciclomotores,motocicletas,vespas,chopper,flotas,motociclismo",
ruta+"seguros/autocaravanas/seguro_autocaravana;Seguro de Autocaravanas;Seguros de autocaravana y camper con Zalba-Caldú, especialistas en el sector del camping y caravaning.;autocaravanas,autocaravanistas,campings,camper",
ruta+"seguros/autocaravanas/defensa_autocaravanas;Seguro de Defensa al Autocaravanista;Seguro de defensa para el autocaravanista para que disfrute de su tiempo de ocio.;defensa,autocaravanas,autocaravanistas,campings,camper",
ruta+"seguros/caravanas/seguro_caravana;Seguro de caravana;Seguros de caravana de más de 750 kg. con Zalba-Caldú, especialistas en el sector del camping y caravaning.;caravanas,campings,caravaning",
ruta+"seguros/caravanas/seguro_estaticas;Seguro de caravana estatica;Seguros de caravana estática en camping con Zalba-Caldú, especialistas en el sector del camping y caravaning.;caravanas,campings,caravaning,estaticas",
ruta+"seguros/caravanas/seguro_pickup;Seguro de pick-up y camping;Seguros para módulos pick up y vehículos con Zalba-Caldú, especialistas en el sector del camping y caravaning.;pick-ups,pickups,modulo,caravanas,campings,caravaning",
ruta+"seguros/caravanas/seguro_viaje_caravana;Seguro de asistencia en viaje de caravana;Seguros de asistencia en viaje para su caravana con Zalba-Caldú, especialistas en el sector del camping y caravaning.;asistencias,en,viajes,pick-ups,pickups,modulo,caravanas,campings,caravaning,750,kg",
ruta+"seguros/hogar/seguro_hogar;Seguro de hogar;Seguro de hogar para su vivienda. Le asesoramos para que seleccione las coberturas y diseñe el seguro a sus preocupaciones.;hogares,viviendas,casas,domicilios,contenidos,continentes,familias",
ruta+"seguros/hogar/seguro_bungalow;Seguro de bungalow y mobil-home;Seguro de bungalow y mobil-home. Disponga de las coberturas específicas para este tipo de vivienda.;bungalows,bungalos,mobil-home,campings,hogares,viviendas,casas,domicilios,contenidos,continentes,familias",
ruta+"seguros/hogar/seguro_casa_madera;Seguro de casa de madera;Seguro de casa de madera. Disponga de las coberturas específicas para este tipo de vivienda.;maderas,hogares,viviendas,casas,domicilios,contenidos,continentes,familias",
ruta+"seguros/hogar/seguro_alquiler;Seguro de alquiler;Alquile cualquier inmueble con tranquilidad. Garanticese el cobro de su renta mensual y el pago de los daños que los arrendatarios pudieran ocasionar en el inmueble.;alquileres,alquilar,hogares,viviendas,casas,domicilios,contenidos,continentes,familias",
ruta+"seguros/vida/seguros_de_vida;Seguro de vida;Protejase usted y su familia ante acontecimientos inesperados. Seguros de Vida, salud y accidentes con las coberturas que elija.;vidas,incapacidades,permanentes,enfermedades,amortizaciones,creditos",
ruta+"seguros/vida/seguros_de_asistencia;Seguro de salud;Seguros médicos que se adaptan a sus preocupaciones según su edad, lugar de residencia, centros hospitalarios, viajes y precio.;vidas,viajes,salud,enfermedades,incapacidades",
ruta+"seguros/vida/seguros_de_subsidio;Seguro de subsidio;Seguros de accidentes para empresarios autónomos, proteja su nivel de ingresos de los imprevistos de la vida.;autonomos,empresarios,empresarias,autonomas,invalidez,permanente,asistencias,sanitarias,empresas,accidentes,ILT,incapacidad laboral transitoria",
ruta+"seguros/vida/seguros_de_jubilacion;Seguro de ahorro jubilación;Sea previsor para el futuro eligiendo la entidad que gestionará sus aportaciones tanto en pago periódico como en prima única.;empresarios,empresarias,autonomas,invalidez,permanente,asistencias,sanitarias,empresas,ahorro,jubilacion",
ruta+"seguros/vida/seguros_de_pensiones;Seguro de fondos de pensiones;Tenga seguridad para su futuro desgravando en su declaración de la renta.;empresarios,empresarias,autonomas,invalidez,permanente,asistencias,sanitarias,empresas,fondos,pensiones",
ruta+"seguros/vida/seguros_de_rentas;Seguro de rentas;Prevenga el futuro complementando su pensión con la renta obtenida de sus ahorros.;empresarios,empresarias,autonomas,invalidez,permanente,asistencias,sanitarias,empresas,rentas",
ruta+"seguros/vida/seguros_accidente_individual;Seguro de accidentes individual;Seguros de accidentes para personas, protejase de los imprevistos de la vida, incluida la conducción de moto.;individuales,invalidez,permanente,asistencias,sanitarias,empresas,accidentes,moto,motociclismo",
ruta+"seguros/vida/seguros_convenio;Seguro de accidentes de convenio;Seguros de accidentes de convenios. Ofrece las coberturas que vienen recogidas en el convenio y que son de obligatorio cumplimiento para los empresarios a través de un contrato de seguro (Directiva 80/987/CEE de 20 de octubre);convenios,autonomos,empresarios,empresarias,autonomas,invalidez,permanente,asistencias,sanitarias,empresas,accidentes",
ruta+"seguros/empresas/seguro_camping;Seguro de camping;Seguros para campings, visitamos sus instalaciones para que su negocio y los usuarios disfruten de su estancia.;empresas,campings,caravaning,tiendas,campistas",
ruta+"seguros/empresas/seguro_areas_caravaning;Seguro de áreas;Seguros para áreas dedicadas a la venta de autocaravanas, caravanas, mobil-homes, bungalows, casas de madera y su relación con el caravaning. Visitamos sus instalaciones para que su negocio y los usuarios disfruten de su estancia.;empresas,campings,caravaning,areas,tiendas,campistas,areas,ventas,autocaravanas,camping,mobil-home,bungalows,bungalos,casas,maderas",
ruta+"seguros/empresas/seguros_empresas;Seguro daños propios(empresas,oficinas);Seguros para empresa, visitamos su empresa y le asesoramos a través de nuestro equipo para adaptar el seguro a sus necesidades.;empresas,pymes,S.A.,S.L.,S.C.,sociedades,anononimas,limitadas,civiles,naves,industrias,industriales,locales,oficinas,despachos,almacenes,trasteros,cooperativas",
ruta+"seguros/empresas/seguro_construccion;Seguro todo riesgo construcción;Seguro de todo riesgo construcción, En el ejercicio de su actividad de construcción necesita cubrirse de situaciones dificiles, este seguro ofrece una extensa cobertura ampliable hasta adaptarlo a sus necesidades.;construccion,empresas,pymes,S.A.,S.L.,S.C.,sociedades,anononimas,limitadas,civiles,naves,industrias,industriales,locales,oficinas,despachos,almacenes,trasteros,cooperativas",
ruta+"seguros/rc/seguro_responsabilidad_directivos;Seguro de RC para directivos;Seguro de responsabilidad civil, obtenga protección económica por los daños que pudiera producir a un tercero, ya sea por sus errores u acciones tanto a nivel particular como profesional.;rc,responsabilidades,civil,profesionales,proteccion,economica,empresas,pymes,autonomos,directivos,gerencias",
ruta+"seguros/rc/seguro_turismo_activo;Seguro de RC de turismo activo;Seguro para cubrir las responsabilidades de actividades de turismo activo.;rc,responsabilidades,civiles,turismo,4x4,escalada,espeleología,surfing,hidrobob,hidrospeed,kayac,kitesurf,mushing,paintball,patinaje,piragüismo,quad,rafting,rapel,rappel,nieve,rocodromo,snorkle,snowboard,telemark,trecking,ecuestre,esqui",
ruta+"seguros/rc/seguro_responsabilidad;Seguro de responsabilidad civil;Seguro de responsabilidad civil, obtenga protección económica por los daños que pudiera producir a un tercero, ya sea por sus errores u acciones tanto a nivel particular como profesional.;rc,responsabilidades,civil,profesionales,proteccion,economica,empresas,pymes,autonomos",
ruta+"seguros/proteccion_juridica/proteccion_juridica_familiar;Seguro de protección jurídica familiar;Seguros de protección jurídica para su familia, ponga a su disposición abogados para obtener asesoramiento y defensa legal.;protecciones,juridicas,familiares,hijos",
ruta+"seguros/proteccion_juridica/proteccion_juridica_empresa;Seguro de protección jurídica de empresa;Seguros de protección jurídica para empresa, ponga a su disposición abogados para obtener asesoramiento y defensa legal.;protecciones,juridicas,S.A.,S.L.,S.C.,sociedades,anonimas,limitadas,civiles,cooperativas,empresas",
ruta+"seguros/autocaravanas/rc_campista;Responsabilidad Civil para el campista;Seguro de Responsabilidad Civil para el campista, protéjase ante las reclamaciones que pueda recibir con motivo de su responsabilidad civil particular, y la de su familia, cuando sea usuario de campings o zonas de acampada.;responsavilidad,civil,rc,campistas,autocaravanas,caravanas,camping,ocio,areas,tiendas,acampada"
)
	
	longitud = BaseDatos.length 
       
    //clave busqueda   
    var palabraClave = document.forms["FormBusqueda"].palabra.value  
       
    //detiene busqueda si palabra clave vacia   
    if ( palabraClave == "" ) {   
        alert("Introduzca texto para buscar")   
        return  
    }   
   
    //elimina acentos   
    var palabra_sin = elimina_especiales(palabraClave)  
       
    //obtiene la expresion regular para la busqueda (global e ignorando case)   
    clave1 = new RegExp(palabraClave, "gi")   
    clave2 = new RegExp(palabra_sin, "gi")   
  
    //inicia variables locales   
    var indice = -1   
       
    //busca entrada de pagina que contenga la clave   
    do {   
        indice = Buscaclave(FormBusqueda, indice + 1)   
        if (indice != -1) {   
            CreaEntradas(indice)   
            totales++   
        }    
    } while (indice != -1)   
       
    //escribe pagina de resultados   
    IniciaPagina(FormBusqueda)   
    Pagina += Entradas   
    TerminaPagina()   
  
    //abre una ventana y escribe los resultados   
	MuestraPagina(Pagina) 
}   
  
//SUSTITUYE TODAS LAS OCURRENCIAS DE UN CARACTER UNA CADENA POR OTRO CARACTER   
function sustituye_caracter(cadena, caracter, nuevo_caracter) {   
    var longitud, indice    
       
    longitud = cadena.length  
    indice = cadena.indexOf(caracter)   
    while ( (indice != -1) && (cadena.charAt(indice + 1) != ']') ) {   
            cadena = cadena.substring(0, indice) + nuevo_caracter + cadena.substring(indice + 1, longitud + 1)   
            indice = cadena.indexOf(caracter, indice)   
        }   
  
    return cadena   
}   
  
//ELIMINA CARACTERES ESPECIALES   
function elimina_especiales(cadena) {   
  
    //elimina caracteres con acento   
    for (x = 0; x < 5; x++) {   
        cadena = sustituye_caracter(cadena, caracter[x], caracter_nuevo[x])   
    }   
     
    //sustituye las vocales por una expresion regular para ignorar los acentos   
    for (x = 0; x < 5; x++) {   
        cadena = sustituye_caracter(cadena, caracter_nuevo[x], caracter_nuevo2[x])   
    }          
       
    return cadena   
}