function jsEmail(objeto)
{
	validos = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0987654321_@.-"
	largo = objeto.value.length
	
	if (largo > 0)
	{
		i = 0
		
		while (i < largo)
		{
			car = objeto.value.substr(i,1)
			caracter = validos.indexOf(car)
			i = i + 1
			if (caracter < 0)
			{
				i = largo + 1
				return false;
			}
		}
		arroba1 = objeto.value.indexOf("@")
		guion   = objeto.value.indexOf("-")
		unders	= objeto.value.indexOf("_")
		punto	= objeto.value.indexOf(".")
		arroba2 = objeto.value.lastIndexOf("@",largo)
		ultpunto= objeto.value.lastIndexOf(".",largo)		
		dominio = largo - ultpunto	
		
		if (guion == 0 || punto == 0 || unders == 0 || arroba1 == 0)
			return false;
		
		if ((objeto.value.substr(arroba1 - 1,1) == ".") || (objeto.value.substr(arroba1 - 1,1) == "-") || (objeto.value.substr(arroba1 - 1,1) == "_"))
			return true;
		
		if (arroba2 < 0)
			arroba2 = arroba1
			
		if (arroba1 > 0 && arroba1 == arroba2 && dominio <= 4 && ultpunto < largo && arroba1 < largo) 		
			return true;
		else 
			return false;
	}
	else
		return true;
}
function jsRut(objeto,objetov)
	{
	if (objeto.value.length > 0)	
	{
		var dvr = '0'
		suma = 0
		mul  = 2 
		for (i= objeto.value.length -1 ; i >= 0; i--)
		  {
		    suma = suma + objeto.value.charAt(i) * mul
		      if (mul == 7)
		        mul = 2
		      else   
		        mul++
		  }
		res = suma % 11
		if (res==1)
		  dvr = 'k'
		else if (res==0)
		  dvr = '0'
		else
		  {
		    dvi = 11-res
		    dvr = dvi + ""
		  }
		if ( dvr != objetov.value.toLowerCase() )
		   return false; 
		else
		   return true; 
	}
	else
		return true;
	}

function IsDigitVerificador()
	{
	//return (((event.keyCode >= 48) && (event.keyCode <= 57))||event.keyCode==107||event.keyCode==75||event.keyCode==8)
	}
	

function IsDigit()
	{
	
	return (((event.keyCode >= 48) && (event.keyCode <= 57))||event.keyCode==8||event.keyCode==45)
	}
	
function IsFloat()
	{
	//return (((event.keyCode >= 48) && (event.keyCode <= 57))||(event.keyCode==44)||(event.keyCode==45)||event.keyCode==8)
	return (((event.keyCode >= 48) && (event.keyCode <= 57))||(event.keyCode==46)||(event.keyCode==45)||event.keyCode==8)
	}

function jsAbrirCalendario(ID)
	{
	
	var sHref="/"+jsGetNameApplication()+"/Popups/Calendario.htm";
	if(navigator.appName=="Microsoft Internet Explorer")
	{
		var mCalendario=window.showModalDialog(sHref,"","dialogWidth:195px;dialogHeight:250px;help:no;scroll=no")
		if(mCalendario&&mCalendario.FechaSeleccionada)
		{
					document.frmMac[ID+"_DD"].value=mCalendario.DiaSeleccionado;
					document.frmMac[ID+"_MM"].value=mCalendario.MesSeleccionado;
					document.frmMac[ID+"_YY"].value=mCalendario.AnioSeleccionado;
		}
	}
	else
	{
		document.frmMac.id.value=ID;
		mCalendario=window.open(sHref,"mCalendario","width=230,height=194,scrollbars=no,noresize")
	}
	}

function jsSeleccionarFechaNoIE(d,m,y)
	{
		ID=document.frmMac.id.value;
		document.frmMac[ID+"_DD"].value=d;
		document.frmMac[ID+"_MM"].value=m;
		document.frmMac[ID+"_YY"].value=y;
	}
	
	
