// JavaScript Document
function new_win(login, estado){
	if (estado==0){
		x = open('login/hijos.php?login='+login,'X','scrollbars=no,resizable=no,toolbar=no,width=300,height=250,location=0,left = 0,top = 0');
	}
	if (estado==1){
		x = open('login/antecedentes.php?login='+login,'X','scrollbars=YES,resizable=no,toolbar=no,width=400,height=400,location=0,left = 0,top = 0');
	}
} 

function open_two_win(cont){
	if (cont==0){
		y = open('thumnb/picture2.html','Y','scrollbars=no,resizable=no,toolbar=no,width=500,height=408,location=0,left = 500,top = 0');
		x = open('thumnb/bodeg.html','X','scrollbars=no,resizable=no,toolbar=no,width=600,height=408,location=0,left = 0,top = 0');
	}
	if (cont==1){
		y = open('thumnb/picture2.html','Y','scrollbars=no,resizable=no,toolbar=no,width=500,height=408,location=0,left = 0,top = 0');
	}
	if (cont==2){
		x = open('thumnb/bodeg.html','X','scrollbars=no,resizable=no,toolbar=no,width=600,height=408,location=0,left = 0,top = 0');
	}
}

function clearBox(form){
form.emailnews.value = "";
}

function validar(){
    with(busqueda){
        if(palabras.value==""){
            alert('Digite una palabra para la búsqueda.');
            palabras.focus();
            return false;
        }
         
		 if(sections.value==""){
            alert('Escoja un sección para la búsqueda.');
            sections.focus();
            return false;
        }
         
   }
}

function OpenMapa(level) {
if (level == 1)
   x = open('mapa/mapa_dosis.htm','X','scrollbars=no,resizable=no,toolbar=no,width=750,height=450,location=0,left = 0,top = 0');
else
   if  (level == 2)
       x = open('../mapa/mapa_dosis.htm','X','scrollbars=no,resizable=no,toolbar=no,width=750,height=450,location=0,left = 0,top = 0');
   else
      if  (level == 2)
          x = open('../../mapa/mapa_dosis.htm','X','scrollbars=no,resizable=no,toolbar=no,width=750,height=450,location=0,left = 0,top = 0');
    

}

function OpenPassRem(level) {
//Modificado por Mauricio Escobar Mayo 6 de 2003, no tenia la variable level 
if (level==1)
	x = open('login/olvido.php','X','scrollbars=no,resizable=no,toolbar=no,width=300,height=300,location=0,left = 0,top = 0');
else
	if (level==2)
		x = open('../login/olvido.php','X','scrollbars=no,resizable=no,toolbar=no,width=300,height=300,location=0,left = 0,top = 0');
	else
		if (level==3)
			x = open('../../login/olvido.php','X','scrollbars=no,resizable=no,toolbar=no,width=300,height=300,location=0,left = 0,top = 0');
}

function calculator(){
var indx=document.calculadoras_form.calculadoras.options.selectedIndex;
var ind= document.calculadoras_form.calculadoras.options[indx].value;
if (ind > 0)
document.location.href = "calculadoras/index.php?cal=" + ind;
}
function enviar (){
var indice=document.login_formi.sel_temas.options.selectedIndex;
var val= document.login_formi.sel_temas.options[indice].value;
document.location.href = "temas_salud/tema_salud.php?sel_temas="+val ;
}
function abrir (){

var val1= document.login_form.spq.value;
var val2= document.login_form.spa.value;
document.location.href = "http://search.atomz.com/search/?sp-q="+val1+"&sp-a="+val2 ;
}
function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a||i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}


function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}


function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}


function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}




//Funcion que abre una ventana nueva
function abre_win(destino,ancho,alto){
msg=open(destino,"Win_preliminar","toolbar=no,directories=no,scrollbars=yes,menubar=no,width="+ancho+",height="+alto);
}
function abre_win1(destino,ancho,alto,correo){
msg=open(destino + correo,"Win_preliminar","toolbar=no,directories=no,scrollbars=yes,menubar=no,width="+ancho+",height="+alto);
self.name = "main1";
}
function abre_win2(destino,ancho,alto,valor){
msg=open(destino + valor,"Win_preliminar","toolbar=yes,directories=yes,scrollbars=yes,menubar=yes,resizable=yes,width="+ancho+",height="+alto);
//self.name = "main1";
}


<!-- Principio
function emailCheck_news (emailStr, form) {
/* Verificar si el email tiene el formato user@dominio. */
var emailPat=/^(.+)@(.+)$/ 

/* Verificar la existencia de caracteres. ( ) < > @ , ; : \ " . [ ] */
var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]" 

/* Verifica los caracteres que son válidos en una dirección de email */
var validChars="\[^\\s" + specialChars + "\]" 

var quotedUser="(\"[^\"]*\")" 

/* Verifica si la dirección de email está representada con una dirección IP Válida */ 


var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/


/* Verificar caracteres inválidos */ 

var atom=validChars + '+'
var word="(" + atom + "|" + quotedUser + ")"
var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
/*domain, as opposed to ipDomainPat, shown above. */
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")



var matchArray=emailStr.match(emailPat)
if (matchArray==null) {
alert("La direccion es incorrecta (falta @ and .'s)")
return false;
}
var user=matchArray[1]
var domain=matchArray[2]

// Si el user "user" es valido 
if (user.match(userPat)==null) {
// Si no
alert("El nombre de usuario no es válido.")
return false;
}

/* Si la dirección IP es válida */
var IPArray=domain.match(ipDomainPat)
if (IPArray!=null) {
for (var i=1;i<=4;i++) {
if (IPArray[i]>255) {
alert("IP de destino inválida")
return false;
}
}
return true;
}

var domainArray=domain.match(domainPat)
if (domainArray==null) {
alert("El dominio parece no ser válido.")
return false;
}

var atomPat=new RegExp(atom,"g")
var domArr=domain.match(atomPat)
var len=domArr.length
if (domArr[domArr.length-1].length<2 || 
domArr[domArr.length-1].length>3) { 

alert("La dirección debe tener 3 letras si es .com o 2 si en de algún pais.")
return false;
}

if (len<2) {
var errStr="La dirección es erronea"
alert(errStr)
return false;
}

// La dirección de email ingresada es Válida


form.correo.value=emailStr;
//newsletters.submit();
}
// End -->

function emailCheck(emailStr) {
/* Verificar si el email tiene el formato user@dominio. */
var emailPat=/^(.+)@(.+)$/ 

/* Verificar la existencia de caracteres. ( ) < > @ , ; : \ " . [ ] */
var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]" 

/* Verifica los caracteres que son válidos en una dirección de email */
var validChars="\[^\\s" + specialChars + "\]" 

var quotedUser="(\"[^\"]*\")" 

/* Verifica si la dirección de email está representada con una dirección IP Válida */ 


var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/


/* Verificar caracteres inválidos */ 

var atom=validChars + '+'
var word="(" + atom + "|" + quotedUser + ")"
var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
/*domain, as opposed to ipDomainPat, shown above. */
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")



var matchArray=emailStr.match(emailPat)
if (matchArray==null) {
alert("La direccion es incorrecta (falta @ and .'s)")
return false;
}
var user=matchArray[1]
var domain=matchArray[2]

// Si el user "user" es valido 
if (user.match(userPat)==null) {
// Si no
alert("El nombre de usuario no es válido.")
return false;
}

/* Si la dirección IP es válida */
var IPArray=domain.match(ipDomainPat)
if (IPArray!=null) {
for (var i=1;i<=4;i++) {
if (IPArray[i]>255) {
alert("IP de destino inválida")
return false;
}
}
return true;
}

var domainArray=domain.match(domainPat)
if (domainArray==null) {
alert("El dominio parece no ser válido.")
return false;
}

