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));
}