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 ValidarFormularioBusquedas() {
   if(window.frames.length != 0) { 
      f = cbuscar.document.forms[0];
   } else {
      f = document.forms[0];
   }
   if(vacio(f.term_claves_1.value)) {
     alert('Es necesario especificar lo que se desea buscar');
     return false;
   } else {
     return true;
   }
}

function seleccionar (check,edi) {
    if (edi == "indice_correo") {
       var f = window.buscado.document.indice_correo;
    }
    if (edi == "indice_pedidos") {
       var f = window.buscado.document.indice_pedidos;
    }
    if (edi == "indice_bibliotecas") {
       var f = window.buscado.document.indice_bibliotecas;
    }
//    var f = document.edi;
    var msg;
    for (var i = 0; i < f.length; i++) {
        var e = f.elements[i];
        if (e.name == "documento_sel") {
             e.checked = check.checked;
//           e.checked = e.checked ? false : true;
        }
    }
}

function Atras() {
//
// Funcion para sacar
//
   if(window.frames.length != 0) { 
      f = cbuscado.document.forms[1];
   } else { 
      f= document.forms[2]; 
   } 
//   f.Accion.value = "Atras";
   f.submit();
}


function Siguiente() {
//
// Funcion para sacar
//
   if(window.frames.length != 0) { 
      f = cbuscado.document.forms[1];
   } else { 
      f= document.forms[2]; 
   } 
   f.Accion.value = "SacaSiguientes";
   f.submit();
}
function Anterior() {
//
// Funcion para sacar las anteriores
//
   if(window.frames.length != 0) { 
      f = cbuscado.document.forms[1];
   } else {  
      f= document.forms[2];  
   }  
   f.Accion.value = "SacaAnteriores";
   f.submit();
}

function SuscribirseRevista() {
   if(window.frames.length != 0) { 
      f = cbuscado.document.numeros;
      f1 = cbuscado.document.forms[1];
      sinfrm=""; 
   } else {  
      f= document.forms[1];  
      f1 = document.forms[2];
      sinfrm="&zfr=0";
   }  
    var msg = "";
    for (var i = 0; i < f.length; i++) {
        var e = f.elements[i];
        if (e.name == "r" && e.checked) 
           msg += " " + e.value;
    }
    if (vacio(msg)) {
       alert("Para suscribirse a los sumarios de una revista, previamente debe seleccionar la revista");
       return;
    } else {
       var UserCompludoc = getCookie("UCOMPLUDOC");
       if( UserCompludoc != null) {
           f1.Accion.value='Suscribirse';
           f1.RevistasSel.value=msg;
           f1.submit();
       } else {
          var url = "http://europa.sim.ucm.es/compludoc/revistasanalizadas?formusuario=1"+sinfrm;
          clogin = window.open(url,"LoginCompludoc","resizable,scrollbars=no,status=no,menubar=no,width=500,height=260");
          clogin.focus();
       }
//       f.submit();
    }
}
function SuscribirseBusqueda() {
   if(window.frames.length != 0) { 
       f = cbuscado.document.forms[1];
       sinfrm = "";
   } else {  
      f= document.forms[2];
      sinfrm = "&zfr=0";  
   }     
    var UserCompludoc = getCookie("UCOMPLUDOC");
    if( UserCompludoc != null) {
         f.Accion.value='Suscribirse';
         f.submit();
    } else {
         var url = "http://europa.sim.ucm.es/compludoc/AA?formusuario=1&desde=articulos"+sinfrm;
         clogin = window.open(url,"LoginCompludoc","resizable,scrollbars=no,status=no,menubar=no,width=500,height=260");
         clogin.focus();
    }
}

function Suscripciones(m) {
   if(window.frames.length != 0) { 
      f = cbuscado.document.forms[1];
      sinfrm="";
      marco = cbuscado;
   } else {  
      f= document.forms[2];
      sinfrm = "&zfr=0";
      marco=window;  
   }   
    if(vacio(m)) {
       var UserCompludoc = getCookie("UCOMPLUDOC");
       if( UserCompludoc != null) {
          var url = "http://europa.sim.ucm.es/compludoc/suscripciones?";
          marco.location.href = url + (new Date()).getTime()+sinfrm;
       } else {
          var url = "http://europa.sim.ucm.es/compludoc/suscripciones?formusuario=1&desde=suscripciones&time"  + (new Date()).getTime()+sinfrm;
          clogin = window.open(url,"LoginCompludoc","resizable,scrollbars=no,status=no,menubar=no,width=500,height=260");
          clogin.focus();
       }
     } else {
       var url = "http://europa.sim.ucm.es/compludoc/suscripciones?formusuario=1&desde=suscripciones&time"  + (new Date()).getTime()+sinfrm;
       clogin = window.open(url,"LoginCompludoc","resizable,scrollbars=no,status=no,menubar=no,width=500,height=260");
       clogin.focus();
     }
}

