// whitespace characters
var whitespace = " \t\n\r";
var defaultEmptyOK = false;

function Vacio(s)
{   return ((s == null) || (s.length == 0))
}

function esURL(s)
/*	Devuelve true si la cadena tiene al menos un punto	
	Devuelve false en cualquier otro caso */
{   
	if ( s.indexOf(".") != - 1)
	{
		pos1 = s.indexOf(".")
		if (pos1 > 0)
			return true;
		else
			return false;
	}
	else 
		return false;
}
function BorrarPunto(num){
var valor

   valor =num.toString().replace(/\./g,"");
   valor =valor.replace(/\,/g,".");
   return (valor);
}
function ConDecimales(num, numDecs) {
var valor
	num = num.toString().replace(/\$|\,/g,'');
	
	if(isNaN(num))
		num = "0";
	
	sign = (num == (num = Math.abs(num)));
	num = Math.floor(num*100+0.50000000001);
	
	cents = num%100;
	
	num = Math.floor(num/100).toString();
	
	if(cents<10)
		cents = "0" + cents;
	
	for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
		num = num.substring(0,num.length-(4*i+3))+'.'+ num.substring(num.length-(4*i+3));
	
	valor=((sign)?'':'-') + num
	if (numDecs > 0)
		valor = valor + ',' + cents
		
	return (valor);
}
function formatNum(num, numDecs) {
var valor
	num = num.toString().replace(/\$|\,/g,'');
	
	if(isNaN(num))
		num = "0";
	
	sign = (num == (num = Math.abs(num)));
	num = Math.floor(num*100+0.50000000001);
	
	cents = num%100;
	
	num = Math.floor(num/100).toString();
	
	if(cents<10)
		cents = "0" + cents;
	
	for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
		num = num.substring(0,num.length-(4*i+3))+'.'+ num.substring(num.length-(4*i+3));
	
	valor=((sign)?'':'-') + num
	if (numDecs > 0)
		valor = valor + ',' + cents
	
	return (valor);
}
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_findObj(n, d) { //v4.01
  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 && d.getElementById) x=d.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 Fecha(dateStr)
{
// Checks for the following valid date formats:
// MM/DD/YY   MM/DD/YYYY   MM-DD-YY   MM-DD-YYYY
// Also separates date into month, day, and year variables

var datePat = /^(\d{1,2})(\/|-)(\d{1,2})\2(\d{2}|\d{4})$/;

// To require a 4 digit year entry, use this line instead:
// var datePat = /^(\d{1,2})(\/|-)(\d{1,2})\2(\d{4})$/;

var matchArray = dateStr.match(datePat); // is the format ok?
if (matchArray == null) {
return false;
}
month = matchArray[3]; // parse date into variables
day = matchArray[1];
year = matchArray[4];
if (month < 1 || month > 12) { // check month range
//alert("El mes debe estar entre 1 y 12.");
return false;
}
if (day < 1 || day > 31) {
//alert("El día debe estar entre 1 y 31.");
return false;
}
if ((month==4 || month==6 || month==9 || month==11) && day==31) {
//alert("El mes "+month+" no tiene 31 dias!")
return false
}
if (month == 2) { // check for february 29th
var isleap = (year % 4 == 0 && (year % 100 != 0 || year % 400 == 0));
if (day>29 || (day==29 && !isleap)) {
//alert("Febrero de " + year + " no tiene " + day + " dias!");
return false;
   }
}
return true;  // date is valid
}


/****************************************************************/

// Returns true if string s is empty or 
// whitespace characters only.

function EnBlanco(s)

{   var i;

    // Is s empty?
    if (Vacio(s)) return true;

    // Search through string's characters one by one
    // until we find a non-whitespace character.
    // When we do, return false; if we don't, return true.

    for (i = 0; i < s.length; i++)
    {   
	// Check that current character isn't whitespace.
	var c = s.charAt(i);

	if (whitespace.indexOf(c) == -1) return false;
    }

    // All characters are whitespace.
    return true;
}

function esFichero()
/*	Devuelve true si el Fichero tiene la extensión que se pasa como parámetro
	 Devuelve false en cualquier otro caso */
{
	var cadena,res,extensiones,i;
	
	extensiones = esFichero.arguments;
	cadena = extensiones[0];
	cadena = cadena.toUpperCase();
	res = false;
	for (i=1;i < extensiones.length; i++)
	{ 
		if (cadena.indexOf("."+ extensiones[i]) != -1 )
		{
			res = true;		
		}
	}
	return (res);
}

