function popUp(URL)
 {
	day = new Date();
	id = day.getTime();
	eval("page" + id + " = window.open(URL, '" + id + "', 'resizable=1,toolbar=0,scrollbars=1,location=0,statusbar=0,menubar=1,width=700,height=550,left = 100,top = 50');");
}
///////////////////////////////////////////////////////////////////////////////////////////
function Submit()
 {
   document.forms.busqueda.action='index.asp';
   document.forms.busqueda.submit();
 }
///////////////////////////////////////////////////////////////////////////////////////////
function Comprobar()
 { 
   var Compositor=''; var CompositorSelect=''; var Obra=''; var Obraselect ='';
   var Ciclo=''; var CicloSelect=''; var Instrumento=''; var InstrumentoSelect=''; 
   //Si no ha seleccionado ningún elemento
   if(document.forms.busqueda.Compositor.value=='' && document.forms.busqueda.Obra.value=='' && document.forms.busqueda.Ciclo.value=='' && document.forms.busqueda.Instrumento.value=='')
     {
		document.forms.busqueda.Compositor.value = " "
		document.forms.busqueda.submit();
       //alert('Debe escribir un texto a buscar o seleccionar al menos un elemento de la lista .');
     } 
   else
     {
       Compositor = Trim(document.forms.busqueda.Compositor.value);
       Obra = Trim(document.forms.busqueda.Obra.value);
       Ciclo = Trim(document.forms.busqueda.Ciclo.value);
       Instrumento = Trim(document.forms.busqueda.Instrumento.value);
       if(document.forms.busqueda.Compositorselect.value!=''){CompositorSelect = Trim(document.forms.busqueda.Compositorselect.options[document.forms.busqueda.Compositorselect.selectedIndex].text);}
       if(document.forms.busqueda.Obraselect.value!=''){Obraselect = Trim(document.forms.busqueda.Obraselect.options[document.forms.busqueda.Obraselect.selectedIndex].text);}
       if(document.forms.busqueda.Cicloselect.value!=''){CicloSelect = Trim(document.forms.busqueda.Cicloselect.options[document.forms.busqueda.Cicloselect.selectedIndex].text);}
       if(document.forms.busqueda.Instrumentoselect.value!=''){InstrumentoSelect = Trim(document.forms.busqueda.Instrumentoselect.options[document.forms.busqueda.Instrumentoselect.selectedIndex].text);}
       
       //Si el valor de la caja de texto es diferente del de la lista
       if(Compositor!=CompositorSelect ||Obra!=Obraselect ||Ciclo!=CicloSelect ||Instrumento!=InstrumentoSelect)
         {
          if(Compositor!=CompositorSelect){document.forms.busqueda.textoCompositor.value="True";}
          if(Obra!=Obraselect){document.forms.busqueda.textoObra.value="True";}
          if(Ciclo!=CicloSelect){document.forms.busqueda.textoCiclo.value="True";}
          if(Instrumento!=InstrumentoSelect){document.forms.busqueda.textoInstrumento.value="True";}
          document.forms.busqueda.action='listadoCiclos.asp';
         }
       else
         {
          if(Compositor!='' || document.forms.busqueda.Obra.value!='')
		   {
		    document.forms.busqueda.action='listado.asp';
		   }
          else if(document.forms.busqueda.Ciclo.value!='' || document.forms.busqueda.Instrumento.value!='')
           {
            document.forms.busqueda.action='listadoCiclos.asp';
           }
         }
        document.forms.busqueda.submit();
     } 
  }
///////////////////////////////////////////////////////////////////////////////////////////

var digitos=100 //cantidad de digitos buscados
var puntero=0					
var buffer=new Array(digitos)  //declaración del array Buffer 
var cadenaCompositor=""
var cadenaObra=""
var cadenaCiclo=""
var cadenaInstrumento=""
var punteroCompositor=0
var punteroObra=0
var punteroCiclo=0
var punteroInstrumento=0
var cadena=""			

///////////////////////////////////////////////////////////////////////////////////////////