function jsValidaFecha(lDia,lMes,lAnio)
	{
	if(isNaN(lDia) || lDia.length == 0 || isNaN(lMes) || lMes.length == 0 || isNaN(lAnio) || lAnio.length == 0)return false;
	lDia=Number(lDia)
	lMes=Number(lMes)
	lAnio=Number(lAnio)
	if ((lAnio<1920) || (lAnio>2100)) return false;
	if(!(lMes>0&&lMes<=12))return false;
	switch(lMes)
	{
	case 9:
	case 4:
	case 6:
	case 11:if(!(lDia>0&&lDia<=30))return false;break;
	case 2:
	if(lAnio%4!=0)
				if(!(lDia>0&&lDia<=29))return false;
				else
				if(!(lDia>0&&lDia<=28))return false;
	;break;
	default:if(!(lDia>0&&lDia<=31))return false;break;
	}
	if(isNaN(new Date(lAnio,lMes-1,lDia)))return false;
	return true;
}
/*
if (browser.isIE) { 
document.attachEvent("onmousemove", dragGo); 
document.attachEvent("onmouseup", dragStop); 
window.event.cancelBubble = true; 
window.event.returnValue = false; 
} 
if (browser.isNS) { 
document.addEventListener("mousemove", dragGo, true); 
document.addEventListener("mouseup", dragStop, true); 
event.preventDefault(); 
} 
*/
function jsKeyPress(e,pObjeto)
{
	var IsFireFox=false;
	var sNombre="";
	sNombre=pObjeto.name;
	switch(whichBrs())
	{
		case "Internet Explorer":IsFireFox=false;break;
		case "Safari":IsFireFox=false;break;
		case "Firefox":IsFireFox=true;break;				
		default:IsFireFox=false;break;
	}
	if(IsFireFox)
		lKeyCode=e.keyCode;//caracteres especiales  - e.charCode: otros caracteres
	else
		lKeyCode=event.keyCode;

	if(lKeyCode==13)/*Enter*/
	{
		switch(sNombre)
		{
			case "AUTH_USER":
				pObjeto.form["AUTH_PASS"].focus();
				if(IsFireFox)
				{
					e.preventDefault();
				}
				else
				{
					event.cancelBubble=true;
					event.returnValue = false;
				}
				return false;
				break;
			case "AUTH_PASS":
				if(IsFireFox)
				{
					e.preventDefault();
				}
				else
				{
					event.cancelBubble=true;
					event.returnValue = false;
				}
				jsAutentificar(document.frmMac);
				return false;
				break;
		}
		
		
		
	}
}

function jsValidarListaCheckbox(form,psName)
{
	if(form[psName].length)
		for(i=0;i<form[psName].length;i++)
		{
			if(form[psName][i].checked)
				return true;
		}
	else
		{
		if(form[psName].checked)
			return true;
		}
	return false;
}
function jsValidarListaRadio(form,psName)
{
	if(form[psName].length)
	{
		for(i=0;i<form[psName].length;i++)
		{
			if(form[psName][i].checked)
				return true;
		}
	}
	else
	{
		if(form[psName].checked)
			return true;
	}
	return false;
}
function jsValidarTextarea(form,psName)
{
	if(form[psName].value.length>0)
    	return true;
    return false;
}
function jsLimpiarListaCheckbox(form,psName)
{
	for(i=0;i<form[psName].length;i++)
		form[psName][i].checked=false;
}

function jsLimpiarListaRadio(form,psName)
{
	for(i=0;i<form[psName].length;i++)
		form[psName][i].checked=false;
}

function jsSeleccionarListaCheckbox(form,psName)
{
	for(i=0;i<form[psName].length;i++)
		form[psName][i].checked=true;
}


// Browser Detection Javascript
// copyright 1 February 2003, by Stephen Chapman, Felgall Pty Ltd

// You have permission to copy and use this javascript provided that
// the content of the script is not changed in any way.

function whichBrs() {
var agt=navigator.userAgent.toLowerCase();
if (agt.indexOf("opera") != -1) return 'Opera';
if (agt.indexOf("staroffice") != -1) return 'Star Office';
if (agt.indexOf("webtv") != -1) return 'WebTV';
if (agt.indexOf("beonex") != -1) return 'Beonex';
if (agt.indexOf("chimera") != -1) return 'Chimera';
if (agt.indexOf("netpositive") != -1) return 'NetPositive';
if (agt.indexOf("phoenix") != -1) return 'Phoenix';
if (agt.indexOf("firefox") != -1) return 'Firefox';
if (agt.indexOf("safari") != -1) return 'Safari';
if (agt.indexOf("skipstone") != -1) return 'SkipStone';
if (agt.indexOf("msie") != -1) return 'Internet Explorer';
if (agt.indexOf("netscape") != -1) return 'Netscape';
if (agt.indexOf("mozilla/5.0") != -1) return 'Mozilla';
if (agt.indexOf('\/') != -1) {
if (agt.substr(0,agt.indexOf('\/')) != 'mozilla') {
return navigator.userAgent.substr(0,agt.indexOf('\/'));}
else return 'Netscape';} else if (agt.indexOf(' ') != -1)
return navigator.userAgent.substr(0,agt.indexOf(' '));
else return navigator.userAgent;
}