function checkCDV( dvr )

{
  dv = dvr + ""
  if ( dv != '0' && dv != '1' && dv != '2' && dv != '3' && dv != '4' && dv != '5' && dv != '6' && dv != '7' && dv != '8' && dv != '9' && dv != 'k'  && dv != 'K')
  {
    alert("Debe ingresar un digito valido.");
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
  }
  return true;
}



//////////////////////////////////////////////////

function checkDV( crut )

{
  largo = crut.length;
  if ( largo < 2 )
  {
    alert("Debe ingresar el R.U.T completo.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
  }

  if ( largo > 2 )
    rut = crut.substring(0, largo - 1);
  else
    rut = crut.charAt(0);
  dv = crut.charAt(largo-1);
  checkCDV( dv );

  if ( rut == null || dv == null )
      return 0

  var dvr = '0'

  suma = 0
  mul  = 2

  for (i= rut.length -1 ; i >= 0; i--)
  {
    suma = suma + rut.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 + ""
  }

//  alert("rut: [" + rut + "]" );
//  alert("dvr=[" + dvr + "] dv=[" + dv + "]" );

  if ( dvr != dv.toLowerCase() )
  {
    alert("El R.U.T ingresado es incorrecto.")
    window.document.registrauser.rut.focus();
       window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false
  }

//      window.document.registrauser.rut.value = rut + "-" + dv;

      return true

}

//////////////////////////////////////////////////

function checkRutField(texto)
{
  //NUEVO

  var tmpstr = "";

  for ( i=0; i < texto.length ; i++ )
    if ( texto.charAt(i) != ' ' && texto.charAt(i) != '.' && texto.charAt(i) != '-' )
      tmpstr = tmpstr + texto.charAt(i);
  texto = tmpstr;
  largo = texto.length;

  //NUEVO


  if ( largo < 2 )
  {
    alert("Debe ingresar el R.U.T completo.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
  }


  for (i=0; i < largo ; i++ )
  { 
    if ( texto.charAt(i) !="0" && texto.charAt(i) != "1" && texto.charAt(i) !="2" && texto.charAt(i) != "3" && texto.charAt(i) != "4" && texto.charAt(i) !="5" && texto.charAt(i) != "6" && texto.charAt(i) != "7" && texto.charAt(i) !="8" && texto.charAt(i) != "9" && texto.charAt(i) !="k" && texto.charAt(i) != "K" ) 
    {
      alert("El valor ingresado no corresponde a un R.U.T valido.");
      window.document.registrauser.rut.focus();
      window.document.registrauser.rut.select();
      window.document.registrauser.rut.value = "";
      return false;
    }
  }


  //NUEVO

  var invertido = "";

  for ( i=(largo-1),j=0; i>=0; i--,j++ )
    invertido = invertido + texto.charAt(i);


  var dtexto = "";

  dtexto = dtexto + invertido.charAt(0);
  dtexto = dtexto + '-';
  cnt = 0;

  for ( i=1,j=2; i<largo; i++,j++ )
  {
    //alert("i=[" + i + "] j=[" + j +"]" );
    if ( cnt == 3 )
    {
      dtexto = dtexto + '.';
      j++;
      dtexto = dtexto + invertido.charAt(i);
      cnt = 1;
    }
    else
    { 
      dtexto = dtexto + invertido.charAt(i);
      cnt++;
    }
  }

  invertido = "";

  for ( i=(dtexto.length-1),j=0; i>=0; i--,j++ )
    invertido = invertido + dtexto.charAt(i);


  window.document.registrauser.rut.value = invertido;  

// CORRECCION AGOSTO 2001 - PSB
  if (invertido=="00.000.000-0"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="000000000"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="11.111.111-1"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="111111111"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="22.222.222-2"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="222222222"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="333333333"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="33.333.333-3"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="444444444"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="44.444.444-4"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="555555555"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="55.555.555-5"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="666666666"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="66.666.666-6"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="777777777"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="77.777.777-7"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="888888888"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="88.888.888-8"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="999999999"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}
  if (invertido=="99.999.999-9"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}

  if (invertido=="0-0"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}

  if (invertido=="1-9"){
    alert("El R.U.T ingresado no es válido.")
    window.document.registrauser.rut.focus();
    window.document.registrauser.rut.select();
    window.document.registrauser.rut.value = "";
    return false;
}



  if ( checkDV(texto) )
    return true;
  return false;
}



