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_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_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 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_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];}
}

// --------------------------------------------------------------------------
// .Nombre: cambiaMarco
//
// .Descr: Cambia el contenido de un marco especifico
//
// .In marco: Nombre del marco
// .In url: Url a la que dirigir el marco
//
// .Versiones:
//   # 1.0
//		.Autor: JJSM
//		.Fecha: 22/01/02
//		.Descr: Creación  
// --------------------------------------------------------------------------
function cambiaMarco(marco, url)
{
   var c = xbGetElementById(marco);
   c.src = url;
}

function formatNumber(value)
{
   lowValue = Math.floor(value);
   var cents = 100*(value-lowValue) + 0.6;

   NumStr = new String(lowValue);
   if (lowValue >= 1000 || lowValue <= 1000)
   {
      var iStart = NumStr.indexOf(".");
      if (iStart <0) iStart=NumStr.length;
      iStart -= 3;
      while (iStart >= 1)
      {
         NumStr = NumStr.substring(0,iStart) + '.' +  NumStr.substring(iStart,NumStr.length)
         iStart -= 3;
      }
   }

   lowValue = NumStr;
   
   if (cents > 99)
   {
      returnNumber = lowValue ++;
      returnNumber += ",00";
   }
   else
   {
      returnNumber = lowValue + ",";
      returnNumber += Math.floor(cents/10);
      returnNumber += Math.floor(cents%10);
   }

   return returnNumber;
}

/***************************************************************************
**************/
	//Función que devuelve una cadena
	//sin espacios por la derecha y la izquierda.
	//	Elemento:Es el objecto a validar(la caja de texto).
	function Trim(str) {
		var resultStr = '';
		resultStr = TrimLeft(str);
		resultStr = TrimRight(resultStr);
		return resultStr;
	}


/***************************************************************************
**************/
	//Función que quita los espacios por la izquierda.
	//	str:la cadena a limpiar.
	function TrimLeft(str) {
		var resultStr = '';
		var i =  0;
		var len = 0 ;
		if (str+'' == 'undefined' || str == null){return null;}
		str += '';
		if (str.length == 0){
			resultStr = '';
		}else{
			len = str.length;
	  		while ((i <= len) && (str.charAt(i) == " ")){i++;}
	  		resultStr = str.substring(i, len);
	  	}
	  	return resultStr;
	}


/***************************************************************************
**************/
	//Función que quita los espacios por la derecha.
	//	str:la cadena a limpiar.
	function TrimRight(str) {
		var resultStr='';
		var i=0;
		if (str+'' == 'undefined' || str == null){return null;}
		str += '';
		if (str.length == 0){
			resultStr = '';
		}else{
	  		i = str.length - 1;
	  		while ((i >= 0) && (str.charAt(i) == ' ')){i--;}
		  	resultStr = str.substring(0, i + 1);
		}
		return resultStr;
	}

/***************************************************************************
**************/	
function MoveWindow(alto, ancho)
{
    PosX = (screen.availWidth - ancho)/2;
    PosY = (screen.availHeight - alto)/2;
	window.moveTo (PosX,PosY);    
}
