// KREM.nl - Hans Gelok, Tonci Galic
<!-- Cookie Monster
function getCookieVal (offset) {
  var endstr = document.cookie.indexOf (";", offset);
  if (endstr == -1) { endstr = document.cookie.length; }
  return unescape(document.cookie.substring(offset, endstr));
  }

function getCookie (name) {
  var arg = name + "=";
  var alen = arg.length;
  var clen = document.cookie.length;
  var i = 0;
  while (i < clen) {
    var j = i + alen;
    if (document.cookie.substring(i, j) == arg) {
      return getCookieVal (j);
      }
    i = document.cookie.indexOf(" ", i) + 1;
    if (i == 0) break; 
    }
  return null;
  }

function deleteCookie (name,path,domain) {
  if (getCookie(name)) {
    document.cookie = name + "=" +
    ((path) ? "; path=" + path : "") +
    ((domain) ? "; domain=" + domain : "") +
    "; expires=Thu, 01-Jan-70 00:00:01 GMT";
    }
  }

function setCookie (name,value,expires,path,domain,secure) {
  document.cookie = name + "=" + escape (value) +
    ((expires) ? "; expires=" + expires.toGMTString() : "") +
    ((path) ? "; path=" + path : "") +
    ((domain) ? "; domain=" + domain : "") +
    ((secure) ? "; secure" : "");
  }
function deleteCookies(skipName, path, domain)
{
	// first we'll split this cookie up into name/value pairs
	// note: document.cookie only returns name=value, not the other components
	var a_all_cookies = document.cookie.split( ';' );
	var a_temp_cookie = '';
	var cookie_name = '';
	var cookie_value = '';
		
	for ( i = 0; i < a_all_cookies.length; i++ )
	{	
		a_temp_cookie = a_all_cookies[i].split( '=' );
		// and trim left/right whitespace while we're at it
		cookie_name = a_temp_cookie[0].replace(/^\s+|\s+$/g, '');
		
		
	// if the extracted name matches passed check_name
		if ( cookie_name == skipName )
		{
			// we need to handle case where cookie has no value but exists (no = sign, that is):
			if ( a_temp_cookie.length > 1 )
			{
				cookie_value = unescape( a_temp_cookie[1].replace(/^\s+|\s+$/g, '') );
				
			}
			var today = new Date();
			expires  = 30 * 1000 * 3600 * 24; //30 dagen
			expires = new Date(today.getTime() + expires);
			setCookie (cookie_name,cookie_value,expires,path,domain,secure);
			break;
			return true;
		}
		else
		{
			deleteCookie (cookie_name,path,domain);	
		}
		a_temp_cookie = null;
		cookie_name = '';
	}
	return false;
}
//-->
// V1.01
function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}

<!-- Show And Hide Layers Navigation
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; }
}
//-->
function GP_popupConfirmMsg(msg) { //v1.0
  document.MM_returnValue = confirm(msg);
}
<!-- Go to URL
function MM_goToURL() { //v3.0
  var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}
//-->
<!-- Validate
function MM_findObj(n, d) { //v0.1
  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_validateForm() { //v0.1
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.id; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' moet een emailadres zijn\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' moet een getal zijn\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' moet een getal zijn tussen '+min+' en '+max+'\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is verplicht\n'; }
  } if (errors) alert('De volgende fout heeft zich voorgedaan:\n\n'+errors);
  document.MM_returnValue = (errors == '');
}
function MM_validateForm_1() { //v0.2 ENGLISH ENGLISH ENGLISH
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm_1.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.id; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' has to be an emailaddress\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' must be a number\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' must be a number between '+min+' and '+max+'\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is required\n'; }
  } if (errors) alert('Following is not correct:\n\n'+errors);
  document.MM_returnValue = (errors == '');
}
function MM_validateForm_2() { //v0.2  DUTCH DUTCH DUTCH
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm_2.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.id; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' moet een emailadres zijn\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' moet een getal zijn\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' moet een getal zijn tussen '+min+' en '+max+'\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is verplicht\n'; }
  } if (errors) alert('De volgende fout heeft zich voorgedaan:\n\n'+errors);
  document.MM_returnValue = (errors == '');
}
//-->
<!-- Check same values
//v0.2  ENGLISH ENGLISH ENGLISH
function KREM_CheckValues_1() { //v1.0
		var errors='';
    if (document.Form_Profile.Password_Check.value!=document.Form_Profile.Password.value){
		 	errors ='- Passwords are not equal.\n';
			alert('Following is not correct:\n\n'+errors);
  document.MM_returnValue = (errors == '');}
  }
