///////////// despliegue inicial de elementos ///////////////
function iniciarPagina(tipo, idioma, marca, height)
{
    document.getElementById('marca').value = marca;
    //cargamos las marcas seleccionadas...
    var arrayMarcas = new Array();
    var splitMarcas = marca.split(',');
    if(splitMarcas.length>1)
    {
        for(var m=0;m<splitMarcas.length;m++){
            arrayMarcas.push(splitMarcas[m]);
        }
    
        switch(tipo.toLowerCase()){
            case 'turismo':
                marcasSelTurismo = arrayMarcas; break;
            case 'todoterreno':
                marcasSelTodoTerreno = arrayMarcas; break;
            case 'turismoytodoterreno':
                marcasSelTurismo = arrayMarcas; break;
            case 'moto':
                marcasSelMotos = arrayMarcas; break;
            case 'comercial':
                marcasSelComerciales = arrayMarcas; break;
            
        }
    }
    
    //alert(document.referrer); //apartados[0].funcion
    //if(document.referrer!="")
    {
	    tipoVehiculo=tipo;
	    apartado=0;
	    ocultarTodo();
	    precargarFlechasDesplazamiento();
	    
	    MM_findObj('lang').value=idioma;
	    cargarIdioma(idioma);
       
	}
	//else
	//    window.location.href="http://www.tarifika.com/auto";

    	  
    /*cambiamos el height de las clases de estilos*/
    var valor = parseInt(height)-parseInt("150");
    var strValor = (!isNaN(valor))?valor.toString()+"px":devolverPropiedadCss('.capaFormulario','height');
    setTimeout("cambiarPropiedadCss('.capaFormulario','height','"+strValor+"')", 1500);

    var strValorReloj = (!isNaN(valor))?height.toString()+"px":devolverPropiedadCss('#capaReloj','height');
    strValorReloj = (strValorReloj=="" && strValor!="")?parseInt(strValor)+parseInt("200")+"px":strValorReloj;
    setTimeout("cambiarPropiedadCss('#capaReloj','height','"+strValorReloj+"')", 1500);

}

function continuarInicio(){

	navegar();
	generarListasForm();

	if(tipoVehiculo!="") escogerTipoVehiculo(tipoVehiculo);
	else MM_findObj(apartados[apartado].nombre).style.display="block";
	
    //Precargamos los modelos de la marca que nos manden en la url
    var arrayRen = getArrayRequest(window.location.href);
    var marca = getValor(arrayRen ,"marca");
    MM_findObj("marca").value = marca; //"Renault";
    
    var splitMarcas = (marca!=undefined)?marca.split(','):"";
    if(marca!=undefined && marca!="" && (splitMarcas.length==1 && marca.toLowerCase()!="todas")){
        document.getElementById('tbOtrasMarcas').style.display='block';
        mostrarModelos(marca);
    }else{
        document.getElementById('tbOtrasMarcas').style.display='none';
        MM_findObj('titular_superior').innerHTML = apartados[apartado].textoInicial
    }
    
  
	
}

function generarListasForm(){
	for(i=0;i<apartados.length;i++){
		frm=apartados[i].formulario;
		total = frm.length;
		for(j=0;j<total;j++){
			if(frm[j].datosSelect!=null) generarSelect(frm[j], total, null, i);
		}
	}

}

function ocultarTodo(){
	for(i=0;i<apartados.length;i++){
		MM_findObj(apartados[i].nombre).style.display="none";
	}
}

function precargarFlechasDesplazamiento(){
//	flechaAtrasOK.src='imgs/interfaz/FlechaNaranja_atras.gif';
//	flechaAtrasKO.src='imgs/interfaz/FlechaGris_atras.gif';
//	flechaAdelanteOK.src='imgs/interfaz/FlechaNaranja_adelante.gif';
//	flechaAdelanteKO.src='imgs/interfaz/FlechaGris_adelante.gif';	

    var array = getArrayRequest(window.location.href);
    var css = getValor(array,"css");

    flechaAtrasOK.src='../SimaInstal/'+css+'/images/botonFlechaAntOn.png';
	flechaAtrasKO.src='../SimaInstal/'+css+'/images/botonFlechaAntOff.png';
	flechaAdelanteOK.src='../SimaInstal/'+css+'/images/botonFlechaSigOn.png';
	flechaAdelanteKO.src='../SimaInstal/'+css+'/images/botonFlechaSigOff.png';
}

////////////////////// navegacion ///////////////////////////////

