<!--
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);
	}

// isIcluded: devuelve verdadero si script ha sido incluido
function isIncluded(script)
	{
	var scripts = document.getElementsByTagName('script');
	if (!scripts)
		{
		return false;
		}
	var re = new RegExp(script + "\\.js(\\?.*)?$");
	for (var s = 0; s < scripts.length; ++s)
		{
		if (scripts[s].src && scripts[s].src.match(re))
			{
			return true;
			}
		}
	return false;
	}

/////////////////////////////
// Funciones para evitar que Internet Explorer bloquee los flash y Macromedia.
//v1.0
//Copyright 2006 Adobe Systems, Inc. All rights reserved.
function AC_AddExtension(src, ext)
{
  if (src.indexOf('?') != -1)
    return src.replace(/\?/, ext+'?'); 
  else
    return src + ext;
}

function AC_Generateobj(objAttrs, params, embedAttrs) 
{ 
  var str = '<object ';
  for (var i in objAttrs)
    str += i + '="' + objAttrs[i] + '" ';
  str += '>';
  for (var i in params)
    str += '<param name="' + i + '" value="' + params[i] + '" /> ';
  str += '<embed ';
  for (var i in embedAttrs)
    str += i + '="' + embedAttrs[i] + '" ';
  str += ' ></embed></object>';

  document.write(str);
}

function AC_FL_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".swf", "movie", "clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
     , "application/x-shockwave-flash"
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_SW_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".dcr", "src", "clsid:166B1BCA-3F9C-11CF-8075-444553540000"
     , null
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_GetArgs(args, ext, srcParamName, classid, mimeType){
  var ret = new Object();
  ret.embedAttrs = new Object();
  ret.params = new Object();
  ret.objAttrs = new Object();
  for (var i=0; i < args.length; i=i+2){
    var currArg = args[i].toLowerCase();    

    switch (currArg){	
      case "classid":
        break;
      case "pluginspage":
        ret.embedAttrs[args[i]] = args[i+1];
        break;
      case "src":
      case "movie":	
        args[i+1] = AC_AddExtension(args[i+1], ext);
        ret.embedAttrs["src"] = args[i+1];
        ret.params[srcParamName] = args[i+1];
        break;
      case "onafterupdate":
      case "onbeforeupdate":
      case "onblur":
      case "oncellchange":
      case "onclick":
      case "ondblClick":
      case "ondrag":
      case "ondragend":
      case "ondragenter":
      case "ondragleave":
      case "ondragover":
      case "ondrop":
      case "onfinish":
      case "onfocus":
      case "onhelp":
      case "onmousedown":
      case "onmouseup":
      case "onmouseover":
      case "onmousemove":
      case "onmouseout":
      case "onkeypress":
      case "onkeydown":
      case "onkeyup":
      case "onload":
      case "onlosecapture":
      case "onpropertychange":
      case "onreadystatechange":
      case "onrowsdelete":
      case "onrowenter":
      case "onrowexit":
      case "onrowsinserted":
      case "onstart":
      case "onscroll":
      case "onbeforeeditfocus":
      case "onactivate":
      case "onbeforedeactivate":
      case "ondeactivate":
      case "type":
      case "codebase":
        ret.objAttrs[args[i]] = args[i+1];
        break;
      case "width":
      case "height":
      case "align":
      case "vspace": 
      case "hspace":
      case "class":
      case "title":
      case "accesskey":
      case "name":
      case "id":
      case "tabindex":
        ret.embedAttrs[args[i]] = ret.objAttrs[args[i]] = args[i+1];
        break;
      default:
        ret.embedAttrs[args[i]] = ret.params[args[i]] = args[i+1];
    }
  }
  ret.objAttrs["classid"] = classid;
  if (mimeType) ret.embedAttrs["type"] = mimeType;
  return ret;
}
// Fin Dreamweaver Active-content
/////////////////////////////////