var atomPat=new RegExp(atom,"g")
var domArr=domain.match(atomPat)
var len=domArr.length
if (domArr[domArr.length-1].length<2 || 
domArr[domArr.length-1].length>3) { 

alert("La dirección debe tener 3 letras si es .com o 2 si en de algún pais.")
return false;
}

if (len<2) {
var errStr="La dirección es erronea"
alert(errStr)
return false;
}

// La dirección de email ingresada es Válida
return true;
}
/**
 * DHTML date validation script. Courtesy of SmartWebby.com (http://www.smartwebby.com/dhtml/)
 */
// Declaring valid date character, minimum year and maximum year
var dtCh= "-";
var minYear=1900;
var maxYear=2010;


function isInteger(s){
	var i;
    for (i = 0; i < s.length; i++){   
        // Check that current character is number.
        var c = s.charAt(i);
        if (((c < "0") || (c > "9"))) return false;
    }
    // All characters are numbers.
    return true;
}

function stripCharsInBag(s, bag){
	var i;
    var returnString = "";
    // Search through string's characters one by one.
    // If character is not in bag, append to returnString.
    for (i = 0; i < s.length; i++){   
        var c = s.charAt(i);
        if (bag.indexOf(c) == -1) returnString += c;
    }
    return returnString;
}

function daysInFebruary (year){
	// February has 29 days in any year evenly divisible by four,
    // EXCEPT for centurial years which are not also divisible by 400.
    return (((year % 4 == 0) && ( (!(year % 100 == 0)) || (year % 400 == 0))) ? 29 : 28 );
}
function DaysArray(n) {
	for (var i = 1; i <= n; i++) {
		this[i] = 31
		if (i==4 || i==6 || i==9 || i==11) {this[i] = 30}
		if (i==2) {this[i] = 29}
   } 
   return this
}

function isDate(dtStr){
    
	var daysInMonth = DaysArray(12)
	var pos1=dtStr.indexOf(dtCh)
	var pos2=dtStr.indexOf(dtCh,pos1+1)
	var strYear=dtStr.substring(0,pos1)
	var strMonth=dtStr.substring(pos1+1,pos2)
	var strDay=dtStr.substring(pos2+1)
	
	
	strYr=strYear
	if (strDay.charAt(0)=="0" && strDay.length>1) strDay=strDay.substring(1)
	if (strMonth.charAt(0)=="0" && strMonth.length>1) strMonth=strMonth.substring(1)
	for (var i = 1; i <= 3; i++) {
		if (strYr.charAt(0)=="0" && strYr.length>1) strYr=strYr.substring(1)
	}
	

	month=parseInt(strMonth)
	day=parseInt(strDay)
	year=parseInt(strYr) 
	
	if (pos1==-1 || pos2==-1){   
		alert("El formato de la fecha debe ser : mm/dd/yyyy")
		return false
	}
	if (strMonth.length<1 || month<1 || month>12){
	    
		alert("Por favor ingrese un més válido")
		return false
	}
	if (strDay.length<1 || day<1 || day>31 || (month==2 && day>daysInFebruary(year)) || day > daysInMonth[month]){
		alert("Por favor ingrese un dia valido")
		return false
	}
	if (strYear.length != 4 || year==0 || year<minYear || year>maxYear){
		alert("Por favor ingrese un año valido entre:"+minYear+" y "+maxYear)
		return false
	}
	if (dtStr.indexOf(dtCh,pos2+1)!=-1 || isInteger(stripCharsInBag(dtStr, dtCh))==false){
		alert("Por favor ingrese una fecha válida")
		return false
	}
return true
}

function ValidateForm(){
	var dt=document.frmSample.txtDate
	if (isDate(dt.value)==false){
		dt.focus()
		return false
	}
    return true
 }



/*function edad(){
	var i = 0;	
	var cuantas = 0;
	for(i=0; i< document.registro.elements.length; i ++){
		if(document.registro.elements[i].name=="edades" && document.registro.elements[i].type == "checkbox" && document.registro.elements[i].checked==true){
			cuantas++;
		}
	}
	return cuantas;
}*/

/*function formCheck(){

var ind= registro.mes.options.selectedIndex;
 var mes=registro.mes.options[ind].value;
 var strDate=mes + "/" + registro.dia.value + "/" + registro.ano.value;

<!-- checkear campos vacios-->
if (registro.login.value=="")
    alert ("Por favor digite un login")
else 
  if (registro.password.value =="")
       alert ("Por favor  digite un password");
  else
    if (registro.repassword.value == "")
	    alert ("Por favor digite el password nuevamente");
    else
	 <!-- checkear que la los dos passwords sean iguales-->
     if (registro.password.value != registro.repassword.value)
         alert ("Los passwords digitados no son iguales")
     else  
        if (registro.respuesta.value == "")
		   alert ("Por favor digite una respuesta a la pregunta clave");
        else
             if (registro.nombres.value == "" )
			    alert ("Por favor digite un nombre")
             else
				if (registro.apellidos.value == "")
				    alert ("Por favor digite un apellido")
                else 
                     
					 
					 if (isDate (strDate)==false)
	                     alert ("Por favor revise la fecha");
	                 else
					    if (registro.ciudad.value == "")
						     alert ("Por favor digite una ciudad");
						else 
				         if (emailCheck(registro.correo.value)==false)
                             alert ("Por favor revise el correo"); 
					     else
						     {
							 	registro.fecha_nacimiento.value = strDate
						     	if (registro.hijos.value!="No"){
							 			valor=edad();	
										if (valor==0){
											alert("Debe seleccionar un rango de edad para su(s) hijo(s)");
										}
										else{
											if (valor>registro.hijos.value){
												alert("No puede seleccionar mas rangos de edades que numero de hijos");
											}
											else{registro.submit();}
										}
							 	}
							 	else{registro.submit();}
						     }
                    
    


}*/
function procesa_hijos(valor)
{
	//alert(valor);
	if (valor==0){
		document.registro.ano_hijo1.disabled = true;
		document.registro.mes_hijo1.disabled = true;
		document.registro.dia_hijo1.disabled = true;
		document.registro.ano_hijo2.disabled = true;
		document.registro.mes_hijo2.disabled = true;
		document.registro.dia_hijo2.disabled = true;
		document.registro.ano_hijo3.disabled = true;
		document.registro.mes_hijo3.disabled = true;
		document.registro.dia_hijo3.disabled = true;
		document.registro.ano_hijo4.disabled = true;
		document.registro.mes_hijo4.disabled = true;
		document.registro.dia_hijo4.disabled = true;

	}
	else if(valor == 1)
	{
		document.registro.ano_hijo1.disabled = false;
		document.registro.mes_hijo1.disabled = false;
		document.registro.dia_hijo1.disabled = false;
		document.registro.ano_hijo2.disabled = true;
		document.registro.mes_hijo2.disabled = true;
		document.registro.dia_hijo2.disabled = true;
		document.registro.ano_hijo3.disabled = true;
		document.registro.mes_hijo3.disabled = true;
		document.registro.dia_hijo3.disabled = true;
		document.registro.ano_hijo4.disabled = true;
		document.registro.mes_hijo4.disabled = true;
		document.registro.dia_hijo4.disabled = true;
	}
	else if(valor == 2)
	{
		document.registro.ano_hijo1.disabled = false;
		document.registro.mes_hijo1.disabled = false;
		document.registro.dia_hijo1.disabled = false;
		document.registro.ano_hijo2.disabled = false;
		document.registro.mes_hijo2.disabled = false;
		document.registro.dia_hijo2.disabled = false;
		document.registro.ano_hijo3.disabled = true;
		document.registro.mes_hijo3.disabled = true;
		document.registro.dia_hijo3.disabled = true;
		document.registro.ano_hijo4.disabled = true;
		document.registro.mes_hijo4.disabled = true;
		document.registro.dia_hijo4.disabled = true;

	}
	else if(valor == 3)
	{
		document.registro.ano_hijo1.disabled = false;
		document.registro.mes_hijo1.disabled = false;
		document.registro.dia_hijo1.disabled = false;
		document.registro.ano_hijo2.disabled = false;
		document.registro.mes_hijo2.disabled = false;
		document.registro.dia_hijo2.disabled = false;
		document.registro.ano_hijo3.disabled = false;
		document.registro.mes_hijo3.disabled = false;
		document.registro.dia_hijo3.disabled = false;
		document.registro.ano_hijo4.disabled = true;
		document.registro.mes_hijo4.disabled = true;
		document.registro.dia_hijo4.disabled = true;
	}
	else if(valor == 4)
	{
		document.registro.ano_hijo1.disabled = false;
		document.registro.mes_hijo1.disabled = false;
		document.registro.dia_hijo1.disabled = false;
		document.registro.ano_hijo2.disabled = false;
		document.registro.mes_hijo2.disabled = false;
		document.registro.dia_hijo2.disabled = false;
		document.registro.ano_hijo3.disabled = false;
		document.registro.mes_hijo3.disabled = false;
		document.registro.dia_hijo3.disabled = false;
		document.registro.ano_hijo4.disabled = false;
		document.registro.mes_hijo4.disabled = false;
		document.registro.dia_hijo4.disabled = false;
		
	}
}