function FechaMayorque(datIni,datFin)
/*	Compara dos fechas
	datIni : Fecha Inicial
	datFin : Fecha Final
	Devuelve:
		True si datFin > datIni
		False en cualquier otro caso
*/
{
	var diaIni;
	var MesIni;
	var AnyoIni;
	var diaFin;
	var MesFin;
	var AnyoFin;
	
	//Fecha inicial
	diaIni = datIni.getDate();
	MesIni = datIni.getMonth();
	AnyoIni = datIni.getYear();
	
	//Fecha final
	diaFin = datFin.getDate();
	MesFin = datFin.getMonth();
	AnyoFin = datFin.getYear();
	
	if (AnyoFin > AnyoIni)
	{
		return true;
	}	
	else
	{
		if (AnyoFin == AnyoIni)
		{
			if 	(MesFin > MesIni)
				return true;
			else
			{	
				if 	(MesFin == MesIni)
				{
					if (diaFin > diaIni)
						{
						return true;
						}
					else
						{
						return false;	
						}
				}	
				else
				
					return false;
			}	
		}
		else
			return false;
	}
}
// Convierte una cadena(con Formato Fecha) a Fecha

function str2Date(strFecha)

/* Admite fechas en formato dd/mm/yy d/mm/yy dd/m/yy d/m/yy dd/mm/yyyy d/mm/yyyy dd/m/yyyy d/m/yyyy 
   dd-mm-yy d-mm-yy dd-m-yy d-m-yy dd-mm-yyyy d-mm-yyyy dd-m-yyyy d-m-yyyy 
*/
{
	var posdia,posmes,dia,mes,ano;
	
	if (strFecha.indexOf("/") != - 1)
	{
		posdia = strFecha.indexOf("/");
		dia =  strFecha.substring(0,posdia);
		posmes = strFecha.indexOf("/",posdia+1);
		mes	= strFecha.substring(posdia+1,posmes);
		ano = strFecha.substring(posmes+1,strFecha.length);	
		if (ano < 100)
		{
			ano = parseInt(ano) + 2000;
		}
		return new Date(ano	,mes-1,dia);
		
	}
	
	if (strFecha.indexOf("-") != - 1)
	{
		posdia = strFecha.indexOf("-");
		dia =  strFecha.substring(0,posdia);
		posmes = strFecha.indexOf("-",posdia+1);
		mes	= strFecha.substring(posdia+1,posmes);
		ano = strFecha.substring(posmes+1,strFecha.length);	
		if (ano < 100)
		{
			ano = parseInt(ano) + 2000;
		}
		return new Date(ano,mes-1,dia);	
	}
	
	dia = strFecha.substring(0,2);
	mes = strFecha.substring(2,4);
	ano = strFecha.substring(4,strFecha.length);
	if (ano < 100)
		{
			ano = parseInt(ano) + 2000;
		}
	return new Date(ano,mes-1,dia);
	
}

//convierte una fecha a formato ansi yyyymmdd
function AnsiDate(strFecha)

/* Admite fechas en formato dd/mm/yy d/mm/yy dd/m/yy d/m/yy dd/mm/yyyy d/mm/yyyy dd/m/yyyy d/m/yyyy 
   dd-mm-yy d-mm-yy dd-m-yy d-m-yy dd-mm-yyyy d-mm-yyyy dd-m-yyyy d-m-yyyy 
*/
{
	var posdia,posmes,dia,mes,ano;
	
	if (strFecha.indexOf("/") != - 1)
	{
		posdia = strFecha.indexOf("/");
		dia =  strFecha.substring(0,posdia);
		posmes = strFecha.indexOf("/",posdia+1);
		mes	= strFecha.substring(posdia+1,posmes);
		ano = strFecha.substring(posmes+1,strFecha.length);	
	}
	else{
		if (strFecha.indexOf("-") != - 1)
		{
			posdia = strFecha.indexOf("-");
			dia =  strFecha.substring(0,posdia);
			posmes = strFecha.indexOf("-",posdia+1);
			mes	= strFecha.substring(posdia+1,posmes);
			ano = strFecha.substring(posmes+1,strFecha.length);	
		}
		else{
			dia = strFecha.substring(0,2);
			mes = strFecha.substring(2,4);
			ano = strFecha.substring(4,strFecha.length);
		}
	}	
	if(ano<100)
		ano = parseInt(ano)+2000;	
	if (parseInt(dia.length)==1)
		dia= "0" + dia;
	if (parseInt(mes.length)==1)
		mes = "0"+ mes;
	return (ano + mes + dia);
	
}

