//   -			-			-			-			-			BROWSERDETECTION & MISC

var isOpera   = ( navigator.appName.indexOf("Opera")>-1  || (!window.showHelp && navigator.appName=="Microsoft Internet Explorer"));
var isNS4     = (!isOpera && document.layers) ? true : false;
var isIE      = (!isOpera && document.all   ) ? true : false;
var isIE4	  = (!isOpera && document.all && !document.getElementById ) ? true : false;
var isNS6     = (!isOpera && !isIE&&document.getElementById) ? true : false;
var isMac	  = navigator.platform.indexOf("Mac")>-1;

var blnOpenCloseDocument = true;

//   -			-			-			-			-			EVENTS

//
// addEvent(window, "load", sortables_init);
//
function addEvent(elm, evType, fn, useCapture)
{
  if (elm.addEventListener){
    elm.addEventListener(evType, fn, useCapture);
    return true;
  } else if (elm.attachEvent){
    var r = elm.attachEvent("on"+evType, fn);
    return r;
  } else {
    alert("Handler could not be removed");
  }
} 

//   -			-			-			-			-			ANTI-SPAM function
// let op : deze functie word aangeroepen vanuit ASP library code: niet wijzigen!
function lib_mail(u,d,s){
	document.write('<a href=\"mailto:'+u+'@'+d+(s=='' ? '' : '?subject='+s)+'\">')
}

//   -			-			-			-			-			FORMS

// use this in a keydown of a control to surpress any other characters than numbers
// nieuw 20 juni 2007: "-" nu ook toegestaan (189)
function lib_form_digitsonly () {
 // 2 ranges: for normal keyboard and keypad..
 return ((event.keyCode >= 48 && event.keyCode <= 57) || (event.keyCode >= 96 && event.keyCode <= 105) || event.keyCode==190 || event.keyCode==9 || event.keyCode==8 || event.keyCode==46 || event.keyCode==37  || event.keyCode==189) 
}

// use <textarea maxlength="40" onkeyup="return lib_form_check_maxlength(this)"></textarea>
function lib_form_check_maxlength(obj){
 var maxlen=obj.getAttribute?parseInt(obj.getAttribute("maxlength")) : 90;
 if (obj.getAttribute && obj.value.length>maxlen) obj.value=obj.value.substring(0,maxlen);
}

// use this in a keydown of a control to surpress spaces
function lib_form_nospaces () {
 // 2 ranges: for normal keyboard and keypad..
 return (event.keyCode != 32 ) 
}

function lib_form_is_modified(oForm) {
	var el, opt, hasDefault, i = 0, j;
	while (el = oForm.elements[i++]) {
		switch (el.type) {
			case 'text' :
			case 'textarea' :
			case 'hidden' :
				if (!/^\s*$/.test(el.value) && el.value != el.defaultValue) return true;
				break;
			case 'checkbox' :
			case 'radio' :
				if (el.checked != el.defaultChecked) return true;
				break;
			case 'select-one' :
			case 'select-multiple' :
				j = 0, hasDefault = false;
				while (opt = el.options[j++])
					if (opt.defaultSelected) hasDefault = true;
				j = hasDefault ? 0 : 1;
				while (opt = el.options[j++]) 
					if (opt.selected != opt.defaultSelected) return true;
				break;
		}
	}
	return false;
}

//
// Automatically sets the focus to the first possible form field
// 
function lib_form_autofocus() {
  var bFound = false;

  for (var f=0; f < document.forms.length; f++) {
    for(var i=0; i < document.forms[f].length; i++) {
      if (document.forms[f][i].type != "hidden") {
        if (document.forms[f][i].disabled != true) {
            document.forms[f][i].focus();
            var bFound = true;
        }
      }
      if (bFound == true) break;
    }
    if (bFound == true) break;
  }
}

function lib_form_setRadio(frm, rad_name, new_value) {
    for (var t=0;t<frm.length;t++) {
        if (frm[t].name.toLowerCase()==rad_name.toLowerCase()) {
	        frm[t].checked=frm[t].value==new_value;
	    }
    }
} 