function updateCheck(registro){

var ind= registro.mes.options.selectedIndex;
var mes=registro.mes.options[ind].value;
var strDate=registro.ano.value + "-" + mes + "-" + registro.dia.value;
var con=registro.hijos.options.selectedIndex;
var hij=registro.hijos.options[con].value;
var flag=true;
<!-- checkear campos vacios-->
    if (registro.nombres.value == "" ){
			    alert ("Por favor digite un nombre");
             flag=false;
			 }
				if (registro.apellidos.value == ""){
				    alert ("Por favor digite un apellido");
                 flag=false;
			 }
                     if (isDate (strDate)==false){
	                     alert ("Por favor revise la fecha");
	                 flag=false;
			 }
					    if (registro.ciudad.value == ""){
						     alert ("Por favor digite una ciudad");
						 flag=false;
			 }
				        
			 
							 	registro.fecha_nacimiento.value = strDate;
						     	registro.num_hijos.value=hij;	
								
if (flag)							 	
{registro.submit();}
						     
                    
    


}


function formCheck(registro){

var ind= registro.mes.options.selectedIndex;
var mes=registro.mes.options[ind].value;
var strDate=registro.ano.value + "-" + mes + "-" + registro.dia.value;
var con=registro.hijos.options.selectedIndex;
var hij=registro.hijos.options[con].value;

<!-- checkear campos vacios-->
if (registro.login.value=="")
    alert ("Por favor digite un login");
else
    if (registro.login.value.length < 6)
	    alert ("El login debe tener minimo 6 caracteres");
    else 
      if (registro.password.value =="")
        alert ("Por favor  digite un password");
      else
        if (registro.repassword.value == "")
	      alert ("Por favor digite el password nuevamente");
        else
	 <!-- checkear que la los dos passwords sean iguales-->
     if (registro.password.value != registro.repassword.value)
         alert ("Los passwords digitados no son iguales")
     else  
        if (registro.respuesta.value == "")
		   alert ("Por favor digite una respuesta a la pregunta clave");
        else
             if (registro.nombres.value == "" )
			    alert ("Por favor digite un nombre")
             else
				if (registro.apellidos.value == "")
				    alert ("Por favor digite un apellido")
                else 
                     if (isDate (strDate)==false)
	                     alert ("Por favor revise la fecha");
	                 else
					    if (registro.ciudad.value == "")
						     alert ("Por favor digite una ciudad");
						else 
				         if (emailCheck(registro.correo.value)==false)
                             alert ("Por favor revise el correo"); 
					     else
						     {
							 	registro.fecha_nacimiento.value = strDate;
						     	registro.num_hijos.value=hij;	
								if (hij>0){
							 				var ind1= registro.mes_hijo1.options.selectedIndex;
											var mes1=registro.mes_hijo1.options[ind1].value;
											var strDate1=registro.ano_hijo1.value + "-" + mes1 + "-" + registro.dia_hijo1.value;	
											var ind2= registro.mes_hijo2.options.selectedIndex;
											var mes2=registro.mes_hijo2.options[ind2].value;
											var strDate2=registro.ano_hijo2.value + "-" + mes2 + "-" + registro.dia_hijo2.value;
											var ind3= registro.mes_hijo3.options.selectedIndex;
											var mes3=registro.mes_hijo3.options[ind3].value;
											var strDate3=registro.ano_hijo3.value + "-" + mes3 + "-" + registro.dia_hijo3.value;
											var ind4= registro.mes_hijo4.options.selectedIndex;
											var mes4=registro.mes_hijo4.options[ind4].value;
											var strDate4=registro.ano_hijo4.value + "-" + mes4 + "-" + registro.dia_hijo4.value;
							 			if (hij==1){
											
											if (isDate (strDate1)==false)
	                     						alert ("Por favor revise la fecha de nacimiento de su primer hijo");
											else{
												registro.fecha_nacimiento_hijo1.value = strDate1;
												registro.submit();
											}
										}							
										if (hij==2){
											
											
											if (isDate (strDate1)==false)
	                     						alert ("Por favor revise la fecha de nacimiento de su primer hijo");
											else
												if (isDate (strDate2)==false)
	                     						alert ("Por favor revise la fecha de nacimiento de su segundo hijo");
												else{
													registro.fecha_nacimiento_hijo1.value = strDate1;
													registro.fecha_nacimiento_hijo2.value = strDate2;
													registro.submit();
												}
										}
										
							 			if (hij==3){
										
											
											
											if (isDate (strDate1)==false)
	                     						alert ("Por favor revise la fecha de nacimiento de su primer hijo");
											else
												if (isDate (strDate2)==false)
	                     						alert ("Por favor revise la fecha de nacimiento de su segundo hijo");
												else
													if (isDate (strDate3)==false)
	                     								alert ("Por favor revise la fecha de nacimiento de su tercer hijo");
													else{
													registro.fecha_nacimiento_hijo1.value = strDate1;
													registro.fecha_nacimiento_hijo2.value = strDate2;
													registro.fecha_nacimiento_hijo3.value = strDate3;
													registro.submit();	
													}
										}	
								
										if (hij>=4){
										
											
											
											if (isDate (strDate1)==false)
	                     						alert ("Por favor revise la fecha de nacimiento de su primer hijo");
											else
												if (isDate (strDate2)==false)
	                     						alert ("Por favor revise la fecha de nacimiento de su segundo hijo");
												else
													if (isDate (strDate3)==false)
	                     								alert ("Por favor revise la fecha de nacimiento de su tercer hijo");
													else 
														
															if (isDate (strDate4)==false)
	                     										alert ("Por favor revise la fecha de nacimiento de su cuarto hijo");
														else{
															registro.fecha_nacimiento_hijo1.value = strDate1;
															registro.fecha_nacimiento_hijo2.value = strDate2;
															registro.fecha_nacimiento_hijo3.value = strDate3;
															registro.fecha_nacimiento_hijo4.value = strDate4;
															registro.submit();	
													}
										}
								}
							 	else{registro.submit();}
						     }
                    
    


}

// SALUD A-Z

function salud(){
var indice=document.salud_f.sel_temas.options.selectedIndex;
var val= document.salud_f.sel_temas.options[indice].value;
document.location.href = "http://www.ladosis.com/temas_salud/tema_salud.php?sel_temas="+val ;
}