function frmAdelante(apd){
	ad= (apd==undefined) ? apartado+1 : apd+1;
	if(apartados[ad].saltar) frmAdelante(ad);
	if(ad<apartados.length && apartados[apartado].realizado){
		MM_findObj(apartados[apartado].nombre).style.display="none";
		MM_findObj(apartados[ad].nombre).style.display="block";
		apartado=ad;
		navegar();
	}
	
	redimensionar();
}

//function getArrayRequest(url)
//{
//	var splitSrc = url.split('?');
//	var queryS = (splitSrc.length>1)?splitSrc[1]:"";

//    var arrayQueryS = new Array();
//    var splitQueryS = queryS.split('&');
//    for(var a=0;a<splitQueryS.length;a++)
//    {
//        var sP = splitQueryS[a].split('=');
//        arrayQueryS.push({
//                            value: sP[0],
//                            label: sP[1]
//                         });
//    }
//    
//    return arrayQueryS;

//}
//function getValor(array,value){

//    for(var a=0;a<array.length;a++){
//        if(array[a].value==value)
//            return array[a].label;
//    }

//}
function frmAtras(apd){

	ad =(apd==undefined) ? apartado-1 : apd-1;
	
    if(ad==0){
        //var elem = MM_findObj('bodyTarificador');
	    var array = getArrayRequest(window.location.href);
    	
	    var css=getValor(array,"css");
	    var lang = getValor(array,"lang");
	    lang = (lang=="")?"es":lang;
	    var id=getValor(array,"id");
	    
        //window.location = window.frameElement.src; //da error de permisos.
	    //window.location="../SimaInstal/"+css+"/presentacion.aspx?css="+css+"&lang="+lang+"";	
	    //window.location = "../Sima/Presentacion/index.aspx?id="+css+"&lang="+lang+"";
	    
	    var parametros = "id="+css;
		parametros+='&lang='+lang;
        obtenerRequest('consultas/obtenerLista.aspx', parametros, frmAtrasCallback, '', 'presentacion');
	    
	}else{   
        if(ad>0)
            if(apartados[ad].saltar) 
                frmAtras(ad);

        if(ad>0){
         
            MM_findObj(apartados[apartado].nombre).style.display="none";
            MM_findObj(apartados[ad].nombre).style.display="block";
            apartado=ad;
            navegar();
        }
    }
    
    //redimensionar();

}

function frmAtrasCallback()
{
    var index = http_request.responseText;
   
    window.location = "../Sima/Presentacion/"+index;
}

function onLoadFormulario(){

    var array = getArrayRequest(window.location.href);
    
    var tipoVehiculo = getValor(array,"id");;
    var idioma = getValor(array,"lang");;
    
    iniciarPagina(tipoVehiculo,idioma);

    var capa = getValor(array,"capa");
    capa = (typeof(capa) == "undefined")?"1":capa;
    
    //MM_findObj(apartados[1].nombre).style.display="none";
    //MM_findObj(apartados[capa].nombre).style.display="block";
    //alert(location.href);
}


function navegar()
{
	MM_findObj('titular_superior').innerHTML = apartados[apartado].textoInicial;
	
//	fAt=(apartado==0) ? flechaAtrasKO : flechaAtrasOK;
//	fAd=(apartado==apartados.length-2)? flechaAdelanteKO : flechaAdelanteOK;

//	MM_findObj('f_atras').src=fAt.src;
//	MM_findObj('f_adelante').src=fAd.src;

    setFlechas();
	
	if(apartados[apartado].funcion!=null && !apartados[apartado].realizado && apartados[apartado].formulario[0].valor==''){
		apartados[apartado].funcion();
	}
	else{
	    if(apartados[apartado].nombre=="frmMarca" && apartados[apartado].funcion!=null)
	        apartados[apartado].funcion();
	}

	
}


function setFlechas_old(){

    if(apartado==0){
        fAt = flechaAtrasKO ;
        MM_findObj('f_atras').style.cursor = "default";
    }else{
        fAt = flechaAtrasOK;
        MM_findObj('f_atras').style.cursor = "pointer";
    }
	MM_findObj('f_atras').src=fAt.src;
	
    if(apartados[apartado].realizado || apartados[apartado].saltar){
	    fAd = flechaAdelanteOK;
        MM_findObj('f_adelante').style.cursor = "pointer";
    }else{
        fAd = flechaAdelanteKO;
	    MM_findObj('f_adelante').style.cursor = "default";
    }
    MM_findObj('f_adelante').src=fAd.src;
}