function lib_form_findfield( sName ) {
   var fldObj = null;
   var the_frm;
    
   fldObj = document.getElementById( sName );
   // for mozilla: the field may be in a form, try to get the handle there
   if (!fldObj) {
      for (var f=0; f<=document.forms.length; f++) {
        the_frm = document.forms[f];
        try { 
            if (the_frm[sName]) return the_frm[sName];
        } 
        catch(err) {}
      }
   } 
   return fldObj;
}

function lib_form_group_select(oFrm,sfield,bselect){
	for (var t=0;t<oFrm.length;t++) {
	    if (oFrm[t].name.toLowerCase()==sfield.toLowerCase()) {
		    oFrm[t].checked = bselect;
		}
	}
} 

//   -			-			-			-			-			WINDOWS

//
// Open a centered window, save the opener and set the focus
// 
function lib_OpenWindowCentered( adres, naam, win_width, win_height, optional_full_win) {
  var sParam = "resizable=no, toolbar=no, menubar=no" 
  if (isIE) {
	var win_left   = Math.max(1,(screen.width  - win_width )/2);
	var win_top    = Math.max(1,(screen.height - win_height)/2);
  } else {
	var win_left   = Math.max(1,(lib_screen_width()  - win_width )/2);
	var win_top    = Math.max(1,(lib_screen_height() - win_height)/2);
  }
  if (optional_full_win != null) {
	if (optional_full_win=true) {
		sParam = "resizable=yes, toolbar=yes, menubar=yes, scrollbars=yes "
	} 
  }
  var w=window.open(adres, naam, sParam + ", status=no, center=yes, width="+win_width.toString()+", height="+      win_height.toString()+", top=" + win_top.toString()+", left=" + win_left.toString());
  if (w) {
  	w.opener = window;
  	if (w.focus) w.focus();
  } else {
	// TODO IE only: perhaps a popup blocker is preventing opening a new window, try using an iframe (note: this requires other code for closing the window!)
	if (document.body) {
		win_left   = Math.max(1,(document.body.clientWidth  - win_width )/2);
		win_top    = Math.max(1,(document.body.clientHeight - win_height)/2);
		document.body.innerHTML = document.body.innerHTML + "<iframe style=\"z-index:9999;position:absolute;top:"+win_top.toString()+"px;left:"+win_left.toString()+"px;width:"+win_width.toString()+"px;height:"+win_height.toString()+"px;border:1px solid black;filter:progid:DXImageTransform.Microsoft.Shadow(color='#333333',Direction=135,Strength=5)\" src=\'"+adres+"\'></iframe>";
	}
  }
  return w
}

//
// Open a centered window showing an image
//
// TODO use for images as well!
// 
function lib_OpenWindowCenteredClose() {
  if (top.location==window.location) {
    // normal popup window
    window.close();
  } else {
    // iframe popup simulation, resize to nothing!
    window.resizeTo(0,0);
  }
}

