<!--
var W3C = document.getElementById? true : false; // IE5+, Netscape 6+, Opera 5+, Konqueror 2.1+, Mozilla and various Mozilla/Gecko-based browsers.
var NN4 = document.layers? true : false; //Netscape Navigator 4.x.
var IE4 = document.all? true : false; // IE version 4 (and above).

function valida_email(txt)
	{
	var idx_at,tstr,idx_dot;

	idx_at = txt.indexOf("@",0);
	tstr = txt.substring(idx_at+1);
	idx_dot = tstr.indexOf(".",0);
	if(idx_at < 1 || idx_dot < 1 || idx_dot > tstr.length-3)
		{
		return(false);
		}
	return(true);
	}
// isAlpha2: devuelve verdadero si la cadena contiene solo caracteres alfabeticos o espacios más acentos
function isAlpha2(value)
	{
	var pattern=new RegExp("^[á-úÁ-Úà-ùÀ-Ùa-zA-ZñÑ'\\-\\s]+$");
	return value.match(pattern);
	}

// isAlpha: devuelve verdadero si la cadena contiene solo caracteres alfabeticos o espacios
function isAlpha(value)
	{
	var pattern=new RegExp("^[a-zA-ZñÑ'\\-\\s]+$");
	return value.match(pattern);
	}

// isAlphaDigit: devuelve verdadero si la cadena contiene solo caracteres alfabeticos o numeros
function isAlphaDigit(value)
	{
	var pattern=new RegExp("^[a-zA-Z0-9]+$");
	return value.match(pattern);
	}


function LTrim(value)
	{
	var pattern=new RegExp("^\\s+", "g")
	return value.replace(pattern, "");
	}

function RTrim(value)
	{
	var pattern=new RegExp("\\s+$", "g")
	return value.replace(pattern, "");
	}

function Trim(value)
	{
	return RTrim(LTrim(value));
	}


function mClk(src)
	{
	if (typeof event == 'undefined')
		{
		return;
		}
	if (event && event.srcElement && event.srcElement.tagName == 'TD')
		{
		src.children.tags('A')[0].click();
		}
	}


function getElemById(id)
	{
	var elem = document.all ? document.all[id] : document.getElementById(id);

	if (!elem)
		{
		return;
		}

	return elem;
	}

function show_layer(layerId)
	{
	if (W3C)
		{
		document.getElementById(layerId).style.visibility = "visible";
		}
	else if (IE4)
		{
		document.all[layerId].style.visibility = "visible";
		}
	else if(NN4)
		{
		document.layers[layerId].visibility = "show";
		}
	}


function hide_layer(layerId)
	{
	if (W3C)
		{
		document.getElementById(layerId).style.visibility = "hidden";
		}
	else if (IE4)
		{
		document.all[layerId].style.visibility = "hidden";
		}
	else if(NN4)
		{
		document.layers[layerId].visibility = "hidden";
		}
	}

function display_block_layer(layerId)
	{
	if (W3C)
		{
		document.getElementById(layerId).style.display = "block";
		}
	else if (IE4)
		{
		document.all[layerId].style.display = "block";
		}
	else if(NN4)
		{
		document.layers[layerId].display = "block";
		}
	}


function display_none_layer(layerId)
	{
	if (W3C)
		{
		document.getElementById(layerId).style.display = "none";
		}
	else if (IE4)
		{
		document.all[layerId].style.display = "none";
		}
	else if(NN4)
		{
		document.layers[layerId].display = "none";
		}
	}

function getRadioValue (radioButtonOrGroup)
	{
	var value = null;
	var b;
	if (radioButtonOrGroup.length)
		{
		for (b = 0; b < radioButtonOrGroup.length; b++)
			{
			if (radioButtonOrGroup[b].checked)
				{
				value = radioButtonOrGroup[b].value;
				}
			}
		}
	else if (radioButtonOrGroup.checked)
		{
		value = radioButtonOrGroup.value;
		}
	return value;
	}

