var statusmsg=""
 
function hidestatus(){
	window.status=statusmsg;
	return true;
}
function isRut(objrut)
{
  var texto = objrut.value;
  var tmpstr = "";  
  
  if (texto=="") return true;
  if (isNaN(texto.substring(0,1))) return true;
  
  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;
  if ( largo < 2 )
	{
    	alert("Debe ingresar el rut completo.")
    	objrut.focus();
    	objrut.select();
    	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.");
		objrut.focus();
		objrut.select();
		return false;
		}
	}

  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++ )
	{
    	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);

  objrut.value = invertido;
  
  if ( checkDV(objrut, texto) )
    	return true;
  return false;
}
function checkDV( objrut, crut )
{
	largo = crut.length;
	if ( largo < 2 )
		{
	  	alert("Debe ingresar el rut completo.")
	  	objrut.focus();
	  	objrut.select();
	  	return false;
	  	}
	if ( largo > 2 )
		rut = crut.substring(0, largo - 1);
	else
	  	rut = crut.charAt(0);
	dv = crut.charAt(largo-1);
	checkCDV(objrut, 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 + "";
	}
	if (dv=='K') dv='k';
	
	if ( dvr != dv.toLowerCase() )
		{
	  	alert("EL rut es incorrecto.")
	  	objrut.focus();
	  	objrut.value="";
	  	return false;
	  	}

  return true;
}
// Valida digito verificador
function checkCDV( objrut, 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 verificador valido.");
    	objrut.focus();
    	objrut.select();
    	return false;
    	}
  return true;
}

function isEmail(objmail) {
  var supported = 0;
  var str=objmail.value

   if (window.RegExp) {
     var tempStr = "a";
     var tempReg = new RegExp(tempStr);
     if (tempReg.test(tempStr)) supported = 1;
   }
   if (!supported) 
     return (str.indexOf(".") > 2) && (str.indexOf("@") > 0);
   var r1 = new RegExp("(@.*@)|(\\.\\.)|(@\\.)|(^\\.)");
   var r2 = new RegExp("^.+\\@(\\[?)[a-zA-Z0-9\\-\\.]+\\.([a-zA-Z]{2,3}|[0-9]{1,3})(\\]?)$");
   if (!r1.test(str) && r2.test(str))
	 return true;
   else
   {
	 alert('Debe ingresar una dirección de e-mail válida.')
//	 objmail.focus()
	 objmail.value=""
	 return false;		
   }
}

function isNumero(objnum)
{
	if (isNaN(objnum.value))
	{
		alert('Asegúrese de que el dato ingresado sea del tipo numérico.')
		objnum.focus()
		objnum.value=""
		return false;
	}		
	else return false;
}

function printPage() {
   if (window.print) {
      agree = confirm('¿Desea imprimir ahora?');
      if (agree) window.print(); 
   }
}
function validanum(obj, lowval, hival,im){
	if (obj.value != ""){
		if ((obj.value < lowval) || (obj.value > hival)){
			alert('Must contain a number between ' + lowval + ' and ' + hival)
			obj.focus()
			obj.value=""
			return false;}
	}
}
function mOvr(src,clrOver) {
if (!src.contains(event.fromElement)) {
src.style.cursor = 'hand';
src.bgColor = clrOver;
}
}
function mOut(src,clrIn) {
if (!src.contains(event.toElement)) {
src.style.cursor = 'default';
src.bgColor = clrIn;
}
}
function mClk(src) {
if(event.srcElement.tagName=='TD'){
src.children.tags('A')[0].click();
}
}
function mClk4(src,clrOver) {
if(event.srcElement.tagName=='TD'){
src.bgColor = clrOver;
src.children.tags('A')[0].click();
}
}
function mOvr4(src,clrOver2) {
if (!src.contains(event.fromElement)) {
src.style.cursor = 'hand';
//src.bgColor = clrOver;
src.style.border = clrOver2;
}
}
function mOut4(src,clrIn2) {
if (!src.contains(event.toElement)) {
src.style.cursor = 'default';
//src.bgColor = clrIn;
src.style.border = clrIn2;
}
}
function ir(url){
	opener.document.location=url;
	window.close();
}
function irPagina(url){
	window.location=url;
}
function popup(href,target,w,h) {
	window.open(href,target,'height='+ h +',width='+ w +',scrollbars=yes,resizable=yes,menubar=no,toolbar=0,status=0,location=0,directories=0,left=50,top=50');
}
function DateFormat(strfecha)
{
	if (!isDate(strfecha)) return 0;
	var patfecha = /^(\d{1,2})\/(\d{1,2})\/(\d{4})/;
	var matchArray = strfecha.match(patfecha);
	var dia = parseFloat(matchArray[1]); dia= (dia<10) ? '0'+dia : dia;
	var mes = parseFloat(matchArray[2]); mes= (mes<10) ? '0'+mes : mes;
	var ano = parseFloat(matchArray[3]); ano= (ano<1900) ? ano+1900 : ano;
	return(parseFloat(ano.toString()+mes.toString()+dia.toString()))
}
function DateCompare(fecha1,fecha2)
{
	var val1 = DateFormat(fecha1)
	var val2 = DateFormat(fecha2)
	if (val1==0 || val2==0) return(2)
	if (val1 == val2) return(0);
	if (val1 > val2) return(1);
	if (val1 < val2) return(-1);		
}
function isDate(strfecha)
{
	var patfecha = /^(\d{1,2})\/(\d{1,2})\/(\d{4})/;
	var matchArray = strfecha.match(patfecha);
	if (matchArray == null)	return false;
	var dia = parseFloat(matchArray[1]);
	var mes = parseFloat(matchArray[2]) - 1;
	var ano = parseFloat(matchArray[3]);
	var fecha = new Date(ano,mes,dia,12)	//a mediodía por cambio de horario
	var anofull=((fecha.getYear()<1900)?fecha.getYear()+1900:fecha.getYear())
	if (anofull!=ano || fecha.getMonth()!=mes || fecha.getDate()!=dia) return false;
	else return true;
}

