
// whitespace characters
var whitespace = " \t\n\r";
var defaultEmptyOK = false;

function Vacio(s)
{   return ((s == null) || (s.length == 0))
}


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) {
alert("La fecha no está en un formato válido.")
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;
}

/****************************************************************/

// 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 LongMax(objField, nLength, strWarning)
{
	var strField = new String(objField.value);

	if (strField.length > nLength) {
		alert(strWarning);
		return false;
	} else
		return true;
}

function digito(valor){
   numero=parseInt(valor);
   if (!(numero>=0 && numero<=9)){
	alert("Introduzca un número entre 0 y 9");
	return(false);
   }
   return(true);
}
function Rango(valor,min,min){
   numero=parseInt(valor);
   if (!(numero>=min && numero<=min)){
	alert("Introduzca un número entre " + min+ " y " + max);
	return(false);
   }
   return(true);
}
function numero(valor){
   nume=parseInt(valor);
   if ((nume != valor)){
	alert("Introduzca un número");
	return(false);
   }
   return(true);
}

function Requerido(objField, FieldName)
{
	var strField = new String(objField.value);
	if (EnBlanco(strField)) {
		alert("Debe introducir " + FieldName);
		objField.focus();
		objField.select();
		return false;
	}

	return true;
}
//comprueba un fichero o una imagen obligatorio que se introduzca, y su formato
//obligatorio	1 si, 0 no
//opcion		1 alta, 0 modificacion
//num			el número de imagen que es
//nombre		el nombre del elemento
//formato		1 .gif o .jpg o .jpeg, 2 .jpg o .jpeg, 3 .doc,.pdf, .txt, 4 .mov
//formu			el formulario
function Fichero(obligatorio,opcion,num,nombre,formato,formu){
	var fich = eval("formu.ImagenF"+num);
	var msg = "";
	if (obligatorio==1){
		var msg="";
		if (opcion==1){
			if (EnBlanco(fich.value)){
				msg="- Debe introducir " + nombre + "\n";
			}
		}
		else{
			var fich1 = eval("formu.Imagen"+num+"[2]");
			var fich2 = eval("formu.Imagen"+num+"[1]");
			if(fich1.checked){
				msg="- No puede eliminar " + nombre + "\n";
			}
			else{
				if ((fich2.checked) && EnBlanco(fich.value)){
					msg="- Debe introducir " + nombre + "\n";
				}
			}
		}
	}
	else{
		//comprobamos que meta algo si le da a modificar
		if(opcion==0){
			var fich2 = eval("formu.Imagen"+num+"[1]");
			if(fich2!=undefined){
				if ((fich2.checked) && EnBlanco(fich.value)){
					msg="- Debe introducir " + nombre + "\n";
				}
			}	
		}
	}
	//ahora comprobamos el formato
	if(!EnBlanco(fich.value)){
		switch (formato){
			case 1:
				if(fich.value.substr(fich.value.length-4,4)!=".jpg" && fich.value.substr(fich.value.length-4,4)!=".gif" && fich.value.substr(fich.value.length-5,5)!=".jpeg"){
					msg+="- El formato de " + nombre + " debe ser .jpg, .gif o .jpeg\n";
				}
				break;
			case 2:
				if(fich.value.substr(fich.value.length-4,4)!=".jpg" && fich.value.substr(fich.value.length-5,5)!=".jpeg"){
					msg+="- El formato de " + nombre + " debe ser .jpg o .jpeg\n";
				}
				break;
			case 3:
				if(fich.value.substr(fich.value.length-4,4)!=".doc" && fich.value.substr(fich.value.length-4,4)!=".pdf" && fich.value.substr(fich.value.length-4,4)!=".txt"){
					msg+="- El formato de " + nombre + " debe ser .doc, .pdf o .txt \n";
				}
				break;
			case 4:
				if(fich.value.substr(fich.value.length-4,4)!=".mov"){
					msg+="- El formato de " + nombre + " debe ser .mov\n";
				}
				break;				
		}
	}
	return msg;
}