/****************************************************************/

// isEmail (STRING s [, BOOLEAN emptyOK])
// 
// Email address must be of form a@b.c ... in other words:
// * there must be at least one character before the @
// * there must be at least one character before and after the .
// * the characters @ and . are both required
//
// For explanation of optional argument emptyOK,
// see comments of function isInteger.

function Email(s)
{   if (Vacio(s)) 
       if (Email.arguments.length == 1) return defaultEmptyOK;
       else return (Email.arguments[1] == true);
   
    // is s whitespace?
    if (EnBlanco(s)) return false;
    
    // there must be >= 1 character before @, so we
    // start looking at character position 1 
    // (i.e. second character)
    var i = 1;
    var sLength = s.length;

    // look for @
    while ((i < sLength) && (s.charAt(i) != "@"))
    { i++
    }

    if ((i >= sLength) || (s.charAt(i) != "@")) return false;
    else i += 2;

    // look for .
    while ((i < sLength) && (s.charAt(i) != "."))
    { i++
    }

    // there must be at least one character after the .
    if ((i >= sLength - 1) || (s.charAt(i) != ".")) return false;
    else return true;
}

function NIF(strNif)
{
	var arrLetra = new Array('T','R','W','A','G','M','Y','F','P','D','X','B','N','J','Z','S','Q','V','H','L','C','K','E');

	if (strNif.length < 9) return false;
	
	
	var n = strNif.substring(0, 8);
	if (Number(n) == NaN) return false;
		 
	var l = strNif.substring(8, 9);
	var letra = l.charCodeAt(0);
	if (!(letra >= 65 && letra <= 90)) return false;
	var position =Number(n)%23;
	if (arrLetra[position] != l) return false;
	
	return true;
}

function LongMax(strField, nLength)
{
	if (strField.length > nLength) {
		return false;
	} else
		return true;
}

function LongMin(strField, nLength)
{
	if (strField.length < nLength) {
		return false;
	} else 
		return true;
}

function Rango(valor,min,min){
   var numero=parseInt(valor);
   if (!(numero>=min && numero<=min)){
		return(false);
   }
   return(true);
}

function numero(valor){
   var nume=parseInt(valor);
   if ((nume != valor)){
	return(false);
   }
   return(true);
}

function entero(valor){
   nume=parseInt(valor);
   if ((nume != valor)){
	return(false);
   }
   return(true);
}

function numeroreal(valor){
   var nume = parseFloat(valor);
   if ((nume != valor)){
	return(false);
   }
   return(true);
}

function ErasePunto(objCampo){
   var strCadena = objCampo.value;
   objCampo.value = strCadena.replace(/\./g,"");
}

function EraseBlank(objCampo){
   var strCadena = objCampo.value;
   objCampo.value = LTrim(RTrim(strCadena));
}

function ConvToUpper(objCampo){
	objCampo.value = objCampo.value.toUpperCase();
}

function RTrim(strTrim)
{
	var str = new String(strTrim);
	var i = 0;
	var c = "";
	var endpos = 0;
	
	if (EnBlanco(str)){
		return "";
	}
	else{
		for (i = str.length - 1; i >= 0 && endpos == 0; i = i - 1) {
			c = str.charAt(i);
			if (whitespace.indexOf(c) == -1)
				endpos = i;
		}

		return str.substring(0,endpos+1);
	}
}

function LTrim(strTrim)
{
	var str = new String(strTrim);
	var i = 0;
	var c = "";
	var pos = 0;

	if (EnBlanco(str)){
		return "";
	}
	else{
		for (i = 0; i <= str.length - 1; i = i + 1) {
			c = str.charAt(i);
			if (whitespace.indexOf(c) == -1){
				pos = i;
				break;
			}
		}
		return str.substring(pos,str.length);
	}
}

function Trim(strTrim){
	var str = new String(strTrim);
	if(EnBlanco(str))	return "";
	else{
		strTrim = LTrim(strTrim);
		strTrim = RTrim(strTrim);
		return strTrim;
	}
}
function CIF(elCIF) 
{
 var resul = false;
  var temp = elCIF.toUpperCase(); // pasar a mayúsculas

  if (!/^[A-Za-z0-9]{9}$/.test(temp))  // Son 9 dígitos? 

    result = false;

  else if (!/^[ABCDEFGHKLMNPQS]/.test(temp)) // Es una letra de las admitidas ?

    result = false;

  else 

     resul = true;

  return resul;
}