//Pasa un valor numérico a formato español
function FormatNum (precioReal, decim){
	var precio=Math.abs(precioReal);
	var pdecimal, precioaux;
	var sPrecio = new String(precio);	
	var strdecimar = new String("0000000000");	
	
	if (decim === 0) {
		precio = Math.round(precio);
		precioaux = "";
	}
	else {
    var exp=Math.pow(10, decim);
    precio=Math.round(precio*exp)/exp;
    sPrecio=new String(precio);
		pdecimal=sPrecio.indexOf(".");
		if (pdecimal != -1){
			precioaux = "," + sPrecio.substr(pdecimal+1,decim);
		}	
		else {
			precioaux = "," + strdecimar.substr(0,decim);
		}
    var l=precioaux.length;
    if (l<(decim+1)) {
      precioaux+=strdecimar.substr(0,decim+1-l);
    }
	}	
	
	var entera = new String(parseInt(precio, 10));	
	while (entera.length > 2){
		precioaux = "." + entera.substring(entera.length-3,entera.length)+ precioaux;
		entera =  entera.substring(0,entera.length-3);
	}
	if (entera.length > 0 ) {
		precioaux = entera + precioaux;
	}
	else {
		precioaux = precioaux.substring(1,precioaux.length);
	}
	if (precioReal<0) 
		precioaux="-" + precioaux;

	return(precioaux);
}

// Se pasa como parámetro una cadena con puntos
// Se devuelve el valor numérico correspondiente
function CDbl(strDbl) {
	var pdecimal;													// Almacena la posición de los puntos
	var sPrecio = new String(strDbl);		// Almacena la cadena de entrada
	
	// Calcular la posición del primer punto recorriendo la cadena de Izda. a Dcha.
	pdecimal=sPrecio.indexOf(".");
	// Si hay algún punto en la cadena
	while (pdecimal != -1) {
	  // Obtener la subcadena antes del punto
		precioauxini = sPrecio.substr(0,pdecimal);
		// Obtener la subcadena después del punto para eliminarlo
		precioauxresto = sPrecio.substring(pdecimal+1, sPrecio.length);
		// Unir ambas subcadenas
		sPrecio = precioauxini + precioauxresto;
		// Calcular la posición del siguiente punto
		pdecimal=sPrecio.indexOf(".");
	}	
	// Calcular la posición de la coma
	pdecimal=sPrecio.indexOf(",");
	// Si hay una coma se sustituye por un punto
	if (pdecimal != -1) {
		var precioauxini = sPrecio.substr(0,pdecimal);
		var precioauxresto = sPrecio.substring(pdecimal+1, sPrecio.length);
		sPrecio = precioauxini + "." + precioauxresto;
	}
		
	return(parseFloat(sPrecio));
}

//Valida que el texto pasado es una fecha correcta:
function ValidaFecha (strFecha) {
	var aDatos=strFecha.split("/");
	if (aDatos.length!=3) return false;
		
	var dia=aDatos[0];
	var mes=aDatos[1];
	var anio=aDatos[2];

	if (isNaN(dia) || isNaN(mes) || isNaN(anio))
		return false;

	anio = parseInt(anio,10);
	if ((anio >=100)& (anio < 1800))
			return false;
		
	dia = parseInt(dia, 10);
	mes = parseInt(mes, 10);
	
	if (dia<=0) return false;
	if ((mes<=0) || (mes>12)) return false;
		
	var year;
	if (anio<100) {
		year= anio + ((anio<70) ? 2000 : 1900);
	} else {
		year=anio;
	}
	
	return (dia<=GetMonthCount(mes,year));
}

var rgMC = Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);

function GetMonthCount(month,year) {
	var c=rgMC[month-1];
	if((2==month)&&IsLeapYear(year)) c++;
	return c;
}

function IsLeapYear(year) {
	return( 0===year%4 && ((year%100!==0)||(year%400===0)) );
}


// Valida que el email es correcto:
function ValidaEmail(str) {
	if (str === "")
		return (false);

	if (window.RegExp) {
		var reg1str = "(@.*@)|(\\.\\.)|(@\\.)|(\\.@)|(^\\.)";
		var reg2str = "^.+\\@(\\[?)[a-zA-Z0-9\\-\\.]+\\.([a-zA-Z]{2,4}|[0-9]{1,3})(\\]?)$";
		var reg1 = new RegExp(reg1str);
		var reg2 = new RegExp(reg2str);
		if (!reg1.test(str)&&reg2.test(str))
			return true;
		else
			return false;
	}
	else{
		var p=val.indexOf('@');
		if (p<1 || p==(str.length-1))
			return false;
	  }

	return true;
}

function CrearInput(n, v) {
	var i=document.createElement("input");
	i.type="hidden";
	i.name=n;
	i.value=v;
	return i;
}


function getComputedStyleX(el, sProp) {
	if (!document.defaultView)
		return parseInt(el.currentStyle[sProp], 10);
	else
		return parseInt(document.defaultView.getComputedStyle(el, null).getPropertyValue(sProp), 10);
}