function salud_nd(){
var indice=document.salud_f.sel_temas.options.selectedIndex;
var val= document.salud_f.sel_temas.options[indice].value;
document.location.href = "http://www.ladosis.com/temas_salud/tema_salud_nd.php?sel_temas="+val ;
}
// busqueda de articulos
function validar_busqueda(){
    with(busqueda_index){
        if(palabras.value==""){
            alert('Digite una palabra para la búsqueda.');
            palabras.focus();
            return false;
        }
         
		 if(sections.value==""){
            alert('Escoja un sección para la búsqueda.');
            sections.focus();
            return false;
        }
         
   }
}

//mias

<!--
// Directorio de Profesionales
function combo(){
   var index=document.Consulta_Directorio.profesion.selectedIndex;
   var indice = document.Consulta_Directorio.profesion.options[index].value;
   //var indice=document.Consulta_Directorio.profesion.selectedIndex;
   
   if(indice==0){ rehacer(); menu0();}
   if(indice==1){ rehacer(); menu1();}
   if(indice==2){ rehacer(); menu2();}
   if(indice==3){ rehacer(); menu3();}
   if(indice==4){ rehacer(); menu4();}
   if(indice==5){ rehacer(); menu5();}
   if(indice==7){ rehacer(); menu7();} 
 }  
 function rehacer()
 {
  var tam = document.Consulta_Directorio.especialidad.options.length;
     for (loop=0; loop < tam; loop++)
     {
	     document.Consulta_Directorio.especialidad.options[loop]=null;
	 
	 }
     document.Consulta_Directorio.especialidad.options.length=0;
 } 
 
 function menu0(){
  sub0=new Option("-Seleccione una profesión-","","defauldSelected");
  document.Consulta_Directorio.especialidad.options[0]=sub0;
  }
function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}


function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}


function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}


function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}

CSInit = new Array;
function CSScriptInit() {
if(typeof(skipPage) != "undefined") { if(skipPage) return; }
idxArray = new Array;
for(var i=0;i<CSInit.length;i++)
	idxArray[i] = i;
CSAction2(CSInit, idxArray);}
CSAg = window.navigator.userAgent; CSBVers = parseInt(CSAg.charAt(CSAg.indexOf("/")+1),10);
function IsIE() { return CSAg.indexOf("MSIE") > 0;}
function CSIEStyl(s) { return document.all.tags("div")[s].style; }
function CSNSStyl(s) { return CSFindElement(s,0); }
function CSFindElement(n,ly) { if (CSBVers < 4) return document[n];
	var curDoc = ly ? ly.document : document; var elem = curDoc[n];
	if (!elem) { for (var i=0;i<curDoc.layers.length;i++) {
		elem = CSFindElement(n,curDoc.layers[i]); if (elem) return elem; }}
	return elem;
}


function CSClickReturn () {
	var bAgent = window.navigator.userAgent; 
	var bAppName = window.navigator.appName;
	if ((bAppName.indexOf("Explorer") >= 0) && (bAgent.indexOf("Mozilla/3") >= 0) && (bAgent.indexOf("Mac") >= 0))
		return true; // dont follow link
	else return false; // dont follow link
}


function CSButtonReturn () {
	var bAgent = window.navigator.userAgent; 
	var bAppName = window.navigator.appName;
	if ((bAppName.indexOf("Explorer") >= 0) && (bAgent.indexOf("Mozilla/3") >= 0) && (bAgent.indexOf("Mac") >= 0))
		return false; // follow link
	else return true; // follow link
}


CSIm = new Object();
function CSIShow(n,i) {
	if (document.images) {
		if (CSIm[n]) {
			var img = (!IsIE()) ? CSFindElement(n,0) : document[n];
			if (img && typeof(CSIm[n][i].src) != "undefined") {img.src = CSIm[n][i].src;}
			if(i != 0)
				self.status = CSIm[n][3];
			else
				self.status = " ";
			return true;
		}
	}
	return false;
}
function CSILoad(action) {
	im = action[1];
	if (document.images) {
		CSIm[im] = new Object();
		for (var i=2;i<5;i++) {
			if (action[i] != '') { CSIm[im][i-2] = new Image(); CSIm[im][i-2].src = action[i]; }
			else CSIm[im][i-2] = 0;
		}
		CSIm[im][3] = action[5];
	}
}
CSStopExecution = false;
function CSAction(array) { 
	return CSAction2(CSAct, array);
}
function CSAction2(fct, array) { 
	var result;
	for (var i=0;i<array.length;i++) {
		if(CSStopExecution) return false; 
		var actArray = fct[array[i]];
		if(actArray == null) return false; 
		var tempArray = new Array;
		for(var j=1;j<actArray.length;j++) {
			if((actArray[j] != null) && (typeof(actArray[j]) == "object") && (actArray[j].length == 2)) {
				if(actArray[j][0] == "VAR") {
					tempArray[j] = CSStateArray[actArray[j][1]];
				}
				else {
					if(actArray[j][0] == "ACT") {
						tempArray[j] = CSAction(new Array(new String(actArray[j][1])));
					}
				else
					tempArray[j] = actArray[j];
				}
			}
			else
				tempArray[j] = actArray[j];
		}			
		result = actArray[0](tempArray);
	}
	return result;
}
CSAct = new Object;

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}
// Fin Funciones directorio de profesionales

// Funciones de las Calculadoras de la salud

var ie4 = (document.all && !document.getElementById)? true : false;
var ns6 = (document.getElementById)? true : false;

function roundOff(value, precision)
{
        value = "" + value //convert value to string
        precision = parseInt(precision);

        var whole = "" + Math.round(value * Math.pow(10, precision));

        var decPoint = whole.length - precision;

        if(decPoint != 0)
        {
                result = whole.substring(0, decPoint);
                result += ".";
                result += whole.substring(decPoint, whole.length);
        }
        else
        {
                result = whole;
        }
        return result;
}

function isEmpty(inputStr) {
        if (inputStr == "" || inputStr == null) {
                return true
        }
        return false
}

function isNumber(inputStr) {
        for (var i = 0; i < inputStr.length; i++) {
                var oneChar = inputStr.charAt(i)
                if (oneChar < "0" || oneChar > "9") {
                        return false
                }
        }
        return true
}

function inRangeDay(inputStr) {
        num = parseInt(inputStr)
        if (num < 1 || num > 31) {
                return false
        }
        return true
}

function inRangeYear(inputStr) {
        num = parseInt(inputStr)
        if (num < 1900 || num > 3000) {
                return false
        }
        return true
}

function isValidDay(inputStr) {
        if (isEmpty(inputStr)) {
                alert("Por favor introduzca el día antes de presionar calcular.")
                return false
        } else {
                if (!isNumber(inputStr)) {
                        alert("Por favor asegurese que introdujo un número de día valido.")
                        return false
                } else {
                        if (!inRangeDay(inputStr)) {
                                alert("Por favor introduzca un día valido.")
                                return false
                        }
                }
        }
        return true
}

function isValidYear(inputStr) {
        if (isEmpty(inputStr)) {
                alert("Por favor introduzca el año antes de presionar calcular.")
                return false
        } else {
                if (!isNumber(inputStr)) {
                        alert("Por favor asegurese que introdujo un número de año valido.")
                        return false
                } else {
                        if (!inRangeYear(inputStr)) {
                                alert("Por favor introduzca un año valido.")
                                return false
                        }
                }
        }
        return true
}
function makeArray(n) {
        this.length = n
        for (var i=1; i <= n; i++)
                this[i] = null
                return this
}
var maxday = new makeArray(12)
maxday[1] = 31
maxday[2] = 28
maxday[3] = 31
maxday[4] = 30
maxday[5] = 31
maxday[6] = 30
maxday[7] = 31
maxday[8] = 31
maxday[9] = 30
maxday[10] = 31
maxday[11] = 30
maxday[12] = 31
var monthname = new makeArray(12)
monthname[1] = "Enero"
monthname[2] = "Febrero"
monthname[3] = "Marzo"
monthname[4] = "Abril"
monthname[5] = "Mayo"
monthname[6] = "Junio"
monthname[7] = "Julio"
monthname[8] = "Agosto"
monthname[9] = "Septiembre"
monthname[10] = "Octubre"
monthname[11] = "Noviembre"
monthname[12] = "Diciembre"
var adddays = new makeArray(7)
adddays[1] = 14
adddays[2] = 35
adddays[3] = 70
adddays[4] = 84
adddays[5] = 161
adddays[6] = 189
adddays[7] = 280

