if (history.forward(1)){location.replace(history.forward(1))}
ns=document.layers 
ie=document.all 
function esconde() 
{ 
if (ie) precarga.style.visibility="hidden"; 
if(ns) document.pregarga.visibility="hide"; 
} 
function MainP()
{
	var doc=document.form;
	doc.rut_s.focus();
}
function Search(page)
{
	 var doc=document.form;
	 if (page==1) 
	 {
		doc.action="ResultSobrepeso.asp";
		doc.target="Result" 
		doc.submit();
	 }
	 if (page==3) 
	 {
		doc.action="ResultSobredimension.asp";
		doc.target="Result" 
		doc.submit();
	 }
	 
	 if (page==4) 
	 {
		doc.action="ResultSobre_PD.asp";
		doc.target="Result" 
		doc.submit();
	 }
	 
	 if (page==2) 
	 {
	  doc.reset();
	 }
}

function ExitSps()
{
 var  doc=document.form;
 answer=confirm("¿Seguro que desea Salir de Sistema?\n'Aceptar' para Salir, 'Cancelar' para Volver.");
   if (answer==true)
	{
		doc.action="/login.asp";
		doc.submit();
	}
}

 function Suma()
 {
	var Tara = 0;
	var Carga = 0;
	var doc=document.form;
	parseFloat (Tara, Carga, answer);
	Carga=parseFloat(doc.carga.value);
	Tara=parseFloat(doc.tara.value);
	if (isNaN(Carga))
	 {
		Carga=0;
	 }	
	if (isNaN(Tara))
	 {
		Tara=0;
	 }	

	var answer=eval(parseFloat(Carga * 1) + parseFloat(Tara * 1)) ;
		Result=Math.round(answer*100)/100;
		if (Result==0){
			 doc.pbt.value='';}
		else{doc.pbt.value=Result;}
	//return (Result);
 }
	function Numeros(objeto)
			{
				var checkOK = "0123456789.0";
					var checkStr = objeto.value;
					var allValid = true;
					var decPoints = 0;
					var allNum = "";
					for (i = 0; i < checkStr.length; i++) 
					{
							ch = checkStr.charAt(i);
							for (j = 0; j < checkOK.length; j++)
									if (ch == checkOK.charAt(j))
									break;
									if (j == checkOK.length) 
									
									{
									allValid = false;
									break;
									}
									allNum += ch;
					}
					if (!allValid) 
					{
						objeto.value=""
					}
			}
			function Numers(objeto)
			{
				var checkOK = "01234567890";
					var checkStr = objeto.value;
					var allValid = true;
					var decPoints = 0;
					var allNum = "";
					for (i = 0; i < checkStr.length; i++) 
					{
							ch = checkStr.charAt(i);
							for (j = 0; j < checkOK.length; j++)
									if (ch == checkOK.charAt(j))
									break;
									if (j == checkOK.length) 
									
									{
									allValid = false;
									break;
									}
									allNum += ch;
					}
					if (!allValid) 
					{
						objeto.value=""
					}
			}	       
			function Letras(objeto)
			{
				var checkOK = "ABCDEFGHIJKMNLÑOPQRSTUVWXYSZ-abcdefghyjkmnlñoprstuvwxyz1234567890";
					var checkStr = objeto.value;
					var allValid = true;
					var decPoints = 0;
					var allNum = "";
					for (i = 0; i < checkStr.length; i++) 
					{
							ch = checkStr.charAt(i);
							for (j = 0; j < checkOK.length; j++)
									if (ch == checkOK.charAt(j))
									break;
									if (j == checkOK.length) 
									
									{
									allValid = false;
									break;
									}
									allNum += ch;
					}
					if (!allValid) 
					{
						objeto.value=""
					}
			}
			
			function IsNumeric(valor) 
			{ 
			var log=valor.length; var sw="S"; 
			for (x=0; x<log; x++) 
			{ v1=valor.substr(x,1); 
			v2 = parseInt(v1); 
			//Compruebo si es un valor numérico 
			if (isNaN(v2)) { sw= "N";} 
			} 
			if (sw=="S") {return true;} else {return false; } 
			} 
			
			var primerslap=false; 
			var segundoslap=false; 
			function formateafecha(fecha) 
			{ 
			var long = fecha.length; 
			var dia; 
			var mes; 
			var ano; 
			
			if ((long>=2) && (primerslap==false)) { dia=fecha.substr(0,2); 
			if ((IsNumeric(dia)==true) && (dia<=31) && (dia!="00")) { fecha=fecha.substr(0,2)+"/"+fecha.substr(3,7); primerslap=true; } 
			else { fecha=""; primerslap=false;} 
			} 
			else 
			{ dia=fecha.substr(0,1); 
			if (IsNumeric(dia)==false) 
			{fecha="";} 
			if ((long<=2) && (primerslap=true)) {fecha=fecha.substr(0,1); primerslap=false; } 
			} 
			if ((long>=5) && (segundoslap==false)) 
			{ mes=fecha.substr(3,2); 
			if ((IsNumeric(mes)==true) &&(mes<=12) && (mes!="00")) { fecha=fecha.substr(0,5)+"/"+fecha.substr(6,4); segundoslap=true; } 
			else { fecha=fecha.substr(0,3);; segundoslap=false;} 
			} 
			else { if ((long<=5) && (segundoslap=true)) { fecha=fecha.substr(0,4); segundoslap=false; } } 
			if (long>=7) 
			{ ano=fecha.substr(6,4); 
			if (IsNumeric(ano)==false) { fecha=fecha.substr(0,6); } 
			else { if (long==10){ if ((ano==0) || (ano<1900) || (ano>2100)) { fecha=fecha.substr(0,6); } } } 
			} 
			
			if (long>=10) 
			{ 
			fecha=fecha.substr(0,10); 
			dia=fecha.substr(0,2); 
			mes=fecha.substr(3,2); 
			ano=fecha.substr(6,4); 
			// Año no viciesto y es febrero y el dia es mayor a 28 
			if ( (ano%4 != 0) && (mes ==02) && (dia > 28) ) { fecha=fecha.substr(0,2)+"/"; } 
			} 
			return (fecha); 
			} 
			function oNumero(numero)
			{
			//Propiedades 
			this.valor = numero || 0
			this.dec = -1;
			//Métodos 
			this.formato = numFormat;
			this.ponValor = ponValor;
			//Definición de los métodos 
			function ponValor(cad)
			{
			if (cad =='-' || cad=='+') return
			if (cad.length ==0) return
			if (cad.indexOf('.') >=0)
				this.valor = parseFloat(cad);
			else 
				this.valor = parseInt(cad);
			} 
			function numFormat(dec, miles)
			{
			var num = this.valor, signo=3, expr;
			var cad = ""+this.valor;
			var ceros = "", pos, pdec, i;
			for (i=0; i < dec; i++)
			ceros += '0';
			pos = cad.indexOf('.')
			if (pos < 0)
				cad = cad+"."+ceros;
			else
				{
				pdec = cad.length - pos -1;
				if (pdec <= dec)
					{
					for (i=0; i< (dec-pdec); i++)
						cad += '0';
					}
				else
					{
					num = num*Math.pow(10, dec);
					num = Math.round(num);
					num = num/Math.pow(10, dec);
					cad = new String(num);
					}
				}
			pos = cad.indexOf('.')
			if (pos < 0) pos = cad.lentgh
			if (cad.substr(0,1)=='-' || cad.substr(0,1) == '+') 
				   signo = 4;
			if (miles && pos > signo)
				do{
					expr = /([+-]?\d)(\d{3}[\.\,]\d*)/
					cad.match(expr)
					cad=cad.replace(expr, RegExp.$1+','+RegExp.$2)
					}
			while (cad.indexOf(',') > signo)
				if (dec<0) cad = cad.replace(/\./,'')
					return cad;
			}
			}//Fin del objeto oNumero:
			function Ing(obj_a, obj_b)
			{
				if (obj_a.value=='')
				{
					obj_b.value='';
				}
			}
			
			function limite(que,cuanto,elem)
			{
			var e=elem.value;	
			var v=que.value;
			if(v.length>cuanto)
			  que.value=v.substring(0,cuanto)
			else
			  elem.value=cuanto-v.length//contador
			}