function buscar_op(obj,objfoco){

  var letra = String.fromCharCode(event.keyCode)
  if(puntero >= digitos){
		cadena="";
		puntero=0;
	}
//si se presiona la tecla ENTER, borro el array de teclas presionadas y salto a otro objeto...
if (event.keyCode == 13){
		borrar_buffer();

		if(objfoco!=0) objfoco.focus(); //evita foco a otro objeto si objfoco=0
	}
//sino busco la cadena tipeada dentro del combo...
else{
  cadena=eval('cadena' + objfoco.name ) ; puntero=eval('puntero' + objfoco.name) ;
  if(event.keyCode==8)  //Si borra
  { 
    if(objfoco.value==''){
    eval('cadena' + objfoco.name + '=""') ;
    eval('puntero' + objfoco.name + '=0') ;
    return;}
    cadena = cadena.substring(0,cadena.length-1);
	if(cadena.length==0){
            eval('cadena' + objfoco.name + '=""') ;
            eval('puntero' + objfoco.name + '=0') ;
		    obj.selectedIndex='';
		    return;
		    }
	puntero--;	
	for (var opcombo=0;opcombo < obj.length;opcombo++){
		if(obj[opcombo].text.substr(0,puntero).toLowerCase()==cadena.toLowerCase()){
		    obj.selectedIndex=opcombo;
			break;
			}
		}
  eval('cadena' + objfoco.name + '=cadena') ; eval('puntero' + objfoco.name + '=puntero') ;
  }
  else
  {
	buffer[puntero]=letra;					//guardo en la posicion puntero la letra tipeada
 //   objfoco.value = cadena;
	cadena=cadena+buffer[puntero];			//armo una cadena con los datos que van ingresando al array
	//if(cadena!=objfoco.value){}
	puntero++;	
	}							
 //barro todas las opciones que contiene el combo y las comparo la cadena...
	for (var opcombo=0;opcombo < obj.length;opcombo++){   
		if(obj[opcombo].text.substr(0,puntero).toLowerCase()==cadena.toLowerCase()){
			if((opcombo+16)>obj.length)
			{obj.selectedIndex=obj.length-opcombo}
			else
			{
			obj.selectedIndex=opcombo+16;
			}
			obj.selectedIndex=opcombo;
			break;
			}
		}
	}
  eval('cadena' + objfoco.name + '=cadena') ; eval('puntero' + objfoco.name + '=puntero') ;

//event.returnValue = false; //invalida la acción de pulsado de tecla para evitar busqueda del primer caracter
}

///////////////////////////////////////////////////////////////////////////////////////////

function borrar_buffer(){
//inicializa la cadena buscada
    //objfoco.value = obj.value;
   	cadena="";
	puntero=0;
}

///////////////////////////////////////////////////////////////////////////////////////////

function MostrarSelect(objMostrar)
{  
  if(objMostrar!='Compositorselect')
   {//document.forms.busqueda.Compositorselect.selectedIndex='';
    document.forms.busqueda.Compositorselect.style.display = 'none';
    //document.forms.busqueda.Compositor.value='';
    }
  if(objMostrar!='Obraselect')
   {//document.forms.busqueda.Obraselect.selectedIndex='';
    document.forms.busqueda.Obraselect.style.display = 'none';
    //document.forms.busqueda.Obra.value='';
    }
  if(objMostrar!='Cicloselect')
   {//document.forms.busqueda.Cicloselect.selectedIndex='';
    document.forms.busqueda.Cicloselect.style.display = 'none';
    //document.forms.busqueda.Ciclo.value='';
    }
  if(objMostrar!='Instrumentoselect')
   {//document.forms.busqueda.Instrumentoselect.selectedIndex='';
    document.forms.busqueda.Instrumentoselect.style.display = 'none';
    //document.forms.busqueda.Instrumento.value='';
    }
   eval('document.forms.busqueda.'+ objMostrar +'select.style.display = ""');
}

///////////////////////////////////////////////////////////////////////////////////////////

function seleccionar(objselect, objtext)
  {
   eval('document.forms.busqueda.' + objtext + '.value = document.forms.busqueda.'+ objselect + '.options[document.forms.busqueda.' + objselect + '.selectedIndex].text') ;
  }

///////////////////////////////////////////////////////////////////////////////////////////

function LTrim(s){
	// Devuelve una cadena sin los espacios del principio
	var i=0;
	var j=0;
	
	// Busca el primer caracter <> de un espacio
	for(i=0; i<=s.length-1; i++)
		if(s.substring(i,i+1) != ' '){
			j=i;
			break;
		}
	return s.substring(j, s.length);
}

///////////////////////////////////////////////////////////////////////////////////////////

function RTrim(s){
	// Quita los espacios en blanco del final de la cadena
	var j=0;
	
	// Busca el último caracter <> de un espacio
	for(var i=s.length-1; i>-1; i--)
		if(s.substring(i,i+1) != ' '){
			j=i;
			break;
		}
	return s.substring(0, j+1);
}