function setFlechas(){

    if(apartado==0){
        MM_findObj('f_atras').className = "f_atras_Off";
    }else{
        MM_findObj('f_atras').className = "f_atras_On";
    }
    if(apartados[apartado].realizado || apartados[apartado].saltar){
	    MM_findObj('f_adelante').className = "f_adelante_On";
    }else{
	    MM_findObj('f_adelante').className = "f_adelante_Off";
    }
}



function limpiarApartados(){

	switch(apartados[apartado].nombre){
		case 'frmTipoVehiculo' :
		case 'frmMarca' :
		case 'frmModelo' :
		case 'frmAccesorios' : tope=obtenerPosApNombre('frmVersion'); break;
		case 'frmConductorOcasional' : tope=obtenerPosApNombre('frmSexoCO'); break;
		case 'CodCompaniaAnterior' : // tope=obtenerPosApNombre('frmFormalizacion'); break;
		case 'frmCompSeguros' : tope=obtenerPosApNombre('frmFormalizacion'); break; 
		default : tope=0;   //""
	}

	for(apd=apartado+1;apd<=tope;apd++){
		apartados[apd].realizado=false;
		frm = apartados[apd].formulario;
		for(s=0;s<frm.length;s++){
			act = (s==0) ? true : false;
			frm[s].activo=act;
			frm[s].valor='';
			MM_findObj(frm[s].campo).value='';
			if(!act) MM_findObj('cmp_'+frm[s].campo).style.display='none';
			if(frm[s].listaImagen) MM_findObj('cmp_'+frm[s].campo).innerHTML='';
		}	
	}

}

///////////////////// guardado de datos y navegacion automatica ///////////////////////////

function guardarValor(val, camp, idF, id){
	
	if(camp!=null) MM_findObj(camp).value=val;
	
	if(camp=='modelo'){
	
	    MM_findObj('feclan').value = (apartados[2].formulario[0].datosSelect!=null)?apartados[2].formulario[0].datosSelect[id].year+"01":"";
	    
	}
	
	if(id!=undefined){
		apartados[apartado].formulario[idF].valor=''+id;
	}else{
		idF = obtenerPosicionPorNombre(camp);
		apartados[apartado].formulario[idF].valor=' ';
	}
	
	limpiarApartados();
	try{
		
		datos = apartados[apartado].formulario[idF].datosSelect;
		for(i=0;i<datos.length;i++){
			cmp = MM_findObj('t_cmp_' + camp + '_' + i);
			if(i!=id){
			    cmp.className="noSeleccionado";
//				cmp.style.backgroundColor=blanco;
//				cmp.style.color=grisOscuro;
				datos[i].seleccionado=false;
			}else{
			    cmp.className="seleccionado";
//				cmp.style.backgroundColor=grisOscuro;
//				cmp.style.color=blanco;
				datos[i].seleccionado=true;
			}
		}

	}catch(ex){}
	
	fun = apartados[apartado].formulario[idF].funcion;
	if(fun!=null) fun();

	switch (apartado){
		case obtenerPosApNombre('frmAccesorios') : cont = (MM_findObj('catego').value==3) ? 1 : 0; break;
		case obtenerPosApNombre('frmAntiguedad') : cont = (MM_findObj('TipoVentaVehiculo').value=='NU') ? 1 : 0; break;
		case obtenerPosApNombre('frmAnnosCompAct') : 
		    if(MM_findObj('annosSinPartes').value=='-1' || parseInt(MM_findObj('annosSinPartes').value)>4){ //MM_findObj('annosSinPartes').value=='0' || 
		        cont =  1;
		        apartados[apartado].formulario[2].valor = '';
		    }
		    else   cont =  0;
		    break;
//		case obtenerPosApNombre('frmPartes') 	 : cont = (MM_findObj('annosSinPartes').value==-1) 
//															? 2 : (MM_findObj('annosSinPartes').value==0)
//															? 0 : (MM_findObj('annosSinPartes').value==6)
//															? 2 : 1; break;
		case obtenerPosApNombre("frmFechaNacCH") : //0. Se comprueba si es mayor 18años
		    if(MM_findObj('fechaExpedicionCH')!=null){
		        var splFecha = MM_findObj('fechaExpedicionCH').value.split('/');
		        if(splFecha.length>2){
		            if(!comprobarFechaExp(splFecha[0], splFecha[1], splFecha[2], 0)) {
		                idF = obtenerPosicionPorNombre('fechaExpedicionCH');
		                apartados[apartado].formulario[idF].valor='';
		                var txt = buscarTextoEsp('errorFechaExp');
			            alert(limpiarCadena(txt, HToU));
		            } 
		        }
		    }
		    cont = 0; break;
		case obtenerPosApNombre("frmFechaNacCO") : //1. Se comprueba si es mayor 18años
		    if(MM_findObj('fechaExpedicionCO')!=null){
		        var splFecha = MM_findObj('fechaExpedicionCO').value.split('/');
		        if(splFecha.length>2){
		            if(!comprobarFechaExp(splFecha[0], splFecha[1], splFecha[2], 1)) {
		                idF = obtenerPosicionPorNombre('fechaExpedicionCO');
		                apartados[apartado].formulario[idF].valor='';
		                var txt = buscarTextoEsp('errorFechaExp');
			            alert(limpiarCadena(txt, HToU));
		            } 
		        }
		    }
		    cont = 0; break;
		default: cont = 0; break;
	}

	for(i=0;i<apartados[apartado].formulario.length;i++){
		if(apartados[apartado].formulario[i].valor!='') cont++;
	}

	if(cont==apartados[apartado].formulario.length && apartado+1<apartados.length){
		apartados[apartado].realizado=true;
		frmAdelante();
	}
	
	try { 
		mostrarProgresoForm(); 
	} 
	catch(ex){}
    
}


