var mpr = 'Previo';
var mcpr = 'Cerrar';
var psize = '250';

function pv(url, id) {
  if(document.all || document.getElementById) {
    document.write('<a class="opener" href="'+url+'" id="lk'+id+'" onClick="pview(this);return false">'+mpr+'</a>');
  }
}

function pview(link) {

  var ie4 = (document.all && !document.getElementById) ? true : false;

  if (ie4 == 1) {
    var iframe = document.all['if'+link.id];
  }
  else {
    var iframe = document.getElementById('if'+link.id);
  }

  if(link.innerHTML == mpr) {
    if(iframe) {
      // should never happen
      iframe.src = link.href;
      iframe.style.height = psize;
      iframe.style.visibility = 'visible';
    } else {
      // generate an inline frame containing the link
      myBR = document.createElement('br');
      myBR.setAttribute('id','br'+link.id);
      link.parentNode.appendChild(myBR);
      myIframe = document.createElement('iframe');
      //myIframe.setAttribute('security','restricted');
      myIframe.setAttribute('id','if'+link.id);
      myIframe.setAttribute('width','100%');
      myIframe.setAttribute('height',psize);
      myIframe.setAttribute('src',link.href);
      link.parentNode.appendChild(myIframe);
    }
    //link.innerText = mcpr;
    link.innerHTML = mcpr;
  } else if(iframe) {
    if (ie4 == 1) {
      myBR = document.all['br'+link.id];
    } else {
      myBR = document.getElementById('br'+link.id);
    }
    link.innerHTML = mpr;
    link.parentNode.removeChild(iframe);
    link.parentNode.removeChild(myBR);
  }
}
function setts(link) {
  var tf = parent.frames['tree'];
  if (! tf) return;
  var state = tf.state;
  var recluster = tf.recluster;
  var addparams = "?";
  if (state) addparams += "v:state=" + state + "&";
  if (recluster) addparams += "v:recluster=" + recluster + "&";
  link.search = addparams + link.search.substr(1);
}