//v0.2  DUTCH DUTCH DUTCH
function KREM_CheckValues_2() { //v1.0
		var errors='';
    if (document.Form_Profile.Password_Check.value!=document.Form_Profile.Password.value){
		 	errors ='- De ingevoerde wachtwoorden komen niet overeen.\n';
			alert('De volgende fout heeft zich voorgedaan:\n\n'+errors);
  document.MM_returnValue = (errors == '');}
  }

//-->
<!-- Check Passwords
function Check_Password_1() { //v1.0
		var errors='';
    if (document.Form_Registration.Password_Check.value!=document.Form_Registration.Password.value){
		 	errors ='- Passwords are not equal.\n';
			alert('Following is not correct:\n\n'+errors);
  document.MM_returnValue = (errors == '');}
  }
function Check_Password_2() { //v1.0
		var errors='';
    if (document.Form_Registration.Password_Check.value!=document.Form_Registration.Password.value){
		 	errors ='- De ingevoerde wachtwoorden komen niet overeen.\n';
			alert('De volgende fout heeft zich voorgedaan:\n\n'+errors);
  document.MM_returnValue = (errors == '');}
  }

//-->

<!-- Complete year: when person types 2003, we make 1-1-2003
<!-- Set year to untill now: when person types uses checkbox, we make NULL
function checkTime(i)
{
if (i<10) 
  {i="0" + i}
  return i
}
function KREM_CompleteStartYear()
{
	var today=new Date();
	var h=today.getHours();
	var m=today.getMinutes();
	var s=today.getSeconds();
	m=checkTime(m);
	s=checkTime(s);
	frm=document.Form_Profile;
	frm.Start_Date_Year.value='1-1-'+frm.Start_Date.value+' '+h+':'+m+':'+s;
	}

//function KREM_CompleteEndYear() {
//frm=document.Form_Profile;
//	if(frm.Untill_Now.checked){
//		frm.End_Date.value='';
//		frm.End_Date.disabled=true;
//		frm.End_Date_Year.value='';}
//	else {
//		var today=new Date();
//		var h=today.getHours();
//		var m=today.getMinutes();
//		var s=today.getSeconds();
//		m=checkTime(m);
//		s=checkTime(s);
//		frm.End_Date_Year.value='1-1-'+frm.End_Date.value+' '+h+':'+m+':'+s;}
//	}
//function UntillNow() {
//var d=new Date()
//frm=document.Form_Profile;
//	if(frm.Untill_Now.checked){ 
//		frm.End_Date.value='';
//		frm.End_Date.disabled=true;
//		frm.End_Date_Year.value='';}
//	else {frm.End_Date.value=frm.Start_Date.value;
//		frm.End_Date.disabled=false;
//		}
//	}	
//function UntillNowCheck() {
//frm=document.Form_Profile
//	if(frm.End_Date.value==''){ 
//		//frm.Untill_Now.checked=true;
//		//frm.End_Date.disabled=true;
//		}
//	}

function UntillNowRegistration() {
var d=new Date()
frm=document.Form_Registration;
	if(frm.Untill_Now.checked){ 
		frm.End_Date.value='';
		frm.End_Date.disabled=true;
		frm.End_Date_Year.value='';}
	else {frm.End_Date.value=frm.Start_Date.value;
		frm.End_Date.disabled=false;}
	}
function UntillNowCheckRegistration() {
frm=document.Form_Registration
	if(frm.End_Date.value==''){ 
		frm.Untill_Now.checked=true;
		frm.End_Date.disabled=true;}
	}
function CompleteEndYearRegistration() {
frm=document.Form_Registration;
	if(frm.Untill_Now.checked){
		frm.End_Date.value='';
		frm.End_Date.disabled=true;
		frm.End_Date_Year.value='';}
	else {
		var today=new Date();
		var h=today.getHours();
		var m=today.getMinutes();
		var s=today.getSeconds();
		m=checkTime(m);
		s=checkTime(s);
		frm.End_Date_Year.value='1-1-'+frm.End_Date.value+' '+h+':'+m+':'+s;}
	}
//-->
<!--  Changes action in Form Profile update---> delete
function formCheck() { 
frm=document.Form_Profile
frm.MM_update.value="Delete"; 
} 
//--> 
<!--
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];}}
}
//-->
<!-- Prevent forms to be submitted/deleted by hitting ENTER
// Add onkeypress="return noenter()" to each TEXT field
function noenter() {
  return !(window.event && window.event.keyCode == 13); }
//-->
//<![CDATA[
function doenter() 
{
  return (window.event && window.event.keyCode == 13); 
}


document.onkeypress = function(e)
{
	if( !(/000.asp/i.test(document.URL)) )
	{						 
		e = e || window.event;
		if (typeof e != 'undefined')
		{
			var tgt = e.target || e.srcElement;
			if (typeof tgt != 'undefined' && /input/i.test(tgt.nodeName) && !(/submit/i.test(tgt.type)) && !(/Form_Search/i.test(tgt.form.id)) && !(/Search_Advanced_Form/i.test(tgt.form.id)) && !(/Form_Login/i.test(tgt.form.id)) )
			{
				if (e.keyCode) { code = e.keyCode; }
				else if (e.which) { code = e.which; }
				//return (typeof e.keyCode != 'undefined') ? e.keyCode != 13 : true;
				
				return (code == 13) ? false : true;
			}
		}
	}
}

//]]>


<!-- Check if year is an reasonable input
function checkYear(elementID,  compareToYear, comparison, required, taal)
{
	var errors = '';
	/* var taal = parseInt(getCookie('Language_ID') ? getCookie('Language_ID') : 0); */
	var errorMsg = new Array(	new Array(elementID+" is verplicht", elementID+" moet een getal zijn", elementID+" moet groter zijn dan "+compareToYear, elementID+" moet kleiner zijn dan "+compareToYear),
								new Array(elementID+" is required", elementID+" has to be a number", elementID+" has to be bigger than "+compareToYear, elementID+" has to be smaller than "+compareToYear)
							 );
							 
	/*						
	errorMsg[0][0] = elementID+" is verplicht";
	errorMsg[0][1] = elementID+" moet een getal zijn";
	errorMsg[0][2] = elementID+" moet groter zijn dan "+compareToYear;
	errorMsg[0][3] = elementID+" moet kleiner zijn dan "+compareToYear;
	
	errorMsg[1][0] = elementID+" is required";
	errorMsg[1][1] = elementID+" has to be a number";
	errorMsg[1][2] = elementID+" has to be bigger than "+compareToYear;
	errorMsg[1][3] = elementID+" has to be smaller than "+compareToYear;
	*/
	if(required)
	{
		if((document.getElementById(elementID).value).length == 0) 	{ errors = errorMsg[taal][0]; }
		else
		{ //we have input let's check it
			 if(isNaN(document.getElementById(elementID).value)) { errors = errorMsg[taal][1]; }
		   else 
		   {
			   if(document.getElementById(elementID).value < compareToYear && comparison == "bigger") { errors = errorMsg[taal][2];}
			   if(document.getElementById(elementID).value > compareToYear&& comparison == "smaller") { errors = errorMsg[taal][3]; }
		   }
			
		}
	}
	else
	{
		if((document.getElementById(elementID).value).length > 0)
		{ //we have input let's check it
		   if(isNaN(document.getElementById(elementID).value)) { errors = errorMsg[taal][1]; }
		   else 
		   {
			   if(document.getElementById(elementID).value < compareToYear && comparison == "bigger") { errors = errorMsg[taal][2]; }
			   if(document.getElementById(elementID).value > compareToYear&& comparison == "smaller") { errors = errorMsg[taal][3]; }
		   }
		}
	}
	if (document.MM_returnValue && errors != '' ) { alert(errors); document.MM_returnValue = false; }
}

//-->
<!-- XHR support function
//<![CDATA[
	var xhr_request = false;
	var fetch_limit = 10;
 function makeRequest(url, limit) 
 {
      xhr_request = false;
	  if(limit) { fetch_limit = limit; }
	  
      if (window.XMLHttpRequest)
	  { // Mozilla, Safari,...
         xhr_request = new XMLHttpRequest();
         if (xhr_request.overrideMimeType) 
		 {
            xhr_request.overrideMimeType('text/xml');
         }
      } 
	  else if (window.ActiveXObject) 
	  { // IE
         try 
		 {
            xhr_request = new ActiveXObject("Msxml2.XMLHTTP");
         } 
		 catch (e) 
		 {
            try 
			{
               xhr_request = new ActiveXObject("Microsoft.XMLHTTP");
            } catch (e) {}
         }
      }
	    
      if (!xhr_request) 
	  {
         alert('Cannot create XMLHTTP instance');
         return false;
      }
      xhr_request.onreadystatechange = processContents;
      xhr_request.open('GET', url, true);
      xhr_request.send(null);
   }

//]]>
//-->