///////////////////////////////////////////////////////////////////////////////////////////

function Trim(s){
	// Quita los espacios del principio y del final
	return LTrim(RTrim(s));
}



function espacio(campo){
	var i;
	var caracter;
	var resultado;
	resultado = "";
				for ( i=0 ; i < campo.length ; i++)
				{
					caracter = campo.substr(i,1);
					if (caracter == " ")
					{	
					caracter = "%20";
					}
				resultado = resultado + caracter;
				}

	return(resultado);
}

function Caracter(campo){
	var i;
	var caracter;
	var resultado;
	resultado = "";
				for ( i=0 ; i < campo.length ; i++)
				{
					caracter = campo.substr(i,1);
					if (caracter == "'")
					{	
					caracter = ",";
					}
				resultado = resultado + caracter;
				}

	return(resultado);
}

function abrirVentana(fichero, w, h, scr, Resize, TopPosition, LeftPosition, nombreVentana)
{	

	eval(nombreVentana + "=window.open(fichero, nombreVentana,'toolbar=no,location=no,directories=no,status=no,menubar=no, scrollbars=' + scr + ',resizable=' + Resize +',width=' + w + ',height=' + h + ',top=' + TopPosition + ',left=' + LeftPosition);");
	eval(nombreVentana + ".focus();");
	return false;
}
function abrirVentana2(fichero, w, h, scr, Resize, TopPosition, LeftPosition, nombreVentana)
{	//Además t permit indicar la posición

	eval(nombreVentana + "=window.open(fichero, nombreVentana,'toolbar=no,location=no,directories=no,status=no,menubar=no, scrollbars=' + scr + ',resizable=' + Resize +',width=' + w + ',height=' + h + ',top=' + TopPosition + ',left=' + LeftPosition);");
	eval(nombreVentana + ".focus();");
	return false;
}

function esunafecha(campo){
	var i;
	var s;
	s = 1;
	d=new String("");
	m=new String("");
	z=new String("");
				for ( i=0 ; i < campo.length ; i++)
				{
					caracter = campo.substr(i,1);
					if (caracter == "/" || caracter == "-")
					{
					s = s+1;			
					}														
					else
					{
						if (s==1)
						{
						d=d+caracter;
						}
						if (s==2)
						{
						m=m+caracter;
						}
						if (s>2)
						{
						z=z+caracter;
						s=4;
						}
					}
				}
				if(s==4)
				{
				if (Number(d)>31 || Number(d)<1)
				{
					return(false);
				}
				else
				{
					if (Number(m)>12 || Number(m)<1)
					{
						return(false);
					}
					else
					{	
						if (Number(z)<1900 || Number(z)>2999)
						{
							return(false);
						}
						else
						{
							switch (Number(m)) {
								case 1:
									if (Number(d)>31)  {return(false);}
									break;
								case 2:
									if (Number(z) % 4 == 0)
									 {
									 	if (Number(d)>29) return(false);
									 }
									 else
									 {
									 	if (Number(d)>28) return(false);
									 }
									 break;
								case 3:
									if (Number(d)>31) {return(false);}
									break;
								case 4:
									if (Number(d)>30) {return(false);}
									break;
								case 5:
									if (Number(d)>31) {return(false);}
									break;
								case 6:
									if (Number(d)>30) {return(false);}
									break;
								case 7:
									if (Number(d)>31) {return(false);}
									break;
								case 8:
									if (Number(d)>31) {return(false);}
									break;
								case 9:
									if (Number(d)>30) {return(false);}
									break;
								case 10:
									if (Number(d)>31) {return(false);}
									break;
								case 11:
									if (Number(d)>30) {return(false);}
									break;
								case 12:
									if (Number(d)>31) {return(false);}
									break;
								default:
									break;}
							return(true);
						}
					}
				}
				}
				else
				{
				return(false);
				}
	}

function esnumero(campo){
var caracter;
var i;
var n;
if (campo.length > 10)
	{
		return(false);
	}
else
	{
		for ( i=0 ; i < campo.length ; i++)
		{
			caracter = campo.substr(i,1);
			if (caracter != "0" && caracter != "1" && caracter != "2" && caracter != "3" && caracter != "4" && caracter != "5" && caracter != "6" && caracter != "7" && caracter != "8" && caracter != "9")
			{	
				return(false);
			}
		}
		return(true);
	}
}

