function VerEjemploFicha()
{var Pagina;
Pagina='ficha.htm';
MM_openBrWindow(Pagina,'','width=500,height=500');
}
function validar(p)

{
// ****************   inicio valida rut ************************************
	var ElRut = DatosUsuario.Rut.value.toUpperCase();
	var ElDv = DatosUsuario.DVR.value.toUpperCase();
	var largo_rut = ElRut.length;
	var largo_dv = ElDv.length;
	var RutC = ElRut+ElDv;

	var rut00 = "000000000";
	if (rut00.substring(0, largo_rut) == ElRut){
            alert("El RUT que ingresó no\nes válido, por favor\nintente nuevamente");
            DatosUsuario.Rut.focus();
            return (false);
	}


	if (largo_rut==0) {
           alert("El RUT está vacío");
           DatosUsuario.Rut.focus();
           return (false);
	}
	if (largo_dv==0) {
           alert("El Dígito Verificador está vacío");
           DatosUsuario.DV.focus();
           return (false);
        } else if ( largo_dv == 2 ){
           alert("El Dígito Verificador sólo debe tener un caracter");
           DatosUsuario.DV.focus();
           return (false);
    	}
	for(i=0;i<largo_rut;i++){
		c=ElRut.charAt(i);
		if (c<"0" || c>"9"){
                   alert("El RUT que ingresó no\nes válido, por favor\nintente nuevamente");
                   DatosUsuario.Rut.focus();
                   return (false);
		}
	}

        c=ElDv.charAt(0);
	if ( (c<"0" || c>"9") && c!="K" ){
           alert("El Dígito Verificador\n que ingresó no es válido,\n por favor intente nuevamente");
           DatosUsuario.DV.focus();
           return (false);
	}

	var suma=0;
	var mult=2;
	
	if (ElDv=="K") ElDv="10";
	for (i=largo_rut-1;i>=0;i--){
		c=ElRut.charAt(i);
		suma+=parseInt(c,10)*mult;
		mult++;
		if (mult>7) mult=2;
	}

	var calculado=11-suma%11;
	if (calculado==11) calculado=0;
	if(parseInt(ElDv)!=calculado){
           alert("El RUT que ingresó no\nes válido, por favor\nintente nuevamente");
           DatosUsuario.Rut.focus();
           return (false);
        }
// ****************   fin valida rut ************************************
	
	return true;
}

function isEmail (s)
{
    if (isEmpty(s)) 
       if (isEmail.arguments.length == 1) return defaultEmptyOK;
       else return (isEmail.arguments[1] == true);
    if (isWhitespace(s)) return false;
    var i = 1;
    var sLength = s.length;
    while ((i < sLength) && (s.charAt(i) != "@"))
    { i++
    }

    if ((i >= sLength) || (s.charAt(i) != "@")) return false;
    else i += 2;

    while ((i < sLength) && (s.charAt(i) != "."))
    { i++
    }

    if ((i >= sLength - 1) || (s.charAt(i) != ".")) return false;
    else return true;
}
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];}
}

function Modificar()
{document.DatosUsuario.action="ingreso1.asp";
 document.DatosUsuario.submit();
}


function Pagar()
{ 
	if (validar(document.DatosUsuario))
	{document.DatosUsuario.action="fichaprevia.asp?SFicha=0";}

// document.DatosUsuario.submit();
}

function BuscarComuna()
{
document.DatosUsuario.action="ingreso_datos.asp";
 document.DatosUsuario.submit();
}
var defaultEmptyOK = false;
var whitespace = " \t\n\r";

function isEmpty(s)
{   return ((s == null) || (s.length == 0))
}

function isWhitespace (s)
{   var i;
    if (isEmpty(s)) return true;
    for (i = 0; i < s.length; i++)
    {   
		var c = s.charAt(i);
		if (whitespace.indexOf(c) == -1) return false;
	}
	return true;
}

function PublicarFicha()
{ 
	if (validar(document.DatosUsuario))
	{
		document.DatosUsuario.action="Ingreso_Datos.asp";
	}

// document.DatosUsuario.submit();
}

function PublicarDatosPer()
{
 document.DatosUsuario2.action="/registro/index.asp?sitio="+document.DatosUsuario2.sitio.value;
document.DatosUsuario2.submit();
}

function GoToAuxWin(n, page)
{
var indexCar_short=0;
page= "" + page;
numero=n;
listin = open(page, '', 'toolbar=no,location=no,directories=no,status=yes,menubar=no,scrollbars=yes,resizable=no,copyhistory=no,width=516,height=400');
}