//
// Open a centered window showing an image
// 
// TODO use OpenWindow and Close method here!
// 
function lib_window_ImageZoom( imagepath, optional_height, optional_width, optional_full_win ) {
  var sParam = "resizable=no, toolbar=no, menubar=no," 

  var win_width  = 800;
  var win_height = 600;

  if (optional_height != null && optional_height != 0) {
    win_height =  optional_height;
  }
    
  if (optional_width != null && optional_width != 0) {
    win_width = optional_width;
  }
    
  if (isIE) {
	var win_left   = Math.max(1,(screen.width  - win_width )/2);
	var win_top    = Math.max(1,(screen.height - win_height)/2);
  } else {
	win_height += 24;
	var win_left   = Math.max(1,(lib_screen_width()  - win_width )/2);
	var win_top    = Math.max(1,(lib_screen_height() - win_height)/2);
  }
  if (optional_full_win != null) {
	if (optional_full_win=true) {
		sParam = "resizable=yes, toolbar=yes, menubar=yes, scrollbars=yes "
	} 
  }
  
  // TODO mozilla heeft scrollbars!
  strContent =  
  "<script language='javascript'>"+
  "function fitPic() {"+
  "if (window.innerWidth){"+
  "  iWidth=window.innerWidth;"+
  "  iHeight=window.innerHeight-24;"+
  "}else{"+
  "  iWidth=document.body.clientWidth;"+
  "  iHeight=document.body.clientHeight;"+
  "}"+
  "iWidth = document.images[0].width - iWidth;"+
  "iHeight = document.images[0].height - iHeight;"+
  "window.resizeBy(iWidth, iHeight);"+
  "};</script><BODY bgColor=#ffffff style=margin:0px marginheight=0 marginwidth=0 onload=fitPic()><TITLE>" + imagepath + "</TITLE><table cellpadding=0 cellspacing=0 height=100% width=100% ><tr><td align=center><A href=javascript:window.close() title=Sluit><img src='" + imagepath + "' border=0></A></td></tr></table>";

    var w = window.open("", 'zoom', sParam + ", status=no, center=yes, width="+win_width.toString()+", height="+win_height.toString()+", top=" + win_top.toString()+", left=" + win_left.toString());
   	while(w.document == null){x++}; 
	with (w.document) {
		open();
		write( strContent );
		close();
	}
	if (w.focus) w.focus(); 
}

//   -			-			-			-			-			IMAGES

//
// Generic function to switch images, requires names to end with '_on' or '_off' (followed by .gif or .jpg)
//
function img_onoff(id, blnActivate) { 
  var img=document.getElementById(id);
  if (img) {
    var strNewImg=img.src;
    img.src = strNewImg.substring(0,strNewImg.lastIndexOf('_')+1)+(blnActivate?'on':'off')+img.src.substring(strNewImg.lastIndexOf('.')); 
  }
}

//   -			-			-			-			-			COOKIES
function lib_createCookie(name,value,days)
{
	if (days) {
		var date = new Date();
		date.setTime(date.getTime()+(days*24*60*60*1000));
		var expires = "; expires="+date.toGMTString();
	}
	else var expires = "";
	var ck = name+"="+value+expires+"; path=/";
	document.cookie = ck;
}

function lib_readCookie(name)
{
	var nameEQ = name + "=";
	var ca = document.cookie.split(';');
	for(var i=0;i<ca.length;i++) {
		var c = ca[i];
		while (c.charAt(0)==' ') c = c.substring(1,c.length);
		if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
	}
	return null;
}

function lib_eraseCookie(name)
{
	lib_createCookie(name,"",-1);
}

//   -			-			-			-			-			SCROLLABLE DIV and scroll functions
// to avoid both auto and manual scroll
var LIB_SCROLL_MODE_AUTO   = "AUTO";
var LIB_SCROLL_MODE_MANUAL = "MANUAL";

var lib_scroll_started     = false;
var lib_scroll_mode        = LIB_SCROLL_MODE_AUTO;
var lib_scroll_manual_wrap = true;              // if in MANUAL mode, wrap position?
var lib_scroll_auto_wrap   = true;              // if in AUTO mode, wrap position? -> if false, wrapping is performed ONCE

// change this variable to change speed of scroll inside a step
var lib_scroll_steps       = 20.0;                 

// scrolls until the desired scrolltop position is reached
//
function lib_div_scroller( sDiv, iStep, iSpeed, iScrollTopDesired ) {
	var elt = document.getElementById( sDiv );
	
	if (elt) {
	    lib_scroll_started = true;
	    if (iStep>0) {
	        // move down
	        elt.scrollTop = Math.min( Math.round(elt.scrollTop + iStep, 0), iScrollTopDesired);
            if (elt.scrollTop < iScrollTopDesired) {
               window.setTimeout( "lib_div_scroller('" + sDiv + "'," + iStep.toString() + "," + iSpeed.toString() + "," + iScrollTopDesired.toString() + ")", iSpeed)  
            } else {
               lib_scroll_started = false;
            }
	    } else {
	        // move up
	        elt.scrollTop = Math.max( Math.round(elt.scrollTop + iStep, 0), iScrollTopDesired);
            if (elt.scrollTop > iScrollTopDesired) {
               window.setTimeout( "lib_div_scroller('" + sDiv + "'," + iStep.toString() + "," + iSpeed.toString() + "," + iScrollTopDesired.toString() + ")", iSpeed)
            } else {
               lib_scroll_started = false;
            }
	    }
    }
}

