function reset_form(formulario) {

    // El formulario
    var f = formulario;

    // Bucle sobre todos los elementos del formulario
    for ( i = 0; i < f.elements.length; i++){
    
        // El campo del formulario
        var campo = f.elements[i];
    
        // El tipo del campo de formulario
        if (!campo.type) continue;
        var tipo = campo.type.toLowerCase();

        // Campos textuales
        if (tipo == "text" || tipo == "textarea") {
                
            // Sólo si el campo está habilitado lo reseteamos
            if (campo.disabled == false) {
                campo.value = "";
            }
        }
        
        // Checkboxes
        else if(tipo == "checkbox") {
            if (campo.checked == true) {
                campo.checked = false;
            }
        }
        
        // Combos: seleccionamos la primera opción por defecto
        else if(tipo == "select" || tipo == "select-one" ){
            campo.selectedIndex = 0;
        }
        
        // Radio buttons (por ahora no hacemos nada con ellos)
        else if(tipo == "radio"){
            // TODO: Ver qué hacemos con ellos!!!
            
         
            
        }
        
    } // for elements
    
} // reset_form

// Devuelve el valor de un campo de formulario
function get_value(campo) {

    // Campos univalor
    if (campo.value)
        return campo.value;
        
    // Campos multivalor
    if (campo.selectedIndex){
        if (campo.selectedIndex < 0) campo.selectedIndex = 0;
        return campo[campo.selectedIndex].value;
    }
    
    // Campo desconocido    
    return null;
    
} // get_value

// Comprueba si un valor está vacío
function is_empty(campo) {

    // El valor del campo
    value = get_value(campo);
    //alert(value);

    // Si es el valor null
    if (value == null) return true;
    
    // Si es la cadena vacía o sólo tiene espacios
    //if (value == "" || value.length == 0 || trim(value) == "" || trim(value).length == 0)
      //  return true;
    
    if (value == "" || value.length == 0)
      return true;
  
    // Si llega aquí es pq contiene algo
    return false;

} // is_empty

// Dice si un campo es de un tipo determinado (p.e. numeric, required,...)
function is_type(campo, type) {
    var className = campo.className;
    if (!className)
    {
        return false;
    }
    if (className.indexOf(type) >= 0) {
    	return true;
    }
    return false;
} // is_type

// Comprueba si un campo es válido por defecto (para saltar validaciones)
function is_valid(campo){
    var is_valid = is_type(campo, "valid");
    return is_valid;
}

// Determina si un campo es obligatorio
function is_required(campo) {
    var is_required = is_type(campo, "required");
    return is_required;
}

// Determina si un campo de formulario debe tener su valor comprendido en un intervalo
function is_interval(campo) {
    var is_interval = is_type(campo, "interval");
    return is_interval;
}

// Determina si un campo es de tipo numérico
function is_numeric(campo) {
    if (is_integer(campo) || is_float(campo)) {
        return true;
    }
    return false;
}

// Determina si un campo es de tipo integer
function is_integer(campo) {
    var is_integer = is_type(campo, "integer");
    return is_integer;
}

// Determina si un campo es de tipo float
function is_float(campo) {
    var is_float = is_type(campo, "float");
    return is_float;
}

// Determina si un campo puede tener valores negativos
function is_unsigned(campo) {
    var is_unsigned = is_type(campo, "unsigned");
    return is_unsigned;
}

// Determina si un campo es de tipo date
function is_date(campo) {
    var is_date = is_type(campo, "date");
    return is_date;
}
//Determina si un campo es de tipo select
function is_select(campo) {
	var is_select = is_type(campo,"sele")
	return is_select;
}//fin function is_select

//Determina si un campo es de tipo checkbox
function is_optional(campo){
	var is_optional=is_type(campo,"optional")
	return is_optional;
}//fin function is_optional


function is_radio(campo)
{
    var is_radio = is_type(campo,"radio")
	return is_radio;

}


function is_radio_valid(campo)
{
   var ok=false;
   
   i=0;
   
   var miradio=document.getElementsByName(campo.name);
   
   while ((i<miradio.length) && (!ok))
   {
   
      
        if (miradio[i].checked)
        {
           ok=true;
        }
        else
        {
          i++;
        }
   }
   
   
   return ok;
   
   
   
   

}

//Valida si algun checkbox contiene algun valor
function is_optional_valid(campo){
	if (campo.checked)
	{
		return true;
	} else 
		{
		return false;
		}
}//fin de validacion de checkbox