//******************************************************************
function darFormatoRut10(chrcadena)
{
  //se completa de ceros a la izquierda a la cadena que contiene al RUT completo
  if (chrcadena.length <10)
  {
    ii=10-chrcadena.length;
	for (i= 1;i<=ii;i++)
	{
	  chrcadena="0"+chrcadena;
	}
  }
  return (chrcadena)
}
//******************************************************************
function modulo11Rut10(chrcadena)
{
  digitoverificador=""
  digitos= new Array(12)
  acum=0
  modulo=0
  valido=-1
  chrcadena=darFormatoRut10(chrcadena);
  if (chrcadena.substring(9,9+1) =="k" || chrcadena.substring(9,9+1) =="K")
  {
    digitoverificador="K";
  }
  else
  {
	digitoverificador=chrcadena.substring(9,9+1);
  }

  for (acum=0;acum<10;acum++)
  {
    digitos[acum]=chrcadena.substring(acum,acum+1);
  }
  acum=0
  acum=digitos[0]*4+digitos[1]*3+digitos[2]*2+digitos[3]*7+digitos[4]*6+digitos[5]*5+digitos[6]*4+digitos[7]*3+digitos[8]*2
  digi=0;
  modulo = 11 - (acum % 11)
  if (modulo==10)
    digi="K"
  else
    if (modulo==11)
      digi="0"
    else
      digi=modulo
  if (digi==digitoverificador)
    valido=0
	
  return(valido)
}
//******************************************************************
function validaRut10(cad,campo)
{
  if (modulo11Rut10(cad) == 0)
    return true;
  else
  {
    alert("El número de ingresado para el campo " + campo + " no es válido");
    return false;
  }
}
//******************************************************************
function verifica_mail(cad,campo){var contarr=0;var contpun=0;var cadextr="áéíóú´ñ!¡?¿ç{}[]û*/+#$%&()=;:' \t";
	cad = cad.toLowerCase();
	if (cad.length== 0){return true;};
	for (var i=0; i < cad.length;i++){
		var letra=cad.substring(i,i+1);
		if (cadextr.indexOf(letra) > 0 ||  letra=='"'){alert("el campo " + campo + " no debe contener el caracter " + letra);return false;}
		if (letra == "@"){contarr++;}
		if (letra == "."){contpun++;}
	}
	if (contarr > 1){alert("el campo " + campo + " no debe contener más de un caracter @");return false;}
	if (contarr == 0){alert("el campo " + campo + " debe contener por lo menos un caracter @");return false;}
	if (contpun < 1){alert("el campo " + campo + " debe contener por lo menos un punto .");return false;}
	return true;
}
//******************************************************************
function verifica_numeros(cad,campo){var cadval="1234567890";
    	if (cad.length==0){ return true;}
    	for (var i=0;i<cad.length;i++){
			var letra=cad.substring(i,i+1);
	      	if(cadval.indexOf(letra)<0) {alert("Debe ingresar sólo números en el campo " + campo);return false;}
	    }
    	return true;
}
function Login(val)
{
		var Cm="Debe completar campo"
		var Cs="Debe seleccionar campo"
	    var doc=document.form;
			//******************************************************
			if (doc.rut_s.value=='')
			{
					alert(Cm + ' [ R.U.N del Solicitante ]')
					doc.rut_s.focus();
					doc.rut_s.style.backgroundColor="#FFFF99";
					return false;
			}
			if (!verifica_numeros(doc.rut_s.value,'R.U.N del Solicitante'))
			{
			  doc.rut_s.focus();
			  doc.rut_s.style.backgroundColor="#FFFF99";
			  return false;
			}
			primera=doc.rut_s.value;
			if (primera.length <7)
			{ alert("El R.U.N debe ser mayor a 6 digitos.");
			  doc.rut_s.focus();
			  doc.rut_s.style.backgroundColor="#FFFF99";
			  return false;
			}
			var rutsol=darFormatoRut10(doc.rut_s.value + doc.dv_s.value);
			if (!validaRut10(rutsol,'R.U.N del Solicitante'))
			 {
				doc.dv_s.focus();
				return false;
			}	
			if (val==0)
			{
				if (doc.userpwd.value=='')
				{
					alert(Cm + ' [ Contraseña ]')
					doc.userpwd.focus();
					doc.userpwd.style.backgroundColor="#FFFF99";
					return false;
				}
				if (doc.userpwd.value!='')
				{			
					if(doc.userpwd.value.length<5)
						{
							alert('La contraseña no puede tener menos de 6 caracteres')	
							doc.userpwd.style.backgroundColor="#FFFF99";
							doc.userpwd.focus();
							return false;
						}
				}
			}
			//******************************************************
			if (doc.rut_e.value!='')
			{
					if (!verifica_numeros(doc.rut_e.value,'R.U.T de la Empresa'))
					{
					  doc.rut_e.focus();
					  doc.rut_e.style.backgroundColor="#FFFF99";
					  return false;
					}
					primera=doc.rut_e.value;
					if (primera.length <7)
					{ alert("El R.U.T debe ser mayor a 6 digitos.");
					  doc.rut_e.focus();
					  doc.rut_e.style.backgroundColor="#FFFF99";
					  return false;
					}
					var rutsol=darFormatoRut10(doc.rut_e.value + doc.dv_e.value);
					if (!validaRut10(rutsol,'R.U.T de la Empresa'))
					 {
						doc.dv_e.focus();
						return false;
					}	
		    }
		if (val==1)
		{
			doc.action="RecoveryPass.asp";
			doc.submit();
		}
}
function Formslt()
	{
		var Cm="Debe completar campo"
		var Cs="Debe seleccionar campo"
		var doc=document.form;
					if (doc.nombre_e.value=='')
					{
						alert(Cm + ' [ Nombre Empresa ]')
						doc.nombre_e.focus();
						doc.nombre_e.style.backgroundColor="#FFFF99";
						return false;
					}
					//****************************************************
						if (doc.rut_e.value=='')
						{
								alert(Cm + ' [ R.U.T Empresa ]')
								doc.rut_e.focus();
								doc.rut_e.style.backgroundColor="#FFFF99";
								return false;
						}
						if (!verifica_numeros(doc.rut_e.value,'R.U.T de la Empresa'))
						{
						  doc.rut_e.focus();
						  doc.rut_e.style.backgroundColor="#FFFF99";
						  return false;
						}
						primera=doc.rut_e.value;
						if (primera.length <7)
						{ alert("Debe de ingresar un R.U.T mayor a 6 digitos.");
						  doc.rut_e.focus();
						  doc.rut_e.style.backgroundColor="#FFFF99";
						  return false;
						}
						var rutsol=darFormatoRut10(doc.rut_e.value + doc.dv_e.value);
						if (!validaRut10(rutsol,'R.U.T de la Empresa'))
						 {
						doc.dv_e.focus();
						return false;
						}					
					//****************************************************
					if (doc.region_e.value=='')
					{
						alert(Cs + ' [ Región Empresa ]')
						doc.region_e.focus();
						doc.region_e.style.backgroundColor="#FFFF99";
						return false;
					}
					if (doc.comuna_e.value=='' || doc.comuna_e.value==0)
					{
						alert(Cs + ' [ Comuna Empresa ]')
						doc.comuna_e.focus();
						doc.comuna_e.style.backgroundColor="#FFFF99";
						return false;
					}
					if (doc.ciudad_e.value=='')
					{
						alert(Cm + ' [ Ciudad Empresa ]')
						doc.ciudad_e.focus();
						doc.ciudad_e.style.backgroundColor="#FFFF99";
						return false;
					}
					if (doc.domicilio_e.value=='')
					{
						alert(Cm + ' [ Domicilio Empresa ]')
						doc.domicilio_e.focus();
						doc.domicilio_e.style.backgroundColor="#FFFF99";
						return false;
					}
					if (doc.fono_e.value=='')
					{
						alert(Cm + ' [ Telefono Empresa ]')
						doc.fono_e.focus();
						doc.fono_e.style.backgroundColor="#FFFF99";
						return false;
					}
					if (!verifica_mail(document.form.correo_e.value,'e-mail de solicitante'))
					 {
						doc.correo_e.focus();
						doc.correo_e.style.backgroundColor="#FFFF99";
						return false;
					 }			
					//******************************************************
					if (doc.nombres.value=='')
					{
						alert(Cm + ' [ Nombres Solicitante ]')
						doc.nombres.focus();
						doc.nombres.style.backgroundColor="#FFFF99";
						return false;
					}			
					if (doc.apellidos.value=='')
					{
						alert(Cm + ' [ Apellidos Solicitante ]')
						doc.apellidos.focus();
						doc.apellidos.style.backgroundColor="#FFFF99";
						return false;
					}
					//******************************************************
						if (doc.rut_s.value=='')
						{
								alert(Cm + ' [ R.U.N del Solicitante ]')
								doc.rut_s.focus();
								doc.rut_s.style.backgroundColor="#FFFF99";
								return false;
						}
						if (!verifica_numeros(doc.rut_s.value,'R.U.N del Solicitante'))
						{
						  doc.rut_s.focus();
						  doc.rut_s.style.backgroundColor="#FFFF99";
						  return false;
						}
						primera=doc.rut_s.value;
						if (primera.length <7)
						{ alert("Debe de ingresar un R.U.N mayor a 6 digitos.");
						  doc.rut_s.focus();
						  doc.rut_s.style.backgroundColor="#FFFF99";
						  return false;
						}
						var rutsol=darFormatoRut10(doc.rut_s.value + doc.dv_s.value);
						if (!validaRut10(rutsol,'R.U.N del Solicitante'))
						 {
							doc.dv_s.focus();
							return false;
						}					
					//******************************************************
					if (doc.region_s.value=='')
					{
						alert(Cm + ' [ Región Solicitante ]')
						doc.region_s.focus();
						doc.region_s.style.backgroundColor="#FFFF99";
						return false;
					}				
					if (doc.comuna_s.value=='' || doc.comuna_s.value==0)
					{
						alert(Cm + ' [ Comuna Solicitante ]')
						doc.comuna_s.focus();
						doc.comuna_s.style.backgroundColor="#FFFF99";
						return false;
					}			
					if (doc.direccion_s.value=='')
					{
						alert(Cm + ' [ Domicilio Solicitante ]')
						doc.direccion_s.focus();
						doc.direccion_s.style.backgroundColor="#FFFF99";
						return false;
					}				
					if (doc.fono_s.value=='')
					{
						alert(Cm + ' [ Telefono Solicitante ]')
						doc.fono_s.focus();
						doc.fono_s.style.backgroundColor="#FFFF99";
						return false;
					}	
					if (doc.correo_s.value=='')
					{
						alert(Cm + ' [ Email Solicitante ]')
						doc.correo_s.focus();
						doc.correo_s.style.backgroundColor="#FFFF99";
						return false;
					}	
					if (!verifica_mail(document.form.correo_s.value,'e-mail de solicitante'))
					 {
						doc.correo_s.focus();
						doc.correo_s.style.backgroundColor="#FFFF99";
						return false;
					 }	
					 if (doc.condiciones.checked==false)
					 {
						 alert('Debe aceptar la condiciones de uso para continuar...')
						 document.getElementById('cond').style.backgroundColor="#FFFF99";
						 return false;
					 }
			answer=confirm("¿ Seguro que desea Guardar la información?\n'Aceptar' para Guardar, 'Cancelar' para Volver. ");
		    if (answer==true)
			  {
				  doc.action="Nueva_Empresa.asp";
				  doc.submit();
			  }else{return false;}

   }
    	function sugerencia(val)
		{
			var doc=document.form;
					if (doc.nombres.value=="")
					{
						alert("Debe completar el campo - Nombres")
						doc.nombres.focus()
						doc.nombres.style.backgroundColor="#FFFF99";
						return false;
					}
					
					if (doc.apellidos.value=="")
					{
						alert("Debe completar el campo - Apellidos")
						doc.apellidos.focus()
						doc.apellidos.style.backgroundColor="#FFFF99";
						return false;
					}
	   				
					if (doc.email.value=="")
					{
						alert("Debe completar el campo - Email")
						doc.email.focus()
						doc.email.style.backgroundColor="#FFFF99";
						return false;
					}
					
					if (!verifica_mail(doc.email.value,'e-mail'))
				  	{
						doc.email.focus();
						doc.email.style.backgroundColor="#FFFF99";
						return false;
				  	}
					
					if (doc.telefono.value=="")
					{
						alert("Debe completar el campo - Telefono")
						doc.nombres.focus()
						doc.nombres.style.backgroundColor="#FFFF99";
						return false;
					}
					
					if (doc.mensaje.value=="")
					{
						alert("Debe completar el campo - Mensaje.")
						doc.mensaje.focus();
						doc.mensaje.style.backgroundColor="#FFFF99";
						return false;
					}
					if (doc.mensaje.length <7)
					{ alert("Pocos caracteres en el campo - Mensaje.");
					  doc.mensaje.focus();
					  doc.mensaje.style.backgroundColor="#FFFF99";
					  return false;
					}
			if (val==1)
			{
				doc.action="Consultas_sps.asp";
			}else
			{
				doc.action="Consultas.asp";	
			}
				  doc.submit();
		 }
			function dimension(tip)
			{
				doc=document.form;
				if (tip==1)//Ancho
					{
						if (parseFloat(doc.ancho_p.value)>parseFloat(doc.ancho_c.value))
							{doc.ancho.value=doc.ancho_p.value;}
						else
							{doc.ancho.value=doc.ancho_c.value;}
					}
				if (tip==2)//Alto
					{
						var Suma=parseFloat(doc.alto_p.value) + parseFloat(doc.alto_c.value);
						if (isNaN(Suma))
						{
							Suma='';
						}
						doc.alto.value=Math.round(Suma*100)/100;
					}
			}