function esmoneda(campo){
var caracter;
var i;
for ( i=0 ; i < campo.length ; i++)
	{
		caracter = campo.substr(i,1);
		if (caracter != "." && caracter != "0" && caracter != "1" && caracter != "2" && caracter != "3" && caracter != "4" && caracter != "5" && caracter != "6" && caracter != "7" && caracter != "8" && caracter != "9")
		{	
			return(false);
		}
	}
return(true);
}

function estelefono(campo){
var caracter;
var i;
	for ( i=0 ; i < campo.length ; i++)
	{
		caracter = campo.substr(i,1);
		if (caracter != "0" && caracter != "1" && caracter != "2" && caracter != "3" && caracter != "4" && caracter != "5" && caracter != "6" && caracter != "7" && caracter != "8" && caracter != "9" && caracter != "+" && caracter != "(" && caracter != ")" && caracter != "(" && caracter != " " && caracter != "e" && caracter != "E" && caracter != "x" && caracter != "X" && caracter != "t" && caracter != "T" && caracter != "." )
		{	
			return(false);
		}
	}
	return(true);
}

function esletra(campo){
	if (campo>="a"&&campo<="z"){return(true);}
	if (campo>="A"&&campo<="Z"){return(true);}	
	return(false)
}
	
function esmail(campo){
var arrob;
var i;
var aux;
aux=0;
for (i=1 ; i<=campo.length ; i++)
{
	arrob = campo.substr(i,1);
	if (aux==0&&((arrob>="a"&&arrob<="z")||(arrob>="A"&&arrob<="Z")))
		{aux=1;}
	if (aux==1&&(arrob=="@"))
		{aux=2;}
	if (aux==2&&((arrob>="a"&&arrob<="z")||(arrob>="A"&&arrob<="Z")))
		{aux=3;}		
	if (aux==3&&(arrob=="."))
		{aux=4;}	
	if (aux==4&&((arrob>="a"&&arrob<="z")||(arrob>="A"&&arrob<="Z")))
		{return(true);}
}			
return(false);
}

function escuenta(banco,oficina,cuenta)
{
var valor = new Array(10);
var d1,d2;
var suma;
var i,l;
var banSuc;

valor[1]=6;
valor[2]=3;
valor[3]=7;
valor[4]=9;
valor[5]=10;
valor[6]=5;
valor[7]=8;
valor[8]=4;
valor[9]=2;
valor[10]=1;

banSuc = String(banco) + String(oficina);
l=8;
suma=0;
for (i=1; i<=8; i++)
{
	suma = suma + parseInt(banSuc.substr(i-1,1)) * valor[l];
	l = l -1;
}
d1=11-(suma-(11*parseInt(suma/11)));
if (d1==10)
	{d1=1;} else
	{	if (d1==11)
		{d1=0;}
	}
suma=0;
l=10;
for (i=1;i<=10;i++)
{
		suma = suma + parseInt(cuenta.substr(i-1,1)) *valor[l];
		l=l-1;parseInt
}
d2 = 11-(suma-(11*(suma/11)))
if (d2==10) 
	{d2=1;} else
	{	if (d2==11)
		{d2=0;}
	}
return(String(d1)+String(d2));
}

function esnif(campo){
var resto;
var i;
var DNI;
var LETRA;
var NIF;

DNI=parseInt(campo);

LETRA=campo.substr(campo.length-1,1);


resto = DNI % 23;
switch(resto){
	case 0:
			NIF="T";
			break
	case 1:
			NIF="R";
			break
	case 2:
			NIF="W";
			break
	case 3:
			NIF="A";
			break
	case 4:
			NIF="G";
			break
	case 5:
			NIF="M";
			break
	case 6:
			NIF="Y";
			break
	case 7:
			NIF="F";
			break
	case 8:
			NIF="P";
			break
	case 9:
			NIF="D";
			break
	case 10:
			NIF="X";
			break
	case 11:
			NIF="B"; 
			break
	case 12:
			NIF="N";
			break
	case 13:
			NIF="J";
			break
	case 14:
			NIF="Z";
			break
	case 15:
			NIF="S";
			break
	case 16:
			NIF="Q";
			break
	case 17:
			NIF="V";
			break

	case 18:
			NIF="H";
			break
	case 19:
			NIF="L";
			break
	case 20:
			NIF="C";
			break
	case 21:
			NIF="K";
			break
	case 22:
			NIF="E";
			break

	default:
		break}

if (LETRA==NIF) {
	return(true);	}
else
	{return(false);}

}