function checkForm(formobj)
{
  var returnvalue;
  returnvalue = true;

  //doorloop alle elementen
  for(i=0; i<formobj.elements.length; i++)
  {
    obj = formobj.elements(i);   //get form element
    pat = obj.pattern;           //get element pattern
    val = obj.value;             //get element value

    //data veld? -> dan controle en evt.
    //achtergrond aapassen
    if(pat)
    {

      // Is dit veld verplicht?
      fieldcorrect=true;
      if (pat.search('VERPLICHT')>=0) {
        //radio input?
        if (obj.type=='radio')
        {
          //default false
   				fieldcorrect=false;
          //radio element
          //doorloop alle elementen en kijk of er 
          //een gelijknamig element
          var x, y;
          x = obj;
          for(j=0; j<formobj.elements.length; j++)
          {
            y = formobj.elements(j);   //get form element
            if (x.name == y.name)
            {
              //gelijknamig element; checked?
              if(x.checked || y.checked)
         				fieldcorrect=true;
            }
          }
        }
        else
        {
          //standaard element
          if (val=='')
    				fieldcorrect=false;
        }
			}
      
			// Controle op lengte van veld
			if (pat.search('MINLENGTE')>=0) {
        /* zoek max lengte van veld uit pattern */
        var naarRechts, patternLength
        naarRechts = pat.substring(pat.search('MINLENGTE')+10, 1000)
        patternLength = naarRechts.substring(0, naarRechts.search(']') )

        if (val.length < patternLength) {
  				fieldcorrect=false;
				}
			}

			// Is dit een datum veld?
			if ( (pat.search('DATUM')>=0) && (!checkDate(val)) ) {
				fieldcorrect=false;
			}
			
			// Is dit een man/vrouw veld?
      if ( (pat.search('MV')>=0) && (val!='m') && (val!='v') && (val!='') && (val!=' ')  ) {
				fieldcorrect=false;
			}

			// Is dit een numeriek veld?
			if ( (pat.search('NUMERIEK')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isGeldigDecimaalGetal(val)) {
						fieldcorrect=false;
					}
				}
			}
			
			// Is dit een "Kamer van Koophandel nummer" veld?
			if ( (pat.search('KVKNR')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isValidKvKnr(val)) {
						fieldcorrect=false;
					}
				}
			}
			
			// Is dit een bankrekeningnummer veld?
			if ( (pat.search('BANKREKENING')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isGeldigBankrekeningNummer(val)) {
						fieldcorrect=false;
					}
				}
			}
			
			// Is dit een kenteken veld voor Nederland?
			if ( (pat.search('KENTEKEN-NL')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isValidKenteken_NL(val)) {
						fieldcorrect=false;
					}
				}
			}
			
			// Is dit een tijd veld?
			if ( (pat.search('TIJD-HHMM')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isValidTijdHHMM(val)) {
						fieldcorrect=false;
					}
				}
			}
			
			// Is dit een BTW nummer veld voor Nederland?
			if ( (pat.search('BTWNUMMER-NL')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isValidBTWnummer_NL(val)) {
						fieldcorrect=false;
					}
				}
			}
		
			// Is dit veld een telefoonnummer?
			if ( (pat.search('TELEFOONNUMMER')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isValidTelefoonnummer(val)) {
						fieldcorrect=false;
					}
				}
			}

			// Is dit veld een Nederlandse postcode ?
			if ( (pat.search('POSTCODE-NL')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isValidPostcode_NL(val)) {
						fieldcorrect=false;
					}
				}
			}
			
			// Is dit veld een geldig emailadres ?
			if ( (pat.search('EMAIL')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isValidEmail(val)) {
						fieldcorrect=false;
					}
				}
			}

			// Is dit veld een geldig emailadres ?
			if ( (pat.search('URL-WEBSITE')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isValidWebsiteURL(val)) {
						fieldcorrect=false;
					}
				}
			}

			// Is dit veld een geldig sofinummer ?
			if ( (pat.search('SOFINUMMER')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isValidSofinummer(val)) {
						fieldcorrect=false;
					}
				}
			}

			// Is dit veld een geldig geldbedrag ?
			if ( (pat.search('GELDBEDRAG')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!isValidGeldbedrag(val)) {
						fieldcorrect=false;
					}
				}
			}
			
			// Is dit veld een geldig opmerkingen veld ?
			if ( (pat.search('TEXTAREA')>=0) ) {
	      if (pat.search('MAXLENGTH-250')>=0) {
					// Het veld mag niet meer dan 250 tekens bevatten...
					if (val.length >= 250) {
						fieldcorrect=false;
					}
				}
	      if (pat.search('MAXLENGTH-1000')>=0) {
					// Het veld mag niet meer dan 1000 tekens bevatten...
					if (val.length >= 1000) {
						fieldcorrect=false;
					}
				}
	      if (pat.search('MAXLENGTH-2000')>=0) {
					// Het veld mag niet meer dan 2000 tekens bevatten...
					if (val.length >= 2000) {
						fieldcorrect=false;
					}
				}
	      if (pat.search('MAXLENGTH-2500')>=0) {
					// Het veld mag niet meer dan 2500 tekens bevatten...
					if (val.length >= 2500) {
						fieldcorrect=false;
					}
				}
	      if (pat.search('MAXLENGTH-5000')>=0) {
					// Het veld mag niet meer dan 5000 tekens bevatten...
					if (val.length >= 5000) {
						fieldcorrect=false;
					}
				}
			}
			
			// Is dit een jaar veld?
			if ( (pat.search('JAAR')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!(val>1900 && val<2030)) {
						fieldcorrect=false;
					}
				}
			}
		
			// Is dit een weeknummer veld?
			if ( (pat.search('WEEK-NR')>=0) ) {
	      if ((val!='')) {
					// Veld is NIET leeg --> waarde moet geldig zijn...
					if (!(val>0 && val<54)) {
						fieldcorrect=false;
					}
				}
			}
			
			// Is het veld correct ingevuld?
			if (fieldcorrect) {
				// JA
        if ( (obj.type=='radio') || (obj.type=='checkbox') ) {
					obj.style.backgroundColor='#8C2C52'; // Dit moet de achtergrondkleur van het formulier zijn!
					obj.style.color='#000000';
				} else {
					obj.style.backgroundColor='#FFFFFF';
					obj.style.color='#000000';
				}
			} else {
				// NEE
				// Maak de achtergrondkleur rood...
				obj.style.backgroundColor='#FF0000';
				obj.style.color='#FFFFFF';
				returnvalue = false;
      }

    }//end if(pat)

  }//end for(i..)

  //return value
  if(!returnvalue) {
    alert('Het formulier is niet juist ingevuld. Herstel de rode velden.');
	}
  return returnvalue;
}