function vacio(s) {
    if (s == null || s == "" || esblanco(s))
       return true;
    return false;
}

function esblanco (s) {
   for (var i=0 ;i < s.length;  i++) {
       var c = s.charAt(i);
       if ((c != ' ') && (c != '\n') && (c != '\t')) return false;
   }
   return true;
}

function cambiar_clave() {
      var url = "http://europa.sim.ucm.es/compludoc/suscripciones?Accion=Cambiar+clave&time"  + (new Date()).getTime();
      clogin = window.open(url,"LoginCompludoc","resizable,scrollbars=no,status=no,menubar=no,width=500,height=260");
      clogin.focus();
//    var f = document.forms[0];
//    f.Accion.value = 'Cambiar clave';
//    f.submit();
}
function refworks(donde) {
    if(window.frames.length != 0) { 
       f = cbuscado.document.forms[0];
       sinfrm = "";
    } else {  
       f= document.forms[1];  
       sinfrm="&zfr=0";
    }  
    if(donde == 'ucm') {
       urlref = "http://0-www.refworks.com.cisne.sim.ucm.es/express/ExpressImport.asp?vendor=compludoc&filter=RefWorks%20Tagged%20Format&encoding=65001&url=http%3A//europa.sim.ucm.es/compludoc/AA%3Fformatosalvar%3DRefWorks%26articuloID%3D";
    } else {
       urlref = "http://www.refworks.com/express/ExpressImport.asp?vendor=compludoc&filter=RefWorks%20Tagged%20Format&encoding=65001&url=http%3A//europa.sim.ucm.es/compludoc/AA%3Fformatosalvar%3DRefWorks%26articuloID%3D";
    }
    var hayseleccionados = false;
    for (var i = 0; i < f.length; i++) {
        var e = f.elements[i];
        if (e.name == "r" && e.checked) {
             urlref += hayseleccionados ? '%2C' + e.value : e.value;
             hayseleccionados = true;
        }
    }
    if (!hayseleccionados) {
      alert('Debe de seleccionar los artículos que desea exportar a RefWorks');
      return;
    }
    RefWorksMain = window.open(urlref,"RefWorksMain"); 
    RefWorksMain.focus(); 
}

function salvararticulos() {
    if(window.frames.length != 0) { 
       f = cbuscado.document.forms[0];
       sinfrm = "";
    } else {  
       f= document.forms[1];  
       sinfrm="&zfr=0";
    }  
    var url = "http://europa.sim.ucm.es/compludoc/AA?formsalvar=1"+sinfrm;
    var hayseleccionados = false;
    for (var i = 0; i < f.length; i++) {
        var e = f.elements[i];
        if (e.name == "r" && e.checked) {
             hayseleccionados = true;
             break;
        }
    }
    if (hayseleccionados)
       url += "&hayseleccionados=1";
    csalvar = window.open(url,"SalvarCompludoc","resizable,scrollbars=no,status=no,menubar=no,width=640,height=400");
    csalvar.focus();
}

function abrir_textocompletonew(issn) {
   var url = "http://europa.sim.ucm.es/compludoc/GetSumario?textocompleto=?" + issn;
//    var url = "http://www.ucm.es/bucm";
   ctextocompleto = window.open(url,"TextoCompleto");
   ctextocompleto.focus();
}

function abrir_textocompleto(issn,donde) {
  if(!donde) donde = 1;
   var url = "";
   if(donde.indexOf('http')!=-1){
      url = donde;
   }else if(donde == '1') {
//      url = "http://alfama.sim.ucm.es/revistas/visualiza.asp?issn=" + issn;
      url = "http://zv4fy5pr5l.search.serialssolutions.com/?V=1.0&N=100&L=ZV4FY5PR5L&S=I_M&C=" + issn;
   } else {
      url = "http://revistas.ucm.es/portal/modulos.php?name=Revistasissn&col=1&issn=" + issn;
   }
   var txtcompleto = window.open(url,'textocompleto');
   txtcompleto.focus();
}