//////////////////////// especiales vehiculo ///////////////////////////////

function escogerTipoVehiculo(tipo){
		switch(tipo.toLowerCase()){
			case 'turismo'      : marcasSeleccionadas=marcasSelTurismo; 
			                      categ='1';
								  cdtip='100,120';
								  marcarSeleccionado('c_tipo_0');
								  MM_findObj('plazas').value = "5";
								  break;
								  
			case 'todoterreno'  : marcasSeleccionadas=marcasSelTodoTerreno;
								  categ='1';
								  cdtip='150';
								  marcarSeleccionado('c_tipo_1');
								  MM_findObj('plazas').value = "5";
								  break;
			case 'turismoytodoterreno': 
			                      marcasSeleccionadas=marcasSelTurismo; 
			                      categ='1';
								  cdtip='100,120,150';
								  marcarSeleccionado('c_tipo_0');
								  MM_findObj('plazas').value = "5";
								  break;
								  
			case 'moto'         : marcasSeleccionadas=marcasSelMotos;
								  categ='3';
								  cdtip='240,280';
								  marcarSeleccionado('c_tipo_2');
								  MM_findObj('plazas').value = "1"; //  01/07/09: Se cambia de 2 a 1. 
								  break;
								  
			case 'comercial'    : marcasSeleccionadas=marcasSelComerciales;
								  categ='1';
								  cdtip='200,250,300,301,310,311';
								  marcarSeleccionado('c_tipo_3');
								  MM_findObj('plazas').value = "2";
								  break;
		}
		MM_findObj('tipo').value = tipo.toLowerCase();
		MM_findObj('catego').value=categ;
		MM_findObj('codtipinit').value=cdtip;
		limpiarApartados();
		apartados[apartado].realizado=true;
		apartados[apartado].formulario[0].valor=' ';
		frmAdelante();
		try { 
			mostrarProgresoForm(); 
		} catch(ex){}
}