function checkDate(d) {
	if (d=='') {
		// return ok als veld leeg is
		return true;
	} else {
		//zoek eerste '-'
		p1 = d.search('-');
		if (p1==-1) {
			return false
		} else {
			//zoek tweede '-'
			rest = d.substr(p1+1);
			p2 = rest.search('-');
			if (p2==-1) {
				return false;
			} else {
				
				//get day month year
				a = d.split('-');
				day = parseInt(a[0].replace('0',''));
				month = parseInt(a[1].replace('0',''));
				year = parseInt(a[2]);
				
				//check domain of day, month and year
				if (day>0 && day<32 && month>0 && month<13 && year>1900 && year<2030) {
					var no_of_days_in_month = new Array(0,31,28,31,30,31,30,31,31,30,31,30,31);
					
					// afhandeling februari, i.v.m. schrikkeljaren.
					// Schrikkeljaar: 
					// Volgens de Gregoriaanse kalender is dit een jaar met 366 dagen.
					// Elk vierde jaar is een schrikkeljaar, behalve de eeuwjaren, die niet door 400 deelbaar zijn.
					if (month == 2) {
						if ( (year%4==0 && year%100 != 0) || year%400 == 0 ) {
							// Dit is een schrikkeljaar, dus 29 februari bestaat!
							no_of_days_in_month[month]=29;
						}
					}
					
					// Geldige dag ingevoerd?
					if (day >= 1 && day <= no_of_days_in_month[month]) {
						// JA!
						return true;
					} else {
						// NEE!
						return false;
					}
				} else {
					return false;
				}
			}
		}
	}
}       



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : prototypes voor string trim functies.
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
String.prototype.trim  = function () { return this.ltrim().rtrim() }
String.prototype.ltrim = function () { return this.replace(/^\s+/g, "") }
String.prototype.rtrim = function () { return this.replace(/\s+$/g, "") }



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer Kamer van Koophandel (KvK) nummer.
'#  Voorwaarden : - niet leeg
'#                - numeriek
'#                - lengte 8
'#  Arg         : strInput ::= String met KvKnr.
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isValidKvKnr(strInput) {

	// leeg?
	if (strInput == '') {
		return false;
	}
	
	// Niet leeg, dan trimmen...
	strInput = strInput.trim();

	// niet numeriek?
  if (isNaN(strInput)) {
		return false;
	}

	// lengte niet 8 ?
  if (strInput.length != 8) {
		return false;
	}
	
	// alles OK...
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer NEDERLANDS kenteken
'#  Voorwaarden : - niet leeg
'#                - format XX-XX-XX
'#  Arg         : strInput ::= String met kenteken.
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isValidKenteken_NL(strInput) {
	// leeg?
	if (strInput == '') {
		return false;
	}
	
	// Niet leeg, dan trimmen...
	strInput = strInput.trim();

	// lengte niet 8 ?
  if (strInput.length != 8) {
		return false;
	}
	
	// Streepjes op de goede plaats?
	if ( (strInput.charAt(2) != '-') 
		|| (strInput.charAt(5) != '-') ) {
		return false;
	}
	
	// Rest van de tekens is een character?
	if (	(!isChar(strInput.charAt(0)))
		 ||	(!isChar(strInput.charAt(1)))
		 ||	(!isChar(strInput.charAt(3)))
		 ||	(!isChar(strInput.charAt(4)))
		 ||	(!isChar(strInput.charAt(6)))
		 ||	(!isChar(strInput.charAt(7))) ) {
		return false;
	}
	
	// alles OK...
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer BTW nummer
'#  Voorwaarden : - niet leeg
'#                - voorbeeld: NL8099.07.410.B01
'#  Arg         : strInput ::= String met BTW nummer.
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isValidBTWnummer_NL(strInput) {
	// leeg?
	if (strInput == '') {
		return false;
	}
	
	// Niet leeg, dan trimmen...
	strInput = strInput.trim();

	// lengte niet goed ?
  if (strInput.length != 17) {
		return false;
	}
	
	// Alle tekens correct?
	if (	( (strInput.charAt(0) != 'N') && (strInput.charAt(0) != 'n') )
		 ||	( (strInput.charAt(1) != 'L') && (strInput.charAt(1) != 'l') )
		 ||	(isNaN(strInput.charAt(2)))
		 ||	(isNaN(strInput.charAt(3)))
		 ||	(isNaN(strInput.charAt(4)))
		 ||	(isNaN(strInput.charAt(5)))
		 ||	(strInput.charAt(6) != '.')
		 ||	(isNaN(strInput.charAt(7)))
		 ||	(isNaN(strInput.charAt(8)))
		 ||	(strInput.charAt(9) != '.')
		 ||	(isNaN(strInput.charAt(10)))
		 ||	(isNaN(strInput.charAt(11)))
		 ||	(isNaN(strInput.charAt(12)))
		 ||	(strInput.charAt(13) != '.')
		 ||	( (strInput.charAt(14) != 'B') && (strInput.charAt(14) != 'b') )
		 ||	(isNaN(strInput.charAt(15)))
		 ||	(isNaN(strInput.charAt(16))) ) {
		return false;
	}
	
	// alles OK...
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer sofinummer
'#  Voorwaarden : - niet leeg
'#                - voorbeeld: 1111.11.111
'#  Arg         : strInput ::= String met sofinummer.
'#  Returnvalue : boolean
'#  history     : jan 2003 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isValidSofinummer(strInput) {
	// leeg?
	if (strInput == '') {
		return false;
	}
	
	// Niet leeg, dan trimmen...
	strInput = strInput.trim();

	// lengte niet goed ?
  if (strInput.length != 11) {
		return false;
	}
	
	// Alle tekens correct?
	if (	(strInput.charAt(4) != '.')
		 ||	(strInput.charAt(7) != '.')
		 ||	(isNaN(strInput.charAt(0)))
		 ||	(isNaN(strInput.charAt(1)))
		 ||	(isNaN(strInput.charAt(2)))
		 ||	(isNaN(strInput.charAt(3)))
		 ||	(isNaN(strInput.charAt(5)))
		 ||	(isNaN(strInput.charAt(6)))
		 ||	(isNaN(strInput.charAt(8)))
		 ||	(isNaN(strInput.charAt(9)))
		 ||	(isNaN(strInput.charAt(10))) ) {
		return false;
	}
	
	// alles OK...
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : Is het argument een letter [a-z,A-Z]?
'#  Arg         : sChar ::= character dat moet worden gecontroleerd
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isLetter(sChar) {
	if ( (sChar>="a" && sChar<="z") || (sChar>="A" && sChar<="Z") ) {
		return true;
	} else {
		return false;
	}
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : Is het argument character [a-z,A-Z,0-9]?
'#  Arg         : sChar ::= character dat moet worden gecontroleerd
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isChar(sChar) {
	if ((sChar>="a" && sChar<="z") || (sChar>="A" && sChar<="Z") || (sChar>="0" && sChar <="9")) {
		return true;
	} else {
		return false;
	}
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer telefoonnummer
'#  Arg         : strInput ::= String met telefoonnummer.
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isValidTelefoonnummer(strInput) {

	// leeg?
	if (strInput == '') {
		return false;
	}
	
	// Niet leeg, dan trimmen...
	strInput = strInput.trim();

	for( iCounter=0 ; iCounter<strInput.length ; iCounter++) {
		if ( (!isDecimaalGetal(strInput.charAt(iCounter)))
			&& (strInput.charAt(iCounter) != '+')
			&& (strInput.charAt(iCounter) != '-')
			&& (strInput.charAt(iCounter) != '(')
			&& (strInput.charAt(iCounter) != ')')
			&& (strInput.charAt(iCounter) != ' ') ) {
			return false;
		}
	}

	// alles OK...
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer Nederlandse postcode
'#  Arg         : strInput ::= String met postcode.
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isValidPostcode_NL(strInput) {
	// leeg?
	if (strInput == '') {
		return false;
	}
	
	// Niet leeg, dan trimmen...
	strInput = strInput.trim();

	// lengte niet goed ?
  if (strInput.length != 6) {
		return false;
	}
	
	// Eerst 4 cijfer?
	if (	(isNaN(strInput.charAt(0)))
		 ||	(isNaN(strInput.charAt(1)))
		 ||	(isNaN(strInput.charAt(2)))
		 ||	(isNaN(strInput.charAt(3))) ) {
		return false;
	}

	// Dan 2 letters?
	if (	(!isLetter(strInput.charAt(4)))
		||	(!isLetter(strInput.charAt(5))) ) {
		return false;
	}

	// alles OK...
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer emailadres
'#  Arg         : strInput ::= String met emailadres.
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isValidEmail(strInput)
{

	// leeg?
	if (strInput == '') {
		return false;
	}
	
	// Niet leeg, dan trimmen...
	strInput = strInput.trim();

	// Maak reguliere expressie voor emailadres...
	var filter  = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9])+$/;
	if (!filter.test(strInput)) {
		return false;
	}
	
	// alles OK...
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer URL voor website
'#  Arg         : strInput ::= String met URL
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isValidWebsiteURL(strInput)
{

	// leeg?
	if (strInput == '') {
		return false;
	}
	
	// Niet leeg, dan trimmen...
	strInput = strInput.trim();

	// Maak reguliere expressie voor emailadres...
	var filter  = /(http|https)(:\/{2}[\w]+)([\/|\.]?)([\S]*)/i;
	if (!filter.test(strInput)) {
		return false;
	}
	
	// alles OK...
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer tijd in format HH:MM
'#  Arg         : strInput ::= String met emailadres.
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isValidTijdHHMM(strInput) {

	// leeg?
	if (strInput == '') {
		return false;
	}
	
	// Niet leeg, dan trimmen...
	strInput = strInput.trim();
	
	// lengte niet goed ?
  if (strInput.length != 5) {
		return false;
	}
	
	if (strInput.charAt(2) != ':') {
		return false;
	}

	// split in uren en minuten
	arrTijd = strInput.split(':');
	intUren			=	arrTijd[0].replace('0','');
	intMinuten	=	arrTijd[1].replace('0','');
	
	if ( (isNaN(intMinuten)) || (isNaN(intUren)) ) {
		return false;
	}

	if (intUren<0 || intUren>23) {
		return false;
	}
	if (intMinuten<0 || intMinuten>59) {
		return false;
	}

	// alles OK...
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : Is het argument een decimaal nummer [0-9]?
'#  Arg         : strGetal ::= character dat moet worden gecontroleerd
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'--------------------------------------------------------------------------------------------------
*/
function isDecimaalGetal(strGetal) {
	var allowed = '0123456789';
	for (var i=0; i< strGetal.length; i++) {
		if (allowed.indexOf(strGetal.charAt(i)) == -1) {
			return false;
		}
	}
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer tijd in format HH:MM
'#  Arg         : strInput ::= String met emailadres.
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'#  Voorbeeld geldige waarden:
'#    1000000
'#    1000000,25
'#  Voorbeeld ONGELDIGE waarden:
'#  1.000.000,00
'#  1.000.000,25
'#  1.000.000,-
'#  1.000.000,--
'--------------------------------------------------------------------------------------------------
*/
function isValidGeldbedrag(strInput) {
	// leeg?
	if (strInput == '') {
		return false;
	}

	// zoek een punt in het bedrag.
	if (strInput.indexOf('.') != -1) {
		// punt gevonden --> ongeldig
		return false;
	}
		
	// zoek een komma in het bedrag.
	intPositieKomma = strInput.indexOf(',');
	if (intPositieKomma == -1) {
		// geen komma gevonden.
		
		if (isNaN(strInput)) {
			// strInput is niet numeriek --> ongeldig.
			return false;
		} else {
			// strInput was al numeriek --> geldig.
			return true;
		}
	} else if (intPositieKomma == (strInput.length-1-2)) {
		// WEL een komma gevonden.
		// Is het EEN komma? (is de eerste komma ook de laatste?)
		if (strInput.indexOf(',') != strInput.lastIndexOf(',')) {
			// meer dan EEN komma gevonden...
			return false;
		} else {
			// split in getal voor de komma en getal na de komma.
			arrBedrag = strInput.split(',');
			strVoorKomma		=	arrBedrag[0];
			strAchterKomma	=	arrBedrag[1];
			
			// Voor en achter de komma een number?
			if (isNaN(strVoorKomma) || isNaN(strAchterKomma) ) {
				return false;
			}
			
			// Getal achter de komma niet negatief?
			if (strAchterKomma<0) {
				return false;
			}
			
		}
	} else {
		return false;
	}

	// alles OK...
	return true;
}



/*
'-Function Header----------------------------------------------------------------------------------
'#  Description : valideer tijd in format HH:MM
'#  Arg         : strInput ::= String met emailadres.
'#  Returnvalue : boolean
'#  history     : jul 2002 - created - Adriaan Hogenstijn
'#  Voorbeeld geldige waarden:
'#    1000000
'#    1000000,25
'#  Voorbeeld ONGELDIGE waarden:
'#  1.000.000,00
'#  1.000.000,25
'#  1.000.000,-
'#  1.000.000,--
'--------------------------------------------------------------------------------------------------
*/
function isGeldigDecimaalGetal(strInput) {
	// leeg?
	if (strInput == '') {
		return false;
	}

	// zoek een punt in het bedrag.
	if (strInput.indexOf('.') != -1) {
		// punt gevonden --> ongeldig
		return false;
	}
		
	// zoek een komma in het bedrag.
	intPositieKomma = strInput.indexOf(',');
	if (intPositieKomma == -1) {
		// geen komma gevonden.
		if (isNaN(strInput)) {
			// strInput is niet numeriek --> ongeldig.
			return false;
		} else {
			// strInput was al numeriek --> geldig.
			return true;
		}
	} else {
		// WEL een komma gevonden.
		// Is het EEN komma? (is de eerste komma ook de laatste?)
		if (strInput.indexOf(',') != strInput.lastIndexOf(',')) {
			// meer dan EEN komma gevonden...
			return false;
		} else {
			// split in getal voor de komma en getal na de komma.
			arrBedrag = strInput.split(',');
			strVoorKomma		=	arrBedrag[0];
			strAchterKomma	=	arrBedrag[1];
			
			// Voor en achter de komma een number?
			if (isNaN(strVoorKomma) || isNaN(strAchterKomma) ) {
				return false;
			}
			
			// Getal achter de komma niet negatief?
			if (strAchterKomma<0) {
				return false;
			}
			
		}
	}

	// alles OK...
	return true;
}



/*
Dit algoritme wordt gebruikt voor controle van een bankrekeningnummer en wordt ook wel de elfproef genoemd. 
Een bankrekeningnummer bestaat uit 9 cijfers 
(van links naar rechts) 
Vermenigvuldig het 1e cijfer met 9 
Vermenigvuldig het 2e cijfer met 8 
Vermenigvuldig het 3e cijfer met 7 
Vermenigvuldig het 4e cijfer met 6 
Vermenigvuldig het 5e cijfer met 5 
Vermenigvuldig het 6e cijfer met 4 
Vermenigvuldig het 7e cijfer met 3 
Vermenigvuldig het 8e cijfer met 2 
Vermenigvuldig het 9e cijfer met 1 
Tel de uitkomsten bij elkaar op en neem daar de modulo 11 van 
De uitkomst moet 0 zijn 

LET OP:
WERKT NIET BIJ POSTBANK REKENINGEN!!!
*/

function isGeldigBankrekeningNummer(intnumber){ 
	
	/* Maak sommige hoofd-variabelen */ 
	var intlength = intnumber.length;
	var inttotal = 0; 
	var intcount = 9; 
	
	
	/* Controleer of het nummer een andere lengte heeft dan 9 tekens. 
	   Als dit het geval is geef dan een error melding en stop het script. */ 
	if (intlength != 9){ 
		return false;
	} 
	
	/* Maak een loop om elk afzonderlijk cijfer uit het hele nummer te halen. 
	   En vermeenvuldig het met intcount (Deze begint bij 9 en loopt af.) */ 
	for(inti=0 ; inti<intlength ; inti++){ 
		
		var intnumber_temp = intnumber.charAt(inti); 
		
		
		inttotal = inttotal + intnumber_temp * intcount; 
		
		
		intcount--; 
	} 
	
	/* Kijk of de som (inttotal) van alle cijfers in het nummer deelbaar is door 11. 
	   Hier mag ook geen cijfer achter de komma uitkomen! */ 
	if (inttotal % 11 == 0){
		return true;
	} else {
		return false;
	}
} 