function hasClassName(el, sClassName) {
	if (el === null) return false;
	if (typeof el.className == 'undefined') return false;
	var parts = String(el.className).split(/\s+/);
	for (var i = 0; i < parts.length; i++) {
		if (parts[i] == sClassName)
			return true;
	}
	return false;
}


//comprueba que un campo de un formulario contiene un número entero
// y devuelve ese valor. Si no es número le asigna el valor inicial
function ValidarInt(obj, inicial) {
	var valor=obj.value;
	var tmp=parseInt(valor, 10);
	if (isNaN(tmp)) tmp=inicial;
	if (valor!=tmp) obj.value=tmp;
	return tmp;
}

//comprueba que un campo de un formulario contiene un número en coma flotante
// en formato español y devuelve el número interpretado en JS.
function ValidarDbl(obj, inicial, decimales) {
	var valor=obj.value;
	var tmp=CDbl2(valor);
	if (isNaN(tmp)) tmp=inicial;
	var sTmp=FormatNum(tmp, decimales);
	if (valor!=sTmp) obj.value=sTmp;
	return tmp;
}

function CFloat(num, inicial) {
	var tmp=num;
	tmp=tmp.replace(/\./g, "");
	tmp=tmp.replace(/,/g, ".");
	tmp=parseFloat(tmp);
	if (isNaN(tmp)) tmp=inicial;
	return tmp;
}



function getCookieVal (offset) {
  var endstr = document.cookie.indexOf (";", offset);
  if (endstr == -1)
    endstr = document.cookie.length;
  return unescape(document.cookie.substring(offset, endstr));
}

function GetCookie (name) {
  var arg = name + "=";
  var alen = arg.length;
  var clen = document.cookie.length;
  var i = 0;
  while (i < clen) {
    var j = i + alen;
    if (document.cookie.substring(i, j) == arg)
      return getCookieVal (j);
    i = document.cookie.indexOf(" ", i) + 1;
    if (i === 0) break; 
  }
  return null;
}

function SetCookie (name,value,expires,path,domain,secure) {
var expdate = new Date ();
expdate.setTime (expdate.getTime() + (10*365 * 24 * 60 * 60 * 1000)); 

  document.cookie = name + "=" + escape (value) +
    ((expires) ? "; expires=" + expires.toGMTString() : "; expires=" + expdate.toGMTString()) +
    ((path) ? "; path=" + path : "") +
    ((domain) ? "; domain=" + domain : "") +
    ((secure) ? "; secure" : "");
}

function CambiarClase(el, sClassName) {
	if (el === null) return;
	var found=false;
	var nueva="";
	var parts = String(el.className).split(/\s+/);
	for (var i = 0; i < parts.length; i++) {
		if (parts[i] == sClassName) {
			found=true;
		} else {
			if (nueva!=="") nueva+=" ";
			nueva+=parts[i];
		}
	}
	if (!found) nueva+=" " + sClassName;
	el.className=nueva;
}

function fuera(x) {
	if (x.blur) x.blur();
}

function abrirCentro(ref, w, h, opc, nombre) {
	var centro="";
	if (screen && screen.availWidth) {
		centro+=", left=" + ((screen.availWidth-w)/2);
		centro+=", top=" + ((screen.availHeight-h)/2);
	}
	if (ref==undefined)
	{
		var e=window.event;
		var obj=e.srcElement;
		while(obj && obj.nodeName!="A")
			obj = obj.parentNode;
		if (!obj)
			return false;
		ref=obj.href;
	}
	if (nombre==undefined) {
		nombre=ref.replace(/(^.*\/|^)([^\/]*)(\?.*$|$)/, "$2"); //tomamos el nombre del fichero.
//		nombre=ref.replace(/(^.*\/|^)([^\/]*?)(\?.*$|$)/, "$2"); //tomamos el nombre del fichero. el nongreedy no funciona en IE5.0
	}
	nombre=nombre.replace(/\W|\./g, "");

	w=window.open(ref, nombre, "width=" + w + ",height=" +h+centro + opc);
	if (!w)
	{
		alert("La ventana ha sido bloqueada\r\nPara utilizar la p\xE1gina adecuadamente desactive el bloqueador de ventanas.");
		return true;
	}
	try
	{
		var sTest = w.name ;
		w.focus();
	}
	catch(e)
	{
		alert("No ha sido posible activar la nueva ventana. Revise la configuraci\xF3n de su bloqueador de ventanas.");
		return true;
	}
/*
	//discussion toolbar
	if (window.event)
			window.event.returnValue = false;
*/
	return false;
}

function obtenerPadre(obj, tag) {
	if (obj === null)
		return null;

	if (obj.tagName== tag)
		return obj;
	else
		return obtenerPadre(obj.parentNode, tag);
}

function cambiarTexto(obj, txt) {
	if (!obj) return;
	while (obj.childNodes[0]) obj.removeChild(obj.childNodes[0]);
	obj.appendChild(document.createTextNode(txt));
}