function generarSelectAjaxModelos()
{
    xmldoc = http_request.responseXML;	
	
	if(navigator.appVersion.indexOf("MSIE 6.0")>0) //ie6
        xml = xmldoc.getElementsByTagName('root').context.childNodes.item(0);
    else
        xml = xmldoc.getElementsByTagName('root').item(0);
	
	lng = (xml!=null)?xml.childNodes.length:0;

	for(i=0;i<apartados.length;i++){
		for(j=0;j<apartados[i].formulario.length;j++){
			if(apartados[i].formulario[j].campo==campo){
				total=apartados[i].formulario.length;
				aux = apartados[i].formulario[j];
			}	
		}
	}
	
	
	
    var annosNuevo = 4;
    var currentDate = new Date();
	var currentYear = Number(currentDate.getFullYear());
	var year = currentYear - annosNuevo;
	
	
	aux.datosSelect=new Array();
	
    for (i = 0; i < lng; i++) {
        var node = xml.childNodes.item(i);
        valor = node.attributes.getNamedItem("Nombre").value;
        feclan = node.attributes.getNamedItem("UltFecLanzamiento").value;
		label = valor;

		aux.datosSelect.push({
		                    label:label, 
		                    value:valor,
		                    feclan:feclan,
		                    year:year
		                    });
    }	
    
    var auxModNuevos = new Array();
    var auxModAntiguos = new Array();
    for(var modI=0;modI<aux.datosSelect.length;modI++)
    {
        annoLan = parseInt(aux.datosSelect[modI].feclan.substring(0,4));
        if(annoLan >= year)    
            auxModNuevos.push(aux.datosSelect[modI]);
        else
            auxModAntiguos.push(aux.datosSelect[modI]);
        
    }
    
    //se limpia el array ...
	aux.datosSelect=new Array();
	aux.datosSelect.push({label:'-- Modelos nuevos --', value:'-1',feclan:''});
    for(var a=0;a<auxModNuevos.length;a++)
        aux.datosSelect.push(auxModNuevos[a]);
    
    aux.datosSelect.push({label:'-- Modelos antiguos --', value:'-1',feclan:''});
    for(var a=0;a<auxModAntiguos.length;a++){
        auxModAntiguos[a].feclan = "";
        aux.datosSelect.push(auxModAntiguos[a]);
    }
                
	generarSelect(aux, total);
}

function generarSelectAjax()
{
	xmldoc = http_request.responseXML;	
	
	if(navigator.appVersion.indexOf("MSIE 6.0")>0) //ie6
        xml = xmldoc.getElementsByTagName('root').context.childNodes.item(0);
    else
        xml = xmldoc.getElementsByTagName('root').item(0);
	
	lng = (xml!=null)?xml.childNodes.length:0;

	for(i=0;i<apartados.length;i++){
		for(j=0;j<apartados[i].formulario.length;j++){
			if(apartados[i].formulario[j].campo==campo){
				total=apartados[i].formulario.length;
				aux = apartados[i].formulario[j];
			}	
		}
	}
	
	aux.datosSelect=new Array();
	
	if(aux.campo=='potcv' || aux.campo=='motor' || aux.campo=='puerta'){
		aux.datosSelect.push({label:buscarTextoEsp('noSeguro'), value:''});
	}
	
    for (i = 0; i < lng; i++) {
        var node = xml.childNodes.item(i);
        valor = node.attributes.getNamedItem(campo).value;
		valor = (aux.campo=='potcv') ? limpiarPotencia(valor) : valor;
		label = (aux.campo=='motor') ? obtenerTipoMotor(valor) : ((aux.campo=='potcv')? valor+" CV": ((aux.campo=='puerta')?valor+" "+buscarTextoEsp('puerta') : valor));

		aux.datosSelect.push({label:label, value:valor});
    }	

	generarSelect(aux, total);
}


function mostrarSelectResto(){
	idForm = obtenerPosicionPorNombre('version');

    xmldoc = http_request.responseXML;
    
    if(navigator.appVersion.indexOf("MSIE 6.0")>0) //ie6
        completa = xmldoc.getElementsByTagName('root').context.childNodes.item(0);
    else
        completa = xmldoc.getElementsByTagName('root').item(0);
    
    arrayVersiones=new Array();

    if(completa!=null && typeof(completa)!="undefined"){
        for (i = 0; i < completa.childNodes.length; i++) {
            var node = completa.childNodes.item(i);
            
            mo=node.attributes.getNamedItem('motor').value;
            po=limpiarPotencia(node.attributes.getNamedItem('potcv').value);
            pu=node.attributes.getNamedItem('puerta').value;
            claveh = node.attributes.getNamedItem('claveh').value;
            codv = node.attributes.getNamedItem('codveh').value;
            mod = node.attributes.getNamedItem('modelo').value;
            ver = node.attributes.getNamedItem('version').value;
            ver = ver.split("|").join("&");
            fec = node.attributes.getNamedItem('feclan').value;

            pl = node.attributes.getNamedItem('plazas').value;
            cd = node.attributes.getNamedItem('codtip').value;

            arrayVersiones.push({
                                codveh: codv, 
                                modelo: mod, 
                                version: ver,
                                feclan: fec,
                                motor: mo, 
                                potcv: po, 
                                puerta: pu,
                                claveh: claveh,
                                plazas: pl,
                                codtip: cd});
            
        }
    }
	arrayVersiones.ordenar('feclan');
	apartados[apartado].formulario[idForm].datosSelect = arrayVersiones;
    generarTablaVersiones();
}