function calcNewDate(month,day,year,adddays) {

        newday = eval(day) + adddays

        newmonth = month + 1

        newyear = eval(year)
 
         var max

        for (var i = 0; i < 12; i++) {

          if (newmonth == 2 && (newyear % 4) == 0) {
	          max = 29

          } else

            max = maxday[newmonth]
          if (newday > max) {
            newday = newday - max

           newmonth = newmonth + 1

            if (newmonth > 12) {

              newyear = newyear + 1

              newmonth = 1

            }

          }

         else

            break

        }

        var datestring = monthname[newmonth] + " " + newday + ", " + newyear

        return datestring

}


function calculo(form) {

        day = form.day.value

        year = form.year.value

        monthnum = form.month.selectedIndex
  	
   	 if (isValidDay(day)) {

          if (isValidYear(year)){

            form.conception.value = calcNewDate(monthnum,day,year,adddays[1])

            form.beginrisk.value = calcNewDate(monthnum,day,year,adddays[2])

            form.endrisk.value = calcNewDate(monthnum,day,year,adddays[3])
 
            form.beginorgan.value = calcNewDate(monthnum,day,year,adddays[2])
 
            form.endorgan.value = calcNewDate(monthnum,day,year,adddays[3])

            form.endfirst.value = calcNewDate(monthnum,day,year,adddays[4])

            form.preemies.value = calcNewDate(monthnum,day,year,adddays[5])

            form.endsecond.value = calcNewDate(monthnum,day,year,adddays[6])

            form.duedate.value = calcNewDate(monthnum,day,year,adddays[7])
          }
        } 
}

function calc2(form){
form.reset();
}

function calc(weight, minutes, scalefactor)

{
   calories=(Math.round(weight * minutes * scalefactor));
   return calories; 
}


function compute(form)

{
    if (isEmpty(form.weight.value)) {
                alert("Por favor introduzca el peso antes de presionar calcular.")
                return false
        } else {
                if (!isNumber(form.weight.value)) {
                        alert("Por favor asegurese que introdujo un peso valido.")
                        return false
                }
   }
   
  if (isEmpty(form.minutes.value)) {
                alert("Por favor introduzca el tiempo antes de presionar calcular.")
                return false
        } else {
                if (!isNumber(form.minutes.value)) {
                        alert("Por favor asegurese que introdujo un tiempo valido.")
                        return false
                }
   } 
   var w=form.weight.value * 1
   var m=form.minutes.value * 1
 

form.aero5.value        = calc(w,m,0.176)
form.cycle4.value       = calc(w,m,0.141)
form.run4.value         = calc(w,m,0.194)
form.swim1.value        = calc(w,m,0.105)
form.tennis1.value      = calc(w,m,0.123)
form.walk2.value        = calc(w,m,0.079)
form.clean.value        = calc(w,m,0.062)
form.sex.value       	= calc(w,m,0.070)
form.office1.value      = calc(w,m,0.026)

}   


function clearvalues(form)

{

   form.weight.value   = ""
   form.minutes.value  = ""
 

form.aero5.value        = ""
form.cycle4.value       = ""
form.run4.value         = ""
form.swim1.value        = ""

form.tennis1.value      = ""
form.walk2.value        = ""
form.clean.value        = ""
form.sex.value       	= ""
form.office1.value        = ""


}

function checkError(whatVar, varName, varText) {
	if ((whatVar == "") || (whatVar <= 0) || (isNaN(whatVar))) {
		alert("Por favor introduzca " + varText + ".");
		eval("document.bmi." + varName + ".focus();");
		eval("document.bmi." + varName + ".select();");
		return false;
	}
	return true;
}

function getLabel(nameID) {
	var whatTag;
	
	if (ie4) {whatTag = "document.all[\"" + nameID + "\"]";}
	if (ns6) {whatTag = "document.getElementById(\"" + nameID + "\")";}
	return whatTag;	
}

function bmiCalc(form){

/*var bsaSelect = eval(getLabel("bsaSelect"));
bsaSelect.style.display = '';*/

if (isEmpty(form.wt.value)) {
                alert("Por favor introduzca el peso antes de presionar calcular.")
                return false
        } else {
                if (form.wt.value <= 0)  {
                        alert("Por favor asegurese que introdujo un peso valido.")
                        return false
                }
   }
   
  if (isEmpty(form.ht.value)) {
                alert("Por favor introduzca la altura antes de presionar calcular.")
                return false
        } else {
                if (form.ht.value <= 0 ) {
                        alert("Por favor asegurese que introdujo una altura valida.")
                        return false
                }
   } 

peso = form.wt.value;
altura = form.ht.value;
var indice1 = form.wu.selectedIndex;
var indpeso = form.wu.options[indice1].value;
var indice2 = form.hu.selectedIndex;
var indalto = form.hu.options[indice2].value;
sexo = form.sexos[0].checked; 
if (form.sexos[0].checked){s=0;}else{s=1;}

//form.bsa.value = valor(peso,altura,1,indpeso,indalto,s);
var whatBSA = form.whatBSA.selectedIndex;
calcBSA(whatBSA, 1);
form.leanKg.value = valor(peso,altura,2,indpeso,indalto,s);
calcu = 2.2 * valor(peso,altura,2,indpeso,indalto,s);
var libra = Math.round(calcu);
form.leanLbs.value = libra;
form.idealKg.value = valor(peso,altura,3,indpeso,indalto,s);
calcu2= 2.2 * valor(peso,altura,3,indpeso,indalto,s);
var libra2= Math.round(calcu2);
form.idealLbs.value = libra2;
form.bmi.value = valor(peso,altura,4,indpeso,indalto,s);
var estado = valor(peso,altura,4,indpeso,indalto,s);
if (estado < 18.5){form.interp.value="Bajo de Peso";}
if ((estado >=18.5)&&(estado <=25)){form.interp.value="Normal";}
if ((estado >=25.1)&&(estado <=29.9)){form.interp.value="Sobrepeso";}
if (estado >= 30){form.interp.value="Obeso";}
}