function is_select_valid(campo) {
	
	if(campo.value <=0)
	{
		return false; //combo no seleccionado
	}else {
		return true;  //combo seleccionado
		}
}//fin function is_select_valid

// Valida si un campo de fecha contiene un valor correcto
function date_valid(campo) {
    if (campo.value.indexOf('_') < 0) {
      var RegExPattern = /^((((0?[1-9]|[12]\d|3[01])[\.\-\/](0?[13578]|1[02])[\.\-\/]((1[6-9]|[2-9]\d)?\d{2}))|((0?[1-9]|[12]\d|30)[\.\-\/](0?[13456789]|1[012])[\.\-\/]((1[6-9]|[2-9]\d)?\d{2}))|((0?[1-9]|1\d|2[0-8])[\.\-\/]0?2[\.\-\/]((1[6-9]|[2-9]\d)?\d{2}))|(29[\.\-\/]0?2[\.\-\/]((1[6-9]|[2-9]\d)?(0[48]|[2468][048]|[13579][26])|((16|[2468][048]|[3579][26])00)|00)))|(((0[1-9]|[12]\d|3[01])(0[13578]|1[02])((1[6-9]|[2-9]\d)?\d{2}))|((0[1-9]|[12]\d|30)(0[13456789]|1[012])((1[6-9]|[2-9]\d)?\d{2}))|((0[1-9]|1\d|2[0-8])02((1[6-9]|[2-9]\d)?\d{2}))|(2902((1[6-9]|[2-9]\d)?(0[48]|[2468][048]|[13579][26])|((16|[2468][048]|[3579][26])00)|00))))$/;
      if ((campo.value.match(RegExPattern)) && (campo.value!='')) {
          //alert('Fecha correcta');
          return true; 
      }
      campo.value="__/__/____";
      return false;
    }
} // date_valid


// Comprueba si un campo contiene un entero en su interior
function has_integer(campo) {

    // Contiene sólo valores válidos de enteros
    var valid_chars = "0123456789-";
    if (is_unsigned(campo))
        valid_chars = "0123456789"
        
    // Valor del campo
    var value = get_value(campo);

    // Comprobamos cada uno de los dígitos
    for (i = 0; i < value.length; i++) { 
        var c = value.charAt(i); 
        if (valid_chars.indexOf(c) < 0) {
            return false;
        }
    }
    
    // Si puede contener negativos
    if (!is_unsigned(campo) && value.indexOf("-") > 0){
        return false;
    }
    
    // Es correcto
    return true

}

// Comprueba si un campo contiene un float en su interior
function has_float(campo) {

    // Contiene sólo valores válidos de enteros
    var valid_chars = "0123456789-.";
    if (is_unsigned(campo))
        valid_chars = "0123456789."
        
    // Valor del campo
    var value = get_value(campo);

    // Comprobamos cada uno de los dígitos
    var dots = 0;
    for (i = 0; i < value.length; i++) { 
        var c = value.charAt(i); 
        if (valid_chars.indexOf(c) < 0) {
            return false;
        }
        if (c == ".")
            dots++;
    }
    
    // Si puede contener negativos
    if (!is_unsigned(campo) && value.indexOf("-") > 0){
        return false;
    }
    
    // Sólo debe contener un punto decimal
    if (dots > 1) {
        return false;
    }
    
    // Es correcto
    return true

}

