function writeIE() {
  if (is.ie4comp!=-1 && is.ns!=1) document.write('<link rel="stylesheet" type="text/css" href="'+viewFolder+'css/ie.css" />');
}

function init() {
  onScroll(updateTopButton);
}

function openApplicationLink(url, target) {
  if(url == null || url == '') {
    return false;
  }

  if(target != 'self') {
    window.open(url, target);
  } else {
    window.location.href = url;
  }
}

function setCookie(c_name, value, expiredays) {
  var exdate = new Date();
  exdate.setDate(exdate.getDate() + expiredays);
  document.cookie = c_name + "=" +escape(value) + ((expiredays == null) ? "" : ";expires=" + exdate.toGMTString() + ";path=/");
}

function setCookie_dommel(c_name, value, expiredays, alwaystrue) {
  var exdate = new Date();
  if (value==false)
  {
    expiredays = 7;
  }
  exdate.setDate(exdate.getDate() + expiredays); 
  document.cookie = c_name + "=" +escape(alwaystrue) + ((expiredays == null) ? "" : ";expires=" + exdate.toGMTString() + ";path=/"); 
}

function getCookie(c_name) {
  if (document.cookie.length > 0) {
    c_start = document.cookie.indexOf(c_name + "=");
    if (c_start != -1) { 
      c_start = c_start + c_name.length+1; 
      c_end = document.cookie.indexOf(";",c_start);
      if (c_end == -1) {
        c_end = document.cookie.length;
      }
      return unescape(document.cookie.substring(c_start,c_end));
    } 
  }
  return "";
}

var internal_link = false;

function showEnquetePopup(id) {
  var enqCookie = getCookie('show_enquete_' + id); 
  /*
  var cur_prot= location.href.indexOf("://");
  var cur_afterprot = location.href.substring(cur_prot+3,location.href.length);
  var cur_afterprot_sep = cur_afterprot.indexOf("/");
  var cur_domain = cur_afterprot.substring(0,cur_afterprot_sep);
  var ref_domain = "";
  if (document.referrer!='')
  {
    var ref_prot= document.referrer.indexOf("://");
    var ref_afterprot = document.referrer.substring(ref_prot+3,document.referrer.length);
    var ref_afterprot_sep = ref_afterprot.indexOf("/");
    ref_domain = ref_afterprot.substring(0,ref_afterprot_sep);
  }
  if (document.referrer!='' && cur_domain==ref_domain)
  {
      return false;
  }
  */
  if (internal_link == true)
  {
    return false;
  }
  else if (enqCookie != null && enqCookie == "true") {
    return false;
  } else {
    return true;
  }
}

function internalLinks() { 
  var contents = getElt('page');
  if(contents) {
    if (!document.getElementsByTagName) {
      return;
    }
    var anchors = document.getElementsByTagName('a');
    for(var i=0; i<anchors.length; i++) {    
      if(anchors[i].className != 'blank' && anchors[i].className != 'extern' && anchors[i].className != 'print') {
        anchors[i].onclick = function() {
          internal_link = true;
        }
      }      
    }
  }
}