function valor (w,h,tipo,mpeso,malto,sex)
{

 if (tipo==1){
     if (mpeso == 0){
	     if (malto == 0){
		     var ca= ((w*h)/3600);
			 var bsa1=(Math.sqrt(ca));
		     var bsa = roundOff(bsa1,3);
			 return bsa;
		 }
	     else{
		   if (malto==1){
		     var ca= ((w*h*100)/3600);
			 var bsa1=(Math.sqrt(ca));
		     var bsa = roundOff(bsa1,3);
			 return bsa;
		   }
		   if (malto==2){
		     var ca= ((w*h*2.54)/3600);
			 var bsa1=(Math.sqrt(ca));
		     var bsa = roundOff(bsa1,3);
			 return bsa;
		   }
		 }
	 }//peso 0 
   else{
     if (malto == 0){
		     var ca= ((w*(h/2.2))/3600);
			 var bsa1=(Math.sqrt(ca));
		     var bsa = roundOff(bsa1,3);
			 return bsa;
		 }
	     else{
		   if (malto==1){
		     var ca= ((w*(h/2.2)*100)/3600);
			 var bsa1=(Math.sqrt(ca));
		     var bsa = roundOff(bsa1,3);
			 return bsa;
		   }
		   if (malto==2){
		     var ca= ((w*(h/2.2)*2.54)/3600);
			 var bsa1=(Math.sqrt(ca));
		     var bsa = roundOff(bsa1,3);
			 return bsa;
		   }
		 }
   }//peso 1
 }//tipo 1
 else{
     if (tipo ==2){
	    if (sex==0){
            if (mpeso == 0){
	            if (malto == 1){		
                    var uno= (w/(100*h));
					var leanKg1= (1.10* w)-(128*(Math.pow(uno,2)));
				    var leanKg = Math.round(leanKg1);
					return leanKg; 
				}		
		    
			    else{
				    if (malto ==0){
			            var uno= (w/(100*(h/100)));
					    var leanKg1= (1.10* w)-(128*(Math.pow(uno,2)));
				        var leanKg = Math.round(leanKg1);
					    return leanKg;    
				    }
				    if (malto ==2){
					    var uno= (w/(100*(h/39.37008)));
					    var leanKg1= (1.10* w)-(128*(Math.pow(uno,2)));
				        var leanKg = Math.round(leanKg1);
					    return leanKg;     
					}
				}
			}// peso 0
		  else{
		     if (malto == 1){		
                    var w1=w/2.2;
					var uno= (w1/(100*h));
					var leanKg1= (1.10* w1)-(128*(Math.pow(uno,2)));
				    var leanKg = Math.round(leanKg1);
					return leanKg; 
				}		
		    
			    else{
				    if (malto ==0){
			            var w1=w/2.2;
						var uno= (w1/(100*(h/100)));
					    var leanKg1= (1.10* w1)-(128*(Math.pow(uno,2)));
				        var leanKg = Math.round(leanKg1);
					    return leanKg;    
				    }
				    if (malto ==2){
					    var w1=w/2.2;
						var uno= (w1/(100*(h/39.37008)));
					    var leanKg1= (1.10* w1)-(128*(Math.pow(uno,2)));
				        var leanKg = Math.round(leanKg1);
					    return leanKg;     
					}
				}
		  }// peso 1
		}//sex 0
		else{// sex 1
		    
            if (mpeso == 0){
	            if (malto == 1){		
                    var uno= (w/(100*h));
					var leanKg1= (1.07* w)-(148*(Math.pow(uno,2)));
				    var leanKg = Math.round(leanKg1);
					return leanKg; 
				}		
		    
			    else{
				    if (malto ==0){
			            var uno= (w/(100*(h/100)));
					   var leanKg1= (1.07* w)-(148*(Math.pow(uno,2)));
				        var leanKg = Math.round(leanKg1);
					    return leanKg;    
				    }
				    if (malto ==2){
					    var uno= (w/(100*(h/39.37008)));
					    var leanKg1= (1.07* w)-(148*(Math.pow(uno,2)));
				        var leanKg = Math.round(leanKg1);
					    return leanKg;     
					}
				}
			}// peso 0
		  else{
		     if (malto == 1){		
                    var w1=w/2.2;
					var uno= (w1/(100*h));
					var leanKg1= (1.07* w1)-(148*(Math.pow(uno,2)));
				    var leanKg = Math.round(leanKg1);
					return leanKg; 
				}		
		    
			    else{
				    if (malto ==0){
			            var w1=w/2.2;
						var uno= (w1/(100*(h/100)));
					    var leanKg1= (1.07* w1)-(148*(Math.pow(uno,2)));
				        var leanKg = Math.round(leanKg1);
					    return leanKg;    
				    }
				    if (malto ==2){
					    var w1=w/2.2;
						var uno= (w1/(100*(h/39.37008)));
					   var leanKg1= (1.07* w1)-(148*(Math.pow(uno,2)));
				        var leanKg = Math.round(leanKg1);
					    return leanKg;     
					}
				}
		  }// peso 1
		
		}//sex 1 
	 
	 }//tipo 2  
 
    if (tipo ==3){
	   if (sex==0){
            if (malto == 0){
	            var idealKg1 = 50 + 2.3* ((h*0.3937008)-60);
			    var idealKg = Math.round(idealKg1);
			    return idealKg;
			}// alto 0
		    else{
			    if (malto ==1){
				    var idealKg1 = 50 + 2.3 *((h*39.37008)-60);
			        var idealKg = Math.round(idealKg1);
			        return idealKg;
				}
			    if (malto == 2){
				    var idealKg1 = 50 + 2.3 *((h)-60);
			        var idealKg = Math.round(idealKg1);
			        return idealKg;
				}
			}
		}//sex 0
		else{// sex 1
		   if (malto == 0){
	            var idealKg1 = 45.5 + 2.3 * ((h*0.3937008)-60);
			    var idealKg = Math.round(idealKg1);
			    return idealKg;
			}// alto 0
		    else{
			    if (malto ==1){
				    var idealKg1 = 45.5 + 2.3 *((h*39.37008)-60);
			        var idealKg = Math.round(idealKg1);
			        return idealKg;
				}
			    if (malto == 2){
				    var idealKg1 = 45.5 + 2.3 * ((h)-60);
			        var idealKg = Math.round(idealKg1);
			        return idealKg;
				}
			} 
           
		 
	    }//sex 1  
	
	}// tipo 3 
 
    if (tipo==4){
      if (mpeso==0){
	      if (malto==0){
		     var bmi1 = w/(Math.pow((h/100),2)); 
		     var bmi = roundOff(bmi1,1);
		     return bmi;
		  }
	      if (malto==1){
		     var bmi1 = w/(Math.pow(h,2)); 
		     var bmi = roundOff(bmi1,1);
		     return bmi;
		  }
	      if (malto==2){
		     var bmi1 = w/(Math.pow((h/39.37008),2)); 
		     var bmi = roundOff(bmi1,1);
		     return bmi;
		  } 
	  }// peso 0  
      else{
	    if (mpeso==1){
		    if (malto==0){
		     var bmi1 = (w/2.2)/(Math.pow((h/100),2)); 
		     var bmi = roundOff(bmi1,1);
		     return bmi;
		  }
	      if (malto==1){
		     var bmi1 = (w/2.2)/(Math.pow(h,2)); 
		     var bmi = roundOff(bmi1,1);
		     return bmi;
		  }
	      if (malto==2){
		     var bmi1 = (w/2.2)/(Math.pow((h/39.37008),2)); 
		     var bmi = roundOff(bmi1,1);
		     return bmi;
		  } 
		}//peso 1
	   } //else
	  
	}//tipo 4
 }// else tipos
 
}