// Función para comprobar los valores del formulario
function validate_form_basic(formulario){
	
    // El formulario
    var f = formulario;
    
    
    
    // Bucle sobre todos los elementos del formulario
    var i = 0;
    //Bucle sobre los checkbox del formulario
    var j=0;
    var flag='false';
    	for (j=0;j<f.elements.length;j++){
    		if (is_optional(f.elements[j]))
    		{
    			if (is_optional_valid(f.elements[j]))
    			{
    				flag='true';
    			}
    		}
    	}
    for ( i = 0; i < f.elements.length; i++){
    
        // El campo del formulario
        var campo = f.elements[i];
        
        // Saltamos los campos inválidos (p.e. los fieldsets)
        if (!campo || !campo.name) continue;
        
        // Saltamos los campos desabilitados
        if (campo.disabled && campo.disabled == true) continue;
        
        // Saltamos los campos ocultos
        if (campo.type.toLowerCase() == "hidden") continue;
        
        // Saltamos los campos que no deben validarse
        if (is_valid(campo)) continue;
        
        //alert("Comprobamos el campo: " + i + ":" + campo.name);
        
        //Validacion de checkbox
        if (is_optional(campo) ){
        	
        	if (!is_optional_valid(campo) && (flag=='false'))
        		{
        		var mensaje= "Debe activar algun campo '"+campo.title + "'";
        		generarMsje("error",0,mensaje,"msj_ep");
        		campo.focus();
        		return false;
        		}	
        }
        
        // Validación de campos requeridos
        if (is_required(campo) && is_empty(campo)) {
            var mensaje = "Debe introducir el campo '" + campo.title + "'";
            generarMsje("error",0,mensaje,"msj_ep");
            campo.focus();
            return false;
        } // required
        
        // Validación para campos integer
        if (!is_empty(campo) && is_integer(campo) && !has_integer(campo)) {
            var mensaje = "El campo '" + campo.title + "' sólo debe contener números";
            generarMsje("error",0,mensaje,"msj_ep");
            if (campo.value) campo.value = "";
            campo.focus();
            return false;
        } // integer
        
        // Validación de campos float
        if (!is_empty(campo) && is_float(campo) && !has_float(campo)) {
            var mensaje = "El campo '" + campo.title + "' sólo debe contener números decimales";
            generarMsje("error",0,mensaje,"msj_ep");
            if (campo.value) campo.value = "";
            campo.focus();
            return false;
        } // float
        
        // Validación de campos date rellenos
        if (is_date(campo) && !is_empty(campo)) {
            //var mask = campo.getAttribute("mask");
            if (!date_valid(campo)) {
                var mensaje = "La fecha del campo '" + campo.title + "' no es válida";
                generarMsje("error",0,mensaje,"msj_ep");
                //if (campo.value) campo.value = "__/__/____";
                campo.focus();
                return false;
            }
        } // date
        
        //Validación de campo select obligatorio(class=sele)
        //Importante el value de la opcion por defecto del combo debe ser 0 o < de 0
        //Solo válido para numéricos
        if (is_select(campo))
        {
        	if(!is_select_valid(campo))
        	{
        	 var mensaje = "Debe seleccionar un elemento del campo "+campo.title;
             generarMsje("error",0,mensaje,"msj_ep");
             campo.focus();
             return false;
        	}
        }
        
        // Validamos intervalos de campos numéricos
        if (is_numeric(campo) && is_interval(campo)) {

            // Límites del intervalo            
            var min_value_attr = campo.getAttribute("min_value");
            var max_value_attr = campo.getAttribute("max_value");
            var value = get_value(campo);
            
            // Si están definidos las tres variables
            if (min_value_attr != null && max_value_attr != null && value != null) {
            
                // Valores máximo y mínimo del intervalo
                var min_value = parseInt(min_value_attr);
                var max_value = parseInt(max_value_attr);
                
                // Valor fuera del rango            
                if ( value < min_value || value > max_value ) {
                    var mensaje = "El campo '" + campo.title + 
                        "' debe estar comprendido entre " + 
                        min_value + " y " + max_value + 
                        " (valor capturado:" + value +")";
                    generarMsje("error",0,mensaje,"msj_ep");
                    if (campo.value) campo.value = "";
                    campo.focus();
                    return false
                }
            }
            
        } //interval
        
        
          if (is_radio(campo))
        {
        	if(!is_radio_valid(campo))
        	{
        	 var mensaje = "Debe seleccionar un elemento del campo "+campo.title;
             generarMsje("error",0,mensaje,"msj_ep");
             campo.focus();
             return false;
        	}
        }
        
    } // for elements

    // Todos los campos son correctos
    return true;
    
} //validate_form_basic

// Gestor de captura de teclas
function processKey(e){

    var ENTER_KEY = 13;
    var ESCAPE_KEY = 27;
    
    var keypressed = 0;
    if (e){
        keypressed = e.keyCode; // Mozilla
    } else {
        keypressed = window.event.keyCode; //IE
    }
    
    // Tecla <Enter>
    if (keypressed == ENTER_KEY){
        teclaEnter();        
        return;
    } // endif <enter>
    
    // Tecla <Escape>
    if (keypressed == ESCAPE_KEY){
        teclaEscape();
        return;
    } // endif <escape>
    
    return;
} //processKey