function elipsis(txt, max) {
	var l=txt.length;
	if (l<max) {
		return (document.createTextNode(txt));
	}
	var s=document.createElement("SPAN");
	s.title=txt;
	cambiarTexto(s, txt.substr(0, max) + "...");
	return(s);
}

function IgualarCheckBoxes(padre, valor) {
	var t=document.getElementById(padre);

	var I=t.getElementsByTagName("INPUT");
	for (var i=I.length-1; i>=0; i--) {
		e=I[i];
		if (e.type.toUpperCase()=="CHECKBOX") {
			e.checked=valor;
		}
  }
}

function milliDif() {
	var d = new Date();
	return d.getTime();
}

function CDbl2(S) {
	if (S.indexOf(",")==-1) {
		return parseFloat(S);
	} else { 
		return CDbl(S);
	}
}

function formateaTiempo(d)
{
	return d.getHours() + ":" + d.getMinutes() + ":" + d.getSeconds() + "." + d.getMilliseconds(); 
}

// remote procedure call
function callServer(f) {
	var h = document.getElementsByTagName('head')[0];
	var old  = document.getElementById('lastLoadedCmds');
	if (old) 
		old.parentNode.removeChild(old);

	var d=new Date();
	var s = document.createElement("script");
	s.src = f + "&rndm=" + formateaTiempo(d);
	s.type = "text/javascript";
	s.defer = true;
	s.id = "lastLoadedCmds";
	h.appendChild(s);
}

// rpc mediante XmlHttp
var _xmlHttp=null; 
// returns an XMLHttp object... gets it in an IE/Mozilla friendly way..
function getXMLHTTP(){
  var A=null;
  try{
    A=new ActiveXObject("Msxml2.XMLHTTP");
  }catch(e){
    try{
      A=new ActiveXObject("Microsoft.XMLHTTP");
    } catch(oc){
      A=null;
    }
  }
  if(!A && typeof XMLHttpRequest != "undefined") {
    A=new XMLHttpRequest();
  }
  return A;
}


// This function uses the xmlHttp object to send a message back to the server
function callBackServerXML(query){
  if(_xmlHttp&&_xmlHttp.readyState!=0)
    _xmlHttp.abort();

  _xmlHttp=getXMLHTTP();
  if(_xmlHttp){
			var d=new Date();
		//le indicamos que el encoding de salida sea utf-8 ya que es así como lo necesitamos
    _xmlHttp.open("GET",query + "&oe=utf-8" + "&rndm=" + d,true);

    _xmlHttp.onreadystatechange=function() {
      if(_xmlHttp.readyState==4&&_xmlHttp.responseText) {
				// The response text gets executed as javascript... 
				eval(_xmlHttp.responseText);
      }
    };

    _xmlHttp.send(null);
  }
}


function MuestraFecha(f, c) {
	var d=f.getDate();
	var m=f.getMonth()+1;
	var a=f.getFullYear().toString();
	if (!c) a=a.substr(2);
	return (ceroPadd(d) + "/" + ceroPadd(m) + "/" + a);
}

function ceroPadd(s)
{
	if (s.toString().length<2)
		return "0" + s;

	return s;
}
// -----------------------------

function alturaInterna() {
	return (elementoBody().clientHeight);
}

function anchuraInterna() {
	return (elementoBody().clientWidth);
}

//por si estamos usando un evento de otro frame
function docEvento(e) {
	var elmto=(e.target || e.srcElement);
	return(elmto.document);
}

function CalcularX(e) {
	if (e.pageX)
		return e.pageX;
	else {
		return elementoBody(docEvento(e)).scrollLeft + e.clientX;
	}
}

function CalcularY(e) {
	if (e.pageY)
		return e.pageY;
	else {
		return elementoBody(docEvento(e)).scrollTop + e.clientY;
	}
}
//las páginas funcionan distinto si están en modo CSS1Compat (Standard) o BackCompat
function elementoBody(doc) {
	if (!doc) doc=document;
	if ((doc.compatMode) && (doc.compatMode=="CSS1Compat")) 
		return doc.documentElement;
	else
		return doc.body;
}


// XBrowser
//desfasada, a quitar.
function addEvent(obj, evType, fn, useCapture){
  if (obj.addEventListener){
    obj.addEventListener(evType, fn, useCapture);
    return true;
  } else if (obj.attachEvent){
    var r = obj.attachEvent("on"+evType, fn);
    return r;
  } else {
    return false;
  }
} 


//el IE cambia las anclas automáticamente al asignar el innerHTML, dejarlo bien:
//¿más cosas que arreglar?
function corregirAutoModificaciones(obj) {
	if (!document.all) return;
	
	var l=document.location.href;
	l=l.replace(/(#.*)/, ""); //quitamos el posible hash que pueda tener
	//tenemos la cadena utilizada internamente:
	var A=obj.getElementsByTagName("A");
	for (var i=0; i<A.length; i++) {
		var a=A[i];
		if (a.href!="")
			a.href=a.href.replace(l+"#", "#");
	}
}