function calcBSA(whichOne, calcButt) {
	var bmi = document.bmi;
	// var oldBSA = bmi.bsa.value;
	// if (oldBSA != parseFloat(oldBSA) && !calcButt) {return false}
	var ht = bmi.ht.value;
	var wt = bmi.wt.value;
	
	if (!calcButt) {
		if (!checkError(ht, "ht", "la altura del paciente")) return false;
		if (!checkError(wt, "wt", "el peso del paciente")) return false;
	}
	
	if (bmi.wu.selectedIndex == 1) {wt = wt * 0.45359237;}	//  Convert wt (lbs to kg)
	if (bmi.hu.selectedIndex == 2) {ht = ht * 2.54;}		//  Convert inches to cm
	if (bmi.hu.selectedIndex == 1) {ht = ht * 100;}		//  Convert meters to cm
	
	if (whichOne == 0) {	//  Mosteller formula
		tempVar = ht * wt / 3600;
		bsaVal = Math.sqrt(tempVar);
	}
	if (whichOne == 1) {	//  DuBois & DuBois formula
		bsaVal = 0.20247 * Math.pow((ht/100),0.725) * Math.pow(wt,0.425);
	}
	if (whichOne == 2) {	//  Haycock formula
		bsaVal = 0.024265 * Math.pow(ht,0.3964) * Math.pow(wt,0.5378);
	}	
	if (whichOne == 3) {	//	Gehan & George formula
		bsaVal = 0.0235 * Math.pow(ht,0.42246) * Math.pow(wt,0.51456);
	}
	if (whichOne == 4) {	//  Boyd formula
		tempVar = 0.7285 - (0.0188 * Math.log(wt*1000) / Math.log(10));
		bsaVal = 0.0003207 * Math.pow(ht,0.3) * Math.pow((wt*1000),tempVar);
	}
	bsaVal = roundOff(bsaVal,3);
	
	//var bsaText = eval(getLabel("bsa"));
	var bsaSelect = eval(getLabel("bsaSelect"));
	//bsaText.innerHTML = bsaVal + " m<sup>2</sup>";
	bmi.bsa.value=bsaVal;
	//bsaText.style.display = '';
	bsaSelect.style.display = '';
	return true;
}
//Calculadora 4
function Calcular(EDFform){
	var retorno;
	retorno=FechaMasDias(EDFform)
	if(retorno==false){
		alert("Introduzca fecha válida");
		return;
	}
}
	
	

function FechaMasDias(EDFform){

	
	var dia=EDFform.day.options[EDFform.day.selectedIndex].value;
	var mes=EDFform.month.options[EDFform.month.selectedIndex].value;
	var anno=EDFform.year.value;
	var x =EDFform.x.options[EDFform.x.selectedIndex].value;
	var maxdia;

	dia  = 	eval(dia);
	mes  = 	eval(mes);
	anno = 	eval(anno);
	x =	eval(x);

	
	if (mes == 2){
		if ((anno%4)==0){
			maxdia = 29;
		}else{
			maxdia = 28;
		}
	}

	if (mes==1||mes==3||mes==5||mes==7||mes==8||mes==10||mes==12)
		maxdia = 31;
	if (mes==4||mes==6||mes==9||mes==11)
		maxdia = 30;
	if (dia>maxdia) {
			return false;
			}

if (isValidYear(anno)){		
		var diamf = dia + x - 14;
		var intinf=dia + x - 17;
		var intsup=dia + x - 11;
	
		fecha1=Calc(maxdia,mes,anno,diamf);
		fecha2=Calc(maxdia,mes,anno,intinf);
		fecha3=Calc(maxdia,mes,anno,intsup);
	
		
		document.EDFform.fecha1.value=fecha1;	
		document.EDFform.fecha2.value=fecha2;	
		document.EDFform.fecha3.value=fecha3;		
	  }	
   
}	
	
	
function Calc(maxdia,mes,anno,date){
	if (date > maxdia){
		date = date - maxdia;
		if (mes == 12){
			anno = anno+1;
			mes = 1;
		}else{
			mes = mes + 1;
		}
		
	}

	if (date < 10) date = "0" + date;
	if (mes < 10) mes = "0"+ mes;
	mes_letra= dame_mes(mes);
	fecha= mes_letra + " " + date + " " + "de" + " " + anno;
	//fecha= date + "/" + mes + "/" + anno;
	return fecha;
}	
function dame_mes(month){
if (month==1){mes="Enero";return mes;}
if (month==2){mes="Febrero";return mes;}
if (month==3){mes="Marzo";return mes;}
if (month==4){mes="Abril";return mes;}
if (month==5){mes="Mayo";return mes;}
if (month==6){mes="Junio";return mes;}
if (month==7){mes="Julio";return mes;}
if (month==8){mes="Agosto";return mes;}
if (month==9){mes="Septiembre";return mes;}
if (month==10){mes="Octubre";return mes;}
if (month==11){mes="Noviembre";return mes;}
if (month==12){mes="Diciembre";return mes;}
}	

// Fin Funciones de la Calculadora

// Funciones Clasificados

//function emailCheck (emailStr) {
/* Verificar si el email tiene el formato user@dominio. */
//var emailPat=/^(.+)@(.+)$/ 

/* Verificar la existencia de caracteres. ( ) < > @ , ; : \ " . [ ] */
//var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]" 

/* Verifica los caracteres que son válidos en una dirección de email */
//var validChars="\[^\\s" + specialChars + "\]" 

//var quotedUser="(\"[^\"]*\")" 

/* Verifica si la dirección de email está representada con una dirección IP Válida */ 


//var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/


/* Verificar caracteres inválidos */ 

//var atom=validChars + '+'
//var word="(" + atom + "|" + quotedUser + ")"
//var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
/*domain, as opposed to ipDomainPat, shown above. */
//var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")


//var matchArray=emailStr.match(emailPat)
//if (matchArray==null) {
//alert("La direccion es incorrecta (falta @ and .'s)")
//return false;
//}
//var user=matchArray[1]
//var domain=matchArray[2]

// Si el user "user" es valido 
//if (user.match(userPat)==null) {
// Si no
//alert("El nombre de usuario no es válido.")
//return false;
//}

/* Si la dirección IP es válida */
//var IPArray=domain.match(ipDomainPat)
//if (IPArray!=null) {
//for (var i=1;i<=4;i++) {
//if (IPArray[i]>255) {
//alert("IP de destino inválida")
//return false;
//}
//}
//return true;
//}

//var domainArray=domain.match(domainPat)
//if (domainArray==null) {
//alert("El dominio parece no ser válido.")
//return false;
//}

///var atomPat=new RegExp(atom,"g")
//var domArr=domain.match(atomPat)
//var len=domArr.length
//if (domArr[domArr.length-1].length<2 || 
//domArr[domArr.length-1].length>3) { 

//alert("La dirección debe tener 3 letras si es .com o 2 si en de algún pais.")
//return false;
//}

//if (len<2) {
//var errStr="La dirección es erronea"
//alert(errStr)
//return false;
//}

// La dirección de email ingresada es Válida
//return true;
//}

function url(cadena)
  {                                    // DECLARACION DE CONSTANTES
    var http = "http://";              // protocolo HTTP
    var correcto;                      // cadena es url o no
    correcto = cadena.length > 7;      // INICIO
    if(correcto) {                      // cabe "http://*"
      correcto = http.indexOf(cadena.substring(0, 7)) != - 1; // lee "http://*"
    if (!correcto){
	   alert("URL incorrecta. Favor digitar otra vez");}
	   return(correcto);
    } 
    else{
	 if (cadena.length == 0){
	    return (true);
	  }
	  else{
	     alert("URL incorrecta. Favor digitar otra vez");
	     return(false);
	  }
	}
  }


function validar_forma(forma) {
if (forma.nombre.value == "") {
alert("Por favor digita tu nombre");
forma.nombre.focus();
return ;
}
if (forma.tipo.options[0].selected) {
alert("Por favor selecciona una categoría");
forma.tipo.focus();
return ;
}
if (forma.mensaje.value == "") {
alert("Por favor digita un mensaje");
forma.mensaje.focus();
return ;
}

if ((emailCheck (forma.email.value))&&(url(forma.web.value)))forma.submit();
}

function abre_win(destino,ancho,alto){
msg=open(destino,"Win_preliminar","toolbar=no,directories=no,scrollbars=yes,menubar=no,width="+ancho+",height="+alto);
}
// Fin Funciones Clasificados


//Funciones Chat

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

// Fin Funciones Chat

//Funciones Busqueda Por Fecha

function clean(){
document.busqueda.reset();
}
function validar(){
    with(busqueda){
        if(nuevo_mes.value==0){
            alert('Escoja un mes para la búsqueda.');
            nuevo_mes.focus();
            return false;
        }
         if(nuevo_ano.value==0){
            alert('Escoja un año para la búsqueda.');
            nuevo_ano.focus();
            return false;
        }
    
   }
}
// Fin Funciones Busqueda Por Fecha

