 

<!--
var isNS4 = (document.layers) ? true : false;
var isIE = (document.all && !document.getElementById) ? true : false;
var isIE5 = (document.all && document.getElementById) ? true : false;
var isNS6 = (!document.all && document.getElementById) ? true : false;

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();
}

MM_reloadPage(true);
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) { //v3.0
  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); 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_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_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}

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();
}
MM_reloadPage(true);

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_showHideLayers() { //v6.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}

function abreVentana(url){ 
window.open(url,"_blank","scrollbars=yes,height=500,width=450,top=0,left=0"); 
} 

  
//SALTO ENTRE CAMPOS PULSANDO ENTER
//Ivan Nieto Perez
//nombre del primer campo en la secuencia
siguienteCampo = "Name"
//nombre del formlario
nombreForm = "theForm"
//deteccion del navegador
netscape = document.layers

//funcion que gestiona el evento
function TelcaPulsada( eventoPulsaTecla ) {
   tecla = (netscape) ? eventoPulsaTecla.which : window.event.keyCode
   if (tecla == 13) { 					//se pulso enter
 /*     if ( siguienteCampo == 'fin' ) {			//fin de la secuencia, hace el submit
         // alert('Envio del formulario.')			//eliminar este alert para uso normal
         return false					//sustituir por return true para hacer el submit
      } else { 						//da el foco al siguiente campo
         eval('document.' + nombreForm + '.' + siguienteCampo + '.focus()')
         return false
      }
*/
	return false;
   }
}

document.onkeydown = TelcaPulsada			//asigna el evento pulsacion tecla a la funcion

if (netscape)						//netscape es especial: requiere activar la captura del evento
	document.captureEvents(Event.KEYDOWN)
	
//	Luciano Callero GUI - Developer



function Campo(Nombre, Ancho, Maximo, Password, Clase) {
	Password != true ? Tipo="text" : Tipo="password"
	if ( window.external ) {
		Ancho = Ancho * 1.23
		document.write("<input type=" + Tipo + " size=" + Ancho + " name=" + Nombre + " maxlength=" + Maximo + " class=" + Clase + ">")
	}
	else {
	    Ancho = Ancho 
		document.write("<input type=" + Tipo + " size=" + Ancho + " name=" + Nombre + " maxlength=" + Maximo + " class=" + Clase + ">")
	}
}


var vent= null;

function nuevaVentana(miPagina,nombre,ancho,alto,scroll){
	var ventl = (screen.width-ancho)/2;
	var ventT = (screen.height-alto)/2;
	var datos  ='height='+alto+',';
		datos +='width='+ancho+',';
		datos +='top='+ventT+',';
		datos +='left='+ventl+',';
		datos +='scrollbars='+scroll+',';
		datos +='resizable=yes';
	vent=window.open(miPagina,nombre,datos);
	if(parseInt(navigator.appVersion) >= 4){vent.window.focus();}
}

function abrirVentanaFoto(url,nombre,ancho,alto,scroll,top,left){
	var datos  ='height='+alto+',';
		datos +='width='+ancho+',';
		datos +='top='+top+',';
		datos +='left='+left+',';
		datos +='scrollbars='+scroll+',';
		datos +='resizable=no';
	vent=window.open(url,nombre,datos);
	if(parseInt(navigator.appVersion) >= 4){vent.window.focus();}
}


function news(miPagina){
  nuevaVentana(miPagina,"news",450,500,"yes");
}


function imprimir()
{
	if (navigator.appName.substring(0,8) == 'Netscape')
	{
		if (parseInt(navigator.appVersion.substring(0,1)) > 3)
			self.print();
	} else {
		// IE 5.0 or later
		if (document.all && document.getElementById)
			self.print();
		else
		{
			// IE 4.0 versions
			if (document.all)
			{
					// Si se utiliza OLECMDEXECOPT_DONTPROMPTUSER y al dialogo de la impresora se
					// le da cancelar se va en error y ya no saca el dialogo....
					if (confirm('Se va a proceder a la impresión de la página.\n\nPulsa Aceptar para continuar.'))
					{
					 	var OLECMDID_PRINT = 6;
				        var OLECMDEXECOPT_DONTPROMPTUSER = 2;
				        var OLECMDEXECOPT_PROMPTUSER = 1;
				        var WebBrowser = "<OBJECT ID=\"WebBrowser1\" WIDTH=0 HEIGHT=0 CLASSID=\"CLSID:8856F961-340A-11D0-A96B-00C04FD705A2\"></OBJECT>";
				        document.body.insertAdjacentHTML("beforeEnd", WebBrowser);
						WebBrowser1.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER);
				        WebBrowser1.outerHTML = "";
					}
			}
			else
			{
				/*
				alert("This function is only available for Netscape or Explorer version 4 or superior. You could print selecting the Print function of the File menu of your browser.");
				*/
			}
		}
	}
}