// if height is not specified, the element's height is assumed
// iHeight defines the step-height
// iSpeed defines the speed (pause) between steps!
function lib_div_autoscroll( sDiv, iHeight, iSpeed, bFromTimer ) {
	
	if (lib_scroll_mode == LIB_SCROLL_MODE_AUTO) {
	
	    var elt = document.getElementById( sDiv );
	    var scrollHeight = 0.0;
	    if (elt && lib_scroll_started==false) {
            if (iHeight==0) iHeight = elt.clientHeight;
            // first event is installing, don't do anything!
	        if (bFromTimer) { 
	            // moving down
	            if (iHeight>0) {
     		        if (elt.scrollTop + iHeight < elt.scrollHeight) {
    		            scrollHeight = iHeight/lib_scroll_steps;
                        lib_div_scroller( sDiv, scrollHeight, 20, elt.scrollTop + iHeight);
     		        } else {
     		            // omklap naar het begin!
     		            if (lib_scroll_auto_wrap) elt.scrollTop = 0;
     		        }
     		    } else {
	                // moving up
	                if (elt.scrollTop>0) {
		                scrollHeight = iHeight/lib_scroll_steps;
 		                lib_div_scroller( sDiv, scrollHeight, 20, Math.max(elt.scrollTop + iHeight, 0));
         	        } else {
                  		if (lib_scroll_auto_wrap) elt.scrollTop = elt.scrollHeight + iHeight;
 		            }
    		    }
    		}
	    }
	    window.setTimeout( "lib_div_autoscroll('" + sDiv + "'," + iHeight.toString() + "," + iSpeed.toString() + ",true)", iSpeed);
	}
}


// in reactie op een scrollknop
//
function lib_div_manualscroll(sDiv, iHeight) {
	var elt = document.getElementById( sDiv );
	var scrollHeight = 0.0;

	lib_scroll_mode = LIB_SCROLL_MODE_MANUAL;
	if (elt && lib_scroll_started==false) {
        // moving down
        if (iHeight>0) {
	        if (elt.scrollTop + iHeight < elt.scrollHeight) {
	            scrollHeight = iHeight/lib_scroll_steps;
	            lib_div_scroller( sDiv, scrollHeight, 20, elt.scrollTop + iHeight)
	        } else {
	            if (lib_scroll_manual_wrap) elt.scrollTop=0;
	    	}
	    } else {
	        // moving up
        	if (elt.scrollTop>0) {
            	scrollHeight = iHeight/lib_scroll_steps;
            	lib_div_scroller( sDiv, scrollHeight, 20, Math.max(elt.scrollTop + iHeight, 0));
        	} else {
        	    if (lib_scroll_manual_wrap) elt.scrollTop = elt.scrollHeight + iHeight;
	    	}
	    }
	}
}


//
// als div hoger dan de aangegeven maximale hoogte, maak de div scrollable 
//
function lib_div_makescrollable( divname, maxheight ) {
	var d = document.getElementById(divname);
	if (d){
		var d_s = d.style;
		if (d.offsetHeight>maxheight) {
			// create a new item inside the parent to create room
			if (document.createElement) {
				var spacer=document.createElement("<DIV id="+divname+"_spacer style=height:"+maxheight.toString()+"px></DIV>");
				d.parentElement.insertBefore(spacer);
				d_s.posHeight = maxheight;
				d_s.position  = "absolute";
				d_s.overflow  = "scroll";
				d_s.overflowX = "hidden";
			}
		}
	}
}

//   -			-			-			-			-			SCREEN METRICS

function lib_screen_height ( ) {
	if (isIE) {
		return document.body.offsetHeight;
	} else {
		return window.innerHeight;
	}
}

