/* ------ CIM TAG FUNCTIONS ------ */

/* Version 2.0 (backward compatbile) */
/* Please, do NEVER modify this file! */

var metriwebDomain = ".metriweb.be";

function metriwebTagSrc (tag, keyword, extra, refresh)
{
	var randomNumber = new String (Math.random());
	
	var tagSrc = new String ('http://' + tag + metriwebDomain + '/dyn/' +
		tag + '/mw.cgi?page=' + keyword +
		( refresh ? ('&s=' + refresh) : '' ) +
		( extra ? ('&q=' + extra) : '' ) +
		'&R=' + randomNumber) ; 
		
	return tagSrc ;
}

function metriwebTag (tag, keyword, extra, refresh)
{
	var randomNumber = new String (Math.random());
	
	document.write ('<img src="http://' + tag + metriwebDomain + '/dyn/' +
		tag + '/mw.cgi?page=' + keyword +
		( refresh ? ('&s=' + refresh) : '' ) +
		( extra ? ('&q=' + extra) : '' ) +
		'&R=' + randomNumber + '" width="1" height="1" id="mwImg" />');
}

function metriwebDialog (url)
{
	document.write ('<sc' + 'ript src="' + url + '" type="text/javascript"></sc' + 'ript>');
}

/* (c)1999-2004, DouWère  */

/* ------ CIM TAG FUNCTIONS END ------ */

var bannerInfo = new String("site=dso");

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
  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);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function getUserCookieVal(key) {
	var dc = document.cookie;
	var prefix = key + "=" ;
	var begin = dc.indexOf("; " + prefix);
	if (begin == -1) {
	  begin = dc.indexOf(prefix);
	  if (begin != 0) return null;
	} else
	  begin += 2;
	var end = document.cookie.indexOf(";", begin);
	if (end == -1)
	  end = dc.length;
	return unescape(dc.substring(begin + prefix.length, end));
}

function URLEncode(str) {
	// The Javascript escape and unescape functions do not correspond
	// with what browsers actually do...
	var SAFECHARS = "0123456789" +					// Numeric
					"ABCDEFGHIJKLMNOPQRSTUVWXYZ" +	// Alphabetic
					"abcdefghijklmnopqrstuvwxyz" +
					"-_.!~*'()";					// RFC2396 Mark characters
	var HEX = "0123456789ABCDEF";
	
	var plaintext = str;
	var encoded = "";
	for (var i = 0; i < plaintext.length; i++ ) {
		var ch = plaintext.charAt(i);
	    if (ch == " ") {
		    encoded += "+";				// x-www-urlencoded, rather than %20
		} else if (SAFECHARS.indexOf(ch) != -1) {
		    encoded += ch;
		} else {
		    var charCode = ch.charCodeAt(0);
			if (charCode > 255) {
			    alert( "Unicode Character '" 
                        + ch 
                        + "' cannot be encoded using standard URL encoding.\n" +
				          "(URL encoding only supports 8-bit characters.)\n" +
						  "A space (+) will be substituted." );
				encoded += "+";
			} else {
				encoded += "%";
				encoded += HEX.charAt((charCode >> 4) & 0xF);
				encoded += HEX.charAt(charCode & 0xF);
			}
		}
	} // for
	return plaintext;
}

function getStringVar(st){
  var temp = self.document.location.search.toLowerCase();
  if(temp.indexOf(st) >= 0){
    temp = temp.substring((temp.indexOf(st)+(st.length)), temp.length);
    temp = temp.substring(0, (((temp.indexOf('&')>=0)?temp.indexOf('&'):temp.length)));
  }else{ temp = '';
  } return unescape(temp);
}

function addArchive(artId) {	
	var userid = getUserCookieVal("userID");
	var clp;
	if (!((userid == null) || (userid == ""))) {		
		window.open('/Priv/addToArchive.asp?articleId='+artId,'Mijn_Archief','toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,width=450,height=250');		
	} else {
		//window.location = "/Registratie/index.asp?lv=2&targetUrl=" + URLEncode(document.location);
		window.location = "/Registratie/index.asp?lv=2&targetUrl=" + escape(document.location + '&AddToArchive=1');		
	}
}

var strAddToArchive = getStringVar('addtoarchive=')
if (strAddToArchive != '') {
	var strAddToArchiveArticleid = getStringVar('articleid=')
	if (strAddToArchiveArticleid != '') {
		addArchive(strAddToArchiveArticleid)
	}
}
function addWebTrends()
{
	document.write('<SCR'+'IPT LANG'+'UAGE="JavaSCR'+'IPT"><!-'+'-');
	document.write('gVersion="1.0";');
	document.write('//-'+'->');
	document.write('</SCR'+'IPT>');
	document.write('<SCR'+'IPT LANG'+'UAGE="JavaSCR'+'IPT1.1"><!-'+'-');
	document.write('gVersion="1.1";');
	document.write('//-'+'->');
	document.write('</SCR'+'IPT>');
	document.write('<SCR'+'IPT LANG'+'UAGE="JavaSCR'+'IPT1.2"><!-'+'-');
	document.write('gVersion="1.2";');
	document.write('var RE={"%09":/\t/g, "%20":/ /g, "%23":/\#/g,"%26":/\&/g,"%2B":/\+/g,"%3F":/\?/g,"%5C":/\\/g};');
	document.write('//-'+'->');
	document.write('</SCR'+'IPT>');
	document.write('<SCR'+'IPT LANG'+'UAGE="JavaSCR'+'IPT1.3"><!-'+'-');
	document.write('gVersion="1.3";');
	document.write('//-'+'->');
	document.write('</SCR'+'IPT>');
	document.write('<SCR'+'IPT LANG'+'UAGE="JavaSCR'+'IPT1.4"><!-'+'-');
	document.write('gVersion="1.4";');
	document.write('//-'+'->');
	document.write('');
	document.write('</SCR'+'IPT>');
	document.write('<SCR'+'IPT LANG'+'UAGE="JavaSCR'+'IPT1.5"><!-'+'-');
	document.write('gVersion="1.5";');
	document.write('//-'+'->');
	document.write('</SCR'+'IPT>');
	document.write('<SCR'+'IPT LANG'+'UAGE="JavaSCR'+'IPT" src="http://www.standaard.be/Assets/js/dcs_tag.js" DEFER ></SCR'+'IPT>');
}

addWebTrends();