function isCaracteres(objtext){ 
	largo=objtext.length;
	if (largo>255) { 
		alert('Verificación: los comentarios sólo pueden contener hasta 255 caracteres.') 
		objtext.focus() 
		return false; } 
	else return true;
} 

function popUp(URL) { 
	day = new Date(); 
	id = day.getTime(); 
	eval("page" + id + " = window.open(URL, '" + id + "', 'toolbar=0,scrollbars=1,location=0,statusbar=0,menubar=0,resizable=0,width=650,height=500');"); 
} 

function NewWindow(myname, w, h, scroll) { 
topage="http://www.parava.com/20Upd/WebExperto/index65.asp?affid=webexpertofabian&dname="+ document.searchform.dname.value;
var winl = (screen.width - w) / 2; 
var wint = (screen.height - h) / 2; 
winprops = "height="+h+",width="+w+",top="+wint+",left="+winl+ ",scrollbars=" +scroll + ",resizable,status" 
win = window.open(topage, myname, winprops) 
if (parseInt(navigator.appVersion) >= 4) { 
	win.window.focus(); }
} 

function mOvr(src,clrOver) { 
	if (!src.contains(event.fromElement)) { src.style.cursor = 'hand'; src.bgColor = clrOver; } 
} 
function mOut(src,clrIn) { 
	if (!src.contains(event.toElement)) { src.style.cursor = 'default'; src.bgColor = clrIn; } 
} 
function mClk(src) { 
	if(event.srcElement.tagName=='TD'){ src.children.tags('A')[0].click(); }
} 
var monthNames = new makeArray(12); 
monthNames[0] = "enero"; 
monthNames[1] = "febrero"; 
monthNames[2] = "marzo"; 
monthNames[3] = "abril"; 
monthNames[4] = "mayo"; 
monthNames[5] = "junio"; 
monthNames[6] = "julio"; 
monthNames[7] = "agosto"; 
monthNames[8] = "septiembre"; 
monthNames[9] = "octubre"; 
monthNames[10] = "noviembre"; 
monthNames[11] = "diciembre"; 
// Array of day names 
var dayNames = new makeArray(7); 
dayNames[0] = "Domingo"; 
dayNames[1] = "Lunes"; 
dayNames[2] = "Martes"; 
dayNames[3] = "Miércoles"; 
dayNames[4] = "Jueves"; 
dayNames[5] = "Viernes"; 
dayNames[6] = "Sábado"; 
var now = new Date(); 
var year = now.getYear(); 
if (year < 2000) year = year + 1900; 

function makeArray(len) { 
	for (var i = 0; i < len; i++) {
		this[i] = null; 
		this.length = len; 
	}
} 
function ventana(archivo,ancho,alto){ 
	window.open(archivo,"Encuesta","toolbar=0, location=0, directories=0, status=0, menubar=0, scrollbars=yes, resizable=0, copyhistory=0, width=" + ancho + ", height=" + alto);
}

function IniciarLista() { 
	document.forms["FormLista"].lista.options.selectedIndex = -1
}

function IrURL(formulario) { 
	indice = formulario.lista.selectedIndex;
	if (indice == -1) 
		alert('Debe seleccionar una sección de la lista desplegable.') 
	else 
		window.open(formulario.lista.options[indice].value, "_self") 
}

function MM_openBrWindow(theURL,winName,features) { 
//v2.0 
	window.open(theURL,winName,features); 
}

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; ia.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc; 
	}
}
function MM_findObj(n, d) { //v3.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&&id.layers.length;i++) x=MM_findObj(n,d.layers[i].document); 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];} 
}