function lib_screen_width ( ) {
	if (isIE) {
		return document.body.offsetWidth;
	} else {
		return window.innerWidth;
	}
}

function lib_top_screen_height ( ) {
	if (isIE) {
		return top.window.document.body.offsetHeight;
	} else {
		return top.window.innerHeight;
	}
}


// can also be used for layers, fields etc...
function lib_getObj(id) {
	return layer_get(id);
}


//   -			-			-			-			-			LAYERS

function layer_style( bVisible, bAbsolute ) {
	var sRetval 
	
	if (isIE || isNS6)
	   sRetval = 'display:' + (bVisible ?  'block' : 'none' ) + ";";  
	else 
	   sRetval = 'visibility:' + (bVisible ?  'visible' : 'hidden' ) + ";";
 	sRetval += 'position:' + (bAbsolute ? 'absolute' : 'relative') + ";";
	sRetval +=  (bAbsolute ? 'position:absolute;' : '');
	if (isNS4&&!bAbsolute) sRetval += 'left:0px;top:0px;';
	return sRetval;
}

function layer_write_full( sName, bVisible, bAbsolute, sContent ){
	if (blnOpenCloseDocument) document.open();
	document.write ("<DIV ID=\"" + sName + "\" style=\""+layer_style(bVisible, bAbsolute)+"\">"+sContent+"</DIV>");
	if (blnOpenCloseDocument) document.close();
}

function layer_set_visible( sName, bVisible ) {
	var x = layer_get_style( sName );
	if (x) {
		if (isIE || isNS6)
			x.display = (bVisible ?  "block" : "none" );
		else
			x.visibility = (bVisible) ? 'visible' : 'hidden';
	} 
}

function layer_get(sName) {
	if (document.getElementById) {
		return document.getElementById(sName);
	} else if (document.all) {
		return document.all[sName];
	} else if (document.layers) {
		return document.layers[sName];
	} else return false;
}

//
// Documented not to work under Opera (not supported)
//
function layer_set_content( sName, sContent ) {
	var x = layer_get( sName )
	
	if (document.layers) {
		with (x.document) {
			open();
			write("<P>"+sContent+"</P>");
			close();
		}
	} else 
		x.innerHTML = sContent;
}

//
// NS4 not supported
//
function layer_set_color( sName, sColor) {
	var x=layer_get_style( sName );
	if (x) x.color = sColor;
}

//
// NS4 not supported
//
function layer_set_backcolor( sName, sColor) {
	var x=layer_get_style( sName );
	if (x) x.backgroundColor = sColor;
}

function layer_get_style(sName) {
	if (document.getElementById) {
		var x = document.getElementById(sName)
		if (x) return x.style;
	} else if (document.all) {
		var x = document.all[sName]
		if (x) return x.style;
	} else if (document.layers) {
		return document.layers[sName];
	} 
}

function lib_getAbsoluteOffsetTop(obj) {
    var top = obj.offsetTop;
    var parent = obj.offsetParent;
    while (parent != document.body) {
     	top += (parent.offsetTop - parent.scrollTop);
     	parent = parent.offsetParent;
    }
    return top;
}

function lib_getAbsoluteOffsetLeft(obj) {
    var left = obj.offsetLeft;
    var parent = obj.offsetParent;
    while (parent != document.body) {
     	left += (parent.offsetLeft - parent.scrollLeft);
     	parent = parent.offsetParent;
    }
    return left;
}

//   -			-			-			-			-			STRING FUNCTIONS

function lib_dropLeadingZeros(num)
{
	while (num.charAt(0) == "0") {
		newTerm = num.substring(1, num.length);
		num = newTerm;
	}
        
	if (num == "") num = "0";
	return num;
}

function lib_left(str, n){
	if (n <= 0)
	    return "";
	else if (n > String(str).length)
	    return str;
	else
	    return String(str).substring(0,n);
}

function lib_right(str, n){
    if (n <= 0)
       return "";
    else if (n > String(str).length)
       return str;
    else {
       var iLen = String(str).length;
       return String(str).substring(iLen, iLen - n);
    }
}

