
//Funciones para intercambiar imágenes al picar sobre ellas
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_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_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 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();
}
//fin de las funciones de recarga

//Abrir ventana nueva
function MM_openBrWindow(theURL,winName,features) { 
  window.open(theURL,winName,features);
}
MM_reloadPage(true);

//Ir a una URL
function goToURL(form){
    var myindex=form.listado.selectedIndex	
    if(!myindex==""){ window.location.href=form.listado.options[myindex].value; }
}
//Enlaces a los programas de las asignaturas
function ir_ficha(enlace){  
	//alert(enlace);  	
    if(enlace=="0"){ 
		 alert("La información de esta asignatura no está disponible aún"); 
		 window.location.href="atc.php?menu=asignaturas";
	} else {
		if(enlace==""){
			window.location.href="atc.php?menu=asignaturas";
		}else{
			window.location.href=enlace;
		}
	}
}
//Se usa en plantilla_tarjetas0.html
function validar(form){
	var mensaje='';
	var seleccionado = "no";
	for(i=0; i < form.tipo.length; i++){
		if(form.tipo[i].checked){
			seleccionado="si";
		}
	}
	if(seleccionado == "no") { mensaje=mensaje + "No ha seleccionado un tipo de tarjeta\n"; }
	if(mensaje != ''){ alert(mensaje);	}
	document.MM_returnValue = (mensaje == '');
}

//Funciones de la sección de publicaciones
//*********************************************
	function mostrar_ocultar(nombre){
			
		if ( document.getElementById(nombre).style.display=='none' ){
			document.getElementById(nombre).style.display='block';
			}
		else {
			var cual = form_entrada.elements[nombre];
			var name = form_entrada.elements[nombre].name;
			
			document.getElementById(nombre).style.display='none';
			switch(cual.type){			
				case "text": cual.value='';break;		
				case "select-one": cual.selectedIndex=0;  break;
				//case "radio": cual.checked=false;cual.checked=true;break;
				case "checkbox": 	for(i=0; i<form_entrada.tipo_publicacion_box.length;i++)
										form_entrada.tipo_publicacion_box[i].checked=false;	
									form_entrada.tipo_publicacion_box[0].checked=true;
									break;
				}
		}
	
	}	
	function ocultarCampos(){
		
		form_entrada.reset();
		for (i=0; i<7;i++)
			if (document.getElementById(i))
				document.getElementById(i).style.display='none';		
	}
	function abreAyuda(){	
			window.open("ayuda_pop.html","","toolbar=no,width=600,height=350");	
	}
	function filtraTipo(){
		
		var cadena='';
		var primera=0;
		
		if (form_entrada.tipo_publicacion_box[0].checked==true){
			cadena = 'todas';	
		}
		else
			for (i=1;i<form_entrada.tipo_publicacion_box.length;i++){
				if (form_entrada.tipo_publicacion_box[i].checked==true)
					if ( primera == 0 ) {
						cadena = form_entrada.tipo_publicacion_box[i].value;
						primera = 1;
					}
					else
						cadena = cadena + '-' +form_entrada.tipo_publicacion_box[i].value;
			}
			
		if (cadena=='')
			cadena='todas';	
		form_entrada.tipo_publicacion.value=cadena;
		

	}
	function validar() {
		
		
		if (document.getElementById("1").style.display=='block' && form_entrada.autores.value =='' && form_entrada.profesor_desplegable.value=='-1') {
			alert("Introduzca AUTOR o escoja otro criterio de búsqueda");
			form_entrada.autores.focus();
			return (false);
		}
		
		var autor= form_entrada.autores.value.replace('?','ñ');
		
		var checkOK = "ABCDEFGHIJKLMNÑOPQRSTUVWXYZÁÉÍÓÚ" + "abcdefghijklmnñopqrstuvwxyzáéíóú " + '+-"*';
		var checkStr = autor;
		var allValid = true;
		for (i = 0; i < checkStr.length; i++) {
			ch = checkStr.charAt(i);
			for (j = 0; j < checkOK.length; j++)
			if (ch == checkOK.charAt(j))
				break;
			if (j == checkOK.length) {
				allValid = false;
				break;
			}
		}
		if (!allValid) {
			alert("Escriba sólo letras u operadores de búsqueda en el campo AUTORES");
			form_entrada.autores.focus();
			return (false);
		}
			
		else
			form_entrada.autores.value=autor;	
		
			
		if (document.getElementById("2").style.display=='block' && form_entrada.titulo.value =='') {
			alert("Introduzca TÍTULO o escoja otro criterio de búsqueda");
			form_entrada.titulo.focus();
			return (false);
		}
	
		
		var titulo = form_entrada.titulo.value.replace('?','ñ');
		
		var checkOK = "ABCDEFGHIJKLMNÑOPQRSTUVWXYZÁÉÍÓÚ" + "abcdefghijklmnñopqrstuvwxyzáéíóú " + "0123456789" + '+-"*';
		var checkStr = titulo;
		var allValid = true;
		for (i = 0; i < checkStr.length; i++) {
			ch = checkStr.charAt(i);
			for (j = 0; j < checkOK.length; j++)
			if (ch == checkOK.charAt(j))
				break;
			if (j == checkOK.length) {
				allValid = false;
				break;
			}
		}
		if (!allValid) {
			alert("Escriba sólo letras u operadores de búsqueda en el campo TITULO");
			form_entrada.titulo.focus();
			return (false);
		}
		else
			form_entrada.titulo.value=titulo;
		
		if (document.getElementById("3").style.display=='block' && form_entrada.referencia.value =='') {
			alert("Introduzca REFERENCIA o escoja otro criterio de búsqueda");
			form_entrada.referencia.focus();
			return (false);
		}
		
		var referencia= form_entrada.referencia.value.replace('?','ñ');
		var checkOK = "ABCDEFGHIJKLMNÑOPQRSTUVWXYZÁÉÍÓÚ" + "abcdefghijklmnñopqrstuvwxyzáéíóú " + "0123456789" + '+-"*';
		var checkStr = referencia;
		var allValid = true;
		for (i = 0; i < checkStr.length; i++) {
			ch = checkStr.charAt(i);
			for (j = 0; j < checkOK.length; j++)
			if (ch == checkOK.charAt(j))
				break;
			if (j == checkOK.length) {
				allValid = false;
				break;
			}
		}
		if (!allValid) {
			alert("Escriba sólo letras u operadores de búsqueda en el campo REFERENCIA");
			form_entrada.referencia.focus();
			return (false);
		}
		else
			form_entrada.referencia.value=referencia;
			
		return (true);
	}
<!-- Para abrir tabla resumen con open-->
	
	function imprimeTabla(){	
			var codigo_tabla;
			var resumen_consulta;
			var cabecera;
			var filas;
			var prim_col;
			
			codigo_tabla = form.codigo.value;
			resumen_consulta = form.resumen_consulta.value;
			cabecera = form.cabecera.value;
			filas = form.filas.value;
			prim_col = form.prim_col.value;
			
			n_cols = form.n_cols.value;
			ancho_tabla = 380 + 30*n_cols;
			ancho_ventana = ancho_tabla + 50;
			argumentos = "ancho="+ancho_tabla;
			ventanatabla = window.open("imprime_tabla_open.php?"+argumentos ,"","toolbar=no,width="+ancho_ventana+",height=400");	
	
	}
//*********************************************