function rellenarCamposVehiculo(idVersion, idF){

    MM_findObj('version').value = arrayVersiones[idVersion].version;
    MM_findObj('feclan').value = arrayVersiones[idVersion].feclan.substr(0,4);
    MM_findObj('motor').value = arrayVersiones[idVersion].motor;
    MM_findObj('potcv').value = limpiarPotencia(arrayVersiones[idVersion].potcv);
    MM_findObj('puerta').value = arrayVersiones[idVersion].puerta;
    var claveh = arrayVersiones[idVersion].claveh;
    MM_findObj('claveh').value = claveh;
    //por ahora se establece el num de plazas segun la categoria del veh.
    //MM_findObj('plazas').value = arrayVersiones[idVersion].plazas;
    MM_findObj('codtip').value = arrayVersiones[idVersion].codtip;
    MM_findObj('codveh').value = arrayVersiones[idVersion].codveh;

	valVer = arrayVersiones[idVersion].version;
	valVer = (valVer!='') ? valVer : ' ';
	guardarValor(valVer, 'version', idF, idVersion);
}

////////////////// especiales compañias /////////////////////////////
function cambiarValorPartes(cmp, estado){
	vis = (estado) ? 'inline' : 'none';
	MM_findObj('cmp_'+cmp).style.display=vis;
}

function obtenerDatosCompanias(){
		camp='nombre,cod_dgs';
    	tb='mtcias';
    	parametros='1=1';
    	parametros+='&css='+MM_findObj('css').value;
        obtenerRequest('consultas/obtenerLista.aspx', parametros, generarSelectComp, tb, camp);
}

function generarSelectComp(){
	xmldoc = http_request.responseXML;	
    xml = xmldoc.getElementsByTagName('root').item(0);
	lng = xml.childNodes.length;

	for(i=0;i<apartados.length;i++){
		for(j=0;j<apartados[i].formulario.length;j++){
			if(apartados[i].formulario[j].campo==campo){
				total=apartados[i].formulario.length;
				aux = apartados[i].formulario[j];
			}	
		}
	}
	
	aux.datosSelect=new Array();

	aux.datosSelect.push({label:buscarTextoEsp('noComp').toUpperCase(), value:'noComp'});
	
    for (i = 0; i < lng; i++) {
        var node = xml.childNodes.item(i);
        label = node.attributes.getNamedItem('NombreCorto').value; //nombre
		value = node.attributes.getNamedItem('CodCompania').value; //cod_dgs
		aux.datosSelect.push({label:label, value:value});
    }
	generarSelect(aux, total);
}




/*mostrarmodelos*/
function mostrarModelos(marca)
{

    //document.getElementById('tbOtrasMarcas').style.display='block';
    
    limpiarApartados();

    document.getElementById('marca').value = marca;
    MM_findObj("marca").value = marca;

    apartados[1].realizado = true;
    apartados[1].saltar=true;
  
    //frmAdelante(){    
	MM_findObj(apartados[1].nombre).style.display="none";
	MM_findObj(apartados[2].nombre).style.display="block";
	apartado=2;
	navegar();
	//}
	
	    
    MM_findObj('titular_superior').innerHTML = apartados[apartado].textoInicial+" "+marca.toUpperCase();
        

   
}

function otrasMarcas(){
    apartados[1].saltar=false;
    frmAtras();
}




function validarTelefono(tfno)
{
    var val = false; 
    var primerNum = tfno.value.substring(0,1);
    if ( tfno.value =="" || (tfno.value.length == 9 && (primerNum == "" || primerNum == "9" || primerNum == "6" || primerNum == "8") ) )
    {
        val = true; 
        tfno.className="cabeceraVersion"; 
        tfno.title=""; 
    }else{
        tfno.className = "error";  
        tfno.title="No valido";
    }
    
    return val;

}
function validarEmail(elem){ //function isEmailAddress(theElement, nombre_del_elemento )
    
    var s = elem.value;
    var filter=/^[A-Za-z][A-Za-z0-9_.]*@[A-Za-z0-9_]+\.[A-Za-z0-9_.]+[A-za-z]$/;

    //alert(elem.value.length);
    if (elem.value.length==0 || filter.test(s))
    {
        elem.className = "cabeceraVersion";
        elem.title=""; 
        return true;
    }
    else
    {
        elem.className = "error"; //style.border="1px solid Red"; 
        elem.title="No valido";
        return false;
    }

}