/* Rut */
function GetFieldGldRut(rut,digito,e)
{
	var ln_ret;
	var ln_key;
	var ls_cadena;
	ln_key = (document.all) ? e.keyCode : e.which;
	if((ln_key > 47 && ln_key < 58)  || (ln_key > 95 && ln_key < 106))
	{
		if(ln_key > 95 && ln_key < 106)
		{
			ln_key = ln_key - 48;
		}
		ln_ret = ln_key;
	}
	else
	{
		ln_ret = 0;
	}
	if(rut.value.length >= 12 && ln_ret > 0)
	{
		ln_ret = 0;
		ln_key = 0;
	}
	if(ln_key == 46 || ln_key == 8)
	{
		ln_ret=ln_key;
		ln_key=0;	
		if (rut.value == "" || rut.length == 1)
		{
			document.getElementById(digito).value = " ";
		}
		else
		{
			ls_cadena = rut.value;
			document.getElementById(digito).value = GetDgvRut(ls_cadena.substr(0, ls_cadena.length -1));
		}					
	}
	if(ln_key == 13 || ln_key == 9 || ln_key == 37 || ln_key == 39)
	{
		ln_key=0;
		if (rut.value == "")
		{
			rut.value = 0;
			document.getElementById(digito).value = "";
			ln_ret = 0;
			rut.focus();
		}
		else
		{
			document.getElementById(digito).value = GetDgvRut(rut.value);
			ln_ret =-1;
		}
	}
    if(ln_key > 0 && ln_ret > 0 && (rut.value + String.fromCharCode(ln_ret)) != "")
	{
		document.getElementById(digito).value = GetDgvRut(rut.value+ String.fromCharCode(ln_ret));
	}
	if(ln_ret == 0)
	{
		return false;
	}
	else
	{
		return true;
	}					
}
//--------------------------------------------------------------
function GetDgvRut(crut)
{
	var dvr = '0';
	suma = 0;
	mul  = 2;
	if(crut.length==0)
	{
		dvr="";
		return dvr;
	}		
  	if(crut=='0')
  	{
		dvr="";
		return dvr;
  	}		
  	for (i= crut.length-1 ; i >= 0; i--)
  	{
    	suma = suma + crut.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 + "";
  	}
   	return dvr;
}
//--------------------------------------------------------------
function permiteSoloNum(e)
{
	key=(document.all) ? e.keyCode : e.which;
	if( (key < 48 || key > 57) && ( key != 8 ) && ( key != 13 ) )
	{			
		return false;
	}
	return true;
}
//fin funcion

/* Fin Rut */
//---------------------------------------------------------------