function lib_htmlencode(text)
{
    return text.replace(/&/g, '&amp').replace(/'/g, '&quot;').replace(/</g, '&lt;').replace(/>/g, '&gt;');
}

//   -			-			-			-			-			Custom control stuff 
// 
// for overlapping controls (comboboxes/objects) use an iframe to cover them (iframe shim)
// idea taken from http://dotnetjunkies.com/WebLog/jking/archive/2003/10/30/2975.aspx 
// tip: from this point make sure the actual DIV measurements are known
function control_createshim( control_divname ) {
    var ifr = document.getElementById( control_divname + '__iframe');
	if (!ifr) {
 	    var ifr = document.createElement('iframe');
	    if (typeof(ifr.innerHTML) != 'string') { return; }
	    ifr.id = control_divname + '__iframe';
	    ifr.style.position = 'absolute';
	    ifr.style.display = 'block';
	    ifr.src = "javascript:false;";
        document.body.appendChild(ifr);
    }

    var ctrlDiv = document.getElementById( control_divname );
	ifr.style.top = ctrlDiv.style.top;
    ifr.style.left = ctrlDiv.style.left;
    ifr.style.width = ctrlDiv.offsetWidth;
    ifr.style.height = ctrlDiv.offsetHeight;
    ifr.style.zIndex = ctrlDiv.style.zIndex - 1;
    ifr.style.display = "block";
}

function control_deleteshim( control_divname ) {
    var ifr = document.getElementById( control_divname + '__iframe');
    if (ifr) document.body.removeChild(ifr);
}

//
//  hack for Flash IE activate problem
//
function lib_activeX_activate() {
    var theObjects = document.getElementsByTagName("object"); 
    for (var i = 0; i < theObjects.length; i++) { 
        theObjects[i].outerHTML = theObjects[i].outerHTML; 
    }
}

//
//  Retrieves an array of DOM elements by Classname
//
function lib_DOM_getElementsByClass(searchClass,node,tag) {
	var classElements = new Array();
	if ( node == null ) node = document;
	if ( tag == null ) tag = '*';
	var els = node.getElementsByTagName(tag);
	var elsLen = els.length;
	var pattern = new RegExp("(^|\\s)"+searchClass+"(\\s|$)");
	for (i = 0, j = 0; i < elsLen; i++) {
		if ( pattern.test(els[i].className) ) {
			classElements[j] = els[i];
			j++;
		}
	}
	return classElements;
}

//
//  Alternates row colors in a table (through TR classes)
//
function lib_table_alternate( className, TRClass1, TRClass2) { 
    if (className==null) className = "alternate";
    if (TRClass1==null) TRClass1 = "td1"
    if (TRClass2==null) TRClass2 = "td0"
    var tables = lib_DOM_getElementsByClass(className,document,"table");   
    for (var t=0; t<tables.length; t++) {
       var rows = tables[t].getElementsByTagName("tr");   
       for (var i = 0; i < rows.length; i++) rows[i].className = (i % 2 == 0) ? TRClass1 : TRClass2; 
    }
}

//   -			-			-			-			-			Macromedia stuff, modified 
//
// to highlight menu-items
function changeto(e,highlightcolor){
  source=isIE ? event.srcElement : e.target
  if (source.tagName=="TR"||source.tagName=="TABLE")return
  while(source.tagName!="TD"&&source.tagName!="HTML")
  source=isNS6? source.parentNode : source.parentElement
  if (source.style.backgroundColor!=highlightcolor&&source.id!="ignore")
  source.style.backgroundColor=highlightcolor
}

function contains_ns6(master, slave) { //check if slave is contained by master
  while (slave.parentNode)
  if ((slave = slave.parentNode) == master)
  return true;
  return false;
}

function changeback(e,originalcolor){
  if (isNS6&&(contains_ns6(source, e.relatedTarget)||source.id=="ignore")) return;
  source.style.backgroundColor=originalcolor
}

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_showHideLayers() { //v6.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}