// Funciones Busqueda Avanzada

function fuimonos_busq()
	{
		if(document.forma.palabras.value == "")
			alert("Por favor, escriba la (s) palabra (s) clave de su búsqueda");
		   
		else
			//if(fechas()) 
			{document.forma.submit();}
	}

function seleccionar(valor)
	{
		var limite = document.forma2.elements.length;
		for(var i = 0; i  < limite ; i++)
		{
			if(document.forma2.elements[i].name=="seccion" && document.forma2.elements[i].type == "checkbox" )
				document.forma2.elements[i].checked = valor;
		}
	}
function secciones()
	{
		var i = 0;	
		var cuantas = 0;

		document.forma.sections.value = "";
		for(i=0; i< document.forma2.elements.length; i ++)
		{
			if(document.forma2.elements[i].name=="seccion" && document.forma2.elements[i].type == "checkbox" && document.forma2.elements[i].checked==true)
			{
				document.forma.sections.value += document.forma2.elements[i].value + "/";	
				cuantas++;
			}
		}

		if(cuantas == 0)
		{
			alert("No ha seleccionado ninguna sección para buscar");
			return false;
		}
		else
			return true;

	}

function fechas()
	{
		document.forma.dates.value = "";
		var finicio = document.forma.fechainicio.options[0].value;
		var ffinal = document.forma.fechafin.options[0].value;
        if (finicio==0)
		   {
			alert("No se ha seleccionado la fecha de inicio de la búsqueda");
			return 0;
		   }
		   
		 if (ffinal==0){
		    alert("No se ha seleccionado la fecha de finalización de la búsqueda");
			return 0;
		    
		 }  
		  
		
		var inicio = finicio.split("-"); 
		var dfinal= ffinal.split("-");
		
		
		if (inicio[2] > dfinal[2])
		{
			alert("El año de la fecha inicial debe ser menor que el de la fecha final");
			return 0;
		}
		else{
		  if (inicio[2]==dfinal[2]){
		    if (inicio[1] > dfinal[1])
		    {
			   alert("El mes de la fecha inicial debe ser menor que el de la fecha final");
			   return 0;
		    }
		    else{
		        if (inicio[1]==dfinal[1]){
				      
				  if (inicio[0] > dfinal[0])
			      {
			        alert("El día de la fecha inicial debe ser menor que el día de la fecha final");
			        return 0;
		          }
			   }
			}
		}	
		}
	document.forma.dates.value= finicio + "/" + ffinal; 
	return 1;
	//document.forma.submit();
	}
function abre_win(destino,ancho,alto){
msg=window.open(destino,"DisplayWindow"+alto,"toolbar=no,directories=no,resize=no,menubar=no,width="+ancho+",height="+alto);
msg.creator= self;
}


// Fin Funciones Avanzada

//Funciones Publicar Articulo

// Funciones Publicar

<!-- Principio
function emailCheck_publicar (emailStr) {
/* Verificar si el email tiene el formato user@dominio. */
var emailPat=/^(.+)@(.+)$/ 

/* Verificar la existencia de caracteres. ( ) < > @ , ; : \ " . [ ] */
var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]" 

/* Verifica los caracteres que son válidos en una dirección de email */
var validChars="\[^\\s" + specialChars + "\]" 

var quotedUser="(\"[^\"]*\")" 

/* Verifica si la dirección de email está representada con una dirección IP Válida */ 


var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/


/* Verificar caracteres inválidos */ 

var atom=validChars + '+'
var word="(" + atom + "|" + quotedUser + ")"
var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
/*domain, as opposed to ipDomainPat, shown above. */
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")


var matchArray=emailStr.match(emailPat)
if (matchArray==null) {
alert("La direccion es incorrecta (falta @ and .'s)")
return false;
}
var user=matchArray[1]
var domain=matchArray[2]

// Si el user "user" es valido 
if (user.match(userPat)==null) {
// Si no
alert("El nombre de usuario no es válido.")
return false;
}

/* Si la dirección IP es válida */
var IPArray=domain.match(ipDomainPat)
if (IPArray!=null) {
for (var i=1;i<=4;i++) {
if (IPArray[i]>255) {
alert("IP de destino inválida")
return false;
}
}
return true;
}

var domainArray=domain.match(domainPat)
if (domainArray==null) {
alert("El dominio parece no ser válido.")
return false;
}

var atomPat=new RegExp(atom,"g")
var domArr=domain.match(atomPat)
var len=domArr.length
if (domArr[domArr.length-1].length<2 || 
domArr[domArr.length-1].length>3) { 

alert("La dirección debe tener 3 letras si es .com o 2 si en de algún pais.")
return false;
}

if (len<2) {
var errStr="La dirección es erronea"
alert(errStr)
return false;
}

// La dirección de email ingresada es Válida
return true;
}
// End -->


// Funciones Editar
function erase(){
 document.form1.reset();
}
function fuimonos(){
 document.form1.submit();
}
function gonow(){
//var indice=document.form1.sel_tipo.options.selectedIndex;
var va= document.form1.sel_tipo.value;
val=1;
if ((va >=1) &&(va<=20)){
   document.form1.opc.value=val;
   document.form1.parr.value=va;
   fuimonos();
}
else{
 alert('El numero de parrafos digitado es incorrecto. Debe estar entre 1 y 20.')
 document.form1.sel_tipo.focus();
}
}

// Funciones Editar

function validar_editar1(){
  with(form1){
      if (sel_seccion.value==0){
            alert('Escoja un tipo para el artículo.');
            sel_seccion.focus();
            return false;
      }
      if(titulo.value==''){
            alert('El titulo es obligatorio.');
            titulo.focus();
            return false;
        }
       if(autor.value==''){
            alert('El autor es obligatorio.');
            autor.focus();
            return false;
        }
	   if(fuente.value==''){
            alert('La fuente del artículo es obligatoria.');
            fuente.focus();
            return false;
        }
	  if(introduccion.value==''){
            alert('La introducción es obligatoria.');
            introduccion.focus();
            return false;
        }
    //parr.value=constparr;
  
  }
 if (emailCheck_publicar (document.form1.correo.value)){
 
 document.parrafos.parr.value=constparr;
 document.parrafos.sel_seccion.value=document.form1.sel_seccion.value;
 document.parrafos.titulo.value=document.form1.titulo.value;
 document.parrafos.autor.value=document.form1.autor.value;
 document.parrafos.fuente.value=document.form1.fuente.value;
 document.parrafos.introduccion.value=document.form1.introduccion.value; 
 document.parrafos.correo.value=document.form1.correo.value;
document.parrafos.submit();}
else{document.form1.correo.focus();}
}
// Fin Funciones Publicar articulo

//Funcion para validar compra
function validar_compra(form){
	if (form.old_code.value==""){
		alert("Debe digitar el código de compra");
		form.old_code.focus();
		return false;
	}
	if (form.consignacion.value==""){
		alert("Debe digitar el número de la consignación");
		form.consignacion.focus();
		return false;
	}
	var fech = form.fecha.value.split("/"); 
	date= fech[2] + "-" + fech[0] + "-" + fech[1];
	if (isDate(date)==false){
		form.fecha.focus();
		return false;
	}
}
//fin compra

//Funciones registro

function computar(form){
 	if (isEmpty(form.peso.value)) {
     	alert("Por favor introduzca el peso.")
     	form.peso.focus();	
		return false
	} 	
	else {
      	if (!isNumber(form.peso.value)) {
           	alert("Por favor asegurese que introdujo un peso valido.")
            form.peso.focus();
			return false
      	}
 	}
	form.submit();
}


//-->