/* Document Information -----------------------------------------------------------------------------------------------------------------

Title			: handelingen.js
Author		: René van Wingerden
Email			: r.van.wingerden@stratusbv.nl

Company	: Stratus BV
Website		: www.stratusbv.nl

Modification Log:

Name		Date					Description
=========================================================================================
RWI			17-07-2008		Ontwikkeld

------------------------------------------------------------------------------------------------------------------------------------------- */

// popupscherm(en)...
	function NewWindow(mypage,myname,w,h,scroll)
	{
		LeftPosition = (screen.width) ? (screen.width-w)/2 : 0;
		TopPosition = (screen.height) ? (screen.height-h)/2 : 0;
		settings = 'height='+h+',width='+w+',top='+TopPosition+',left='+LeftPosition+',scrollbars='+scroll+''
		win = window.open(mypage,myname,settings)
	}

// jump-menu voor het kiezen van een jaar...
	function MM_jumpMenu(targ,selObj,restore)
	{ //v3.0
		eval(targ +".location='"+ selObj.options[selObj.selectedIndex].value +"'");
		if (restore) selObj.selectedIndex = 0;
	}

// alleen een geheel getal...
	function CalcKeyWhole(aChar)
	{
		var character = aChar.substring(0,1);
		var code = aChar.charCodeAt(0);
		return code;
	}
	function checkNrWhole(val)
	{
		var strPass = val.value;
		var strLength = strPass.length;
		var lchar = val.value.charAt((strLength) - 1);
		var cCode = CalcKeyWhole(lchar);
		
		if (cCode != 45 && cCode != 48 && cCode != 49 && cCode != 50 && cCode != 51 && cCode != 52 && cCode != 53 && cCode != 54 && cCode != 55 && cCode != 56 && cCode != 57)
		{
			var myNumber = val.value.substring(0, (strLength) - 1);
			val.value = myNumber;
		}
		return false;
	}