function mover(){
if (screen.availWidth == 640) window.moveTo(5,5);
if (screen.availWidth == 800) window.moveTo(5,5);
if (screen.availWidth == 1024) window.moveTo(5,5);
}

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 MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

function MM_showHideLayers() { //v3.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v='hide')?'hidden':v; }
    obj.visibility=v; }
}

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

function tmt_findObj(n){
	var x,t; if((n.indexOf("?"))>0&&parent.frames.length){t=n.split("?");
	x=eval("parent.frames['"+t[1]+"'].document.getElementById('"+t[0]+"')");
	}else{x=document.getElementById(n)}return x;
}

function mOvr(src,clrOver){
	if (!event)
		{
		return;
		}
	if (!src.contains(event.fromElement)){
		src.style.cursor = 'default';
		src.bgColor = clrOver;
	}
}
function mOut(src,clrIn){
	if (!event)
		{
		return;
		}
	if (!src.contains(event.toElement)){
		src.style.cursor = 'default';
		src.bgColor = clrIn;
	}
}

function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}

function tmt_showhideAll(c){
	var v = (document.layers) ? ".visibility" : ".style.visibility";
	var arr = (document.layers) ? document.layers : (document.all) ? document.all.tags("DIV") : document.getElementsByTagName("DIV");
	for(var i=0;i<arr.length;i++){eval("arr["+i+"]"+v+"='"+c+"'");}
}

function MM_goToURL() { //v3.0
  var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}

// Empty: devuelve verdadero si value es vacio
function Empty(value) {
	var pattern=new RegExp("\^[ ]*$");
	return value.match(pattern);
}

function IsRut(theRut)
	{
	rut = theRut;
	var tmpstr = "";
	largo = rut.length;
	for ( i=0; i < largo; i++ )
		{
		if ( rut.charAt(i) != ' ' && rut.charAt(i) != '.' && rut.charAt(i) != '-' )
			{
			tmpstr = tmpstr + rut.charAt(i);
			}
		}
	rut = tmpstr;
	largo = rut.length;
	if ( largo < 2 )
		{
		return false;
		}

	for (i=0; i < largo ; i++ )
		{
		if ( rut.charAt(i) !="0" && rut.charAt(i) != "1" && rut.charAt(i) !="2" && rut.charAt(i) != "3" && rut.charAt(i) != "4" && rut.charAt(i) !="5" && rut.charAt(i) != "6" && rut.charAt(i) != "7" && rut.charAt(i) !="8" && rut.charAt(i) != "9" && rut.charAt(i) !="k" && rut.charAt(i) != "K" )
			{
			return false;
			}
		}
	var dtexto = "";
	cnt = 0;
	for ( i=largo-1, j=largo-1+3; i>=0; i--, j-- )
		{
		if ( cnt == 3 )
			{
			dtexto = rut.charAt(i) + dtexto;
			dtexto = '.' + dtexto;
			cnt = 1;
			}
		else
			{
			dtexto = rut.charAt(i) + dtexto;
			if( cnt == 0 )
				{
				dtexto = '-' + dtexto;
				}
			cnt++;
			}
		}
	return checkDV(rut);
	}


function checkDV( crut )
	{
	largo = crut.length;
	if ( largo > 2 )
		{
		rut = crut.substring(0, largo - 1);
		}
	else
		{
		rut = crut.charAt(0);
		}

	dv = crut.charAt(largo-1);
	if ( rut == null || dv == null )
		{
		return 0;
		}

	var dvr = '0';
	suma = 0;
	mul  = 2;
	for (i = rut.length - 1 ; i >= 0; i--)
		{
		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 ( dvr != dv.toLowerCase() )
		{
		return false;
		}

	return true;
	}

// isInteger: devuelve verdero si value es un entero
function isInteger(value)
	{
	var pattern=new RegExp("^[0-9]+$");
	return value.match(pattern);
	}