// Java-Script Algemeen: Formulieren
// Author: Jo Ampe 		Januari '2000. 
//**************************************************************** 
//Log of changes: 
//   27 Feb 00 - Fix initialization
//   26 Mrt 00 - Checks if given email address is of valid syntax
//   26 Mrt 00 - new var EmailOk
//   26 Mrt 00 - Messages with example
//   01 jan 11 - aanpassing steun van 30 naar 40 euro
//       
 
// Variabelen
var bIngezonden     = false;
var bLid            = false;
var bAttest         = false;
var sAttest         = ""
var bEmailOk        = false
var sBrowserName	= navigator.appName;
var	sBrowserVersion = parseInt(navigator.appVersion);
var	bBrowserOK 		= true

var aLidgeldType    = new Array("(Kies een type lidgeld)", "Geen Lid", "Reeds Lid", "Gewoon lid 17 euro", "Beschermend lid 57 euro", "Steun zonder lid vanaf 40 euro");
var aLidgeld		= new Array(0, 0, 0, 17, 57, 0);
var aSteun			= new Array(0, 0, 0, 0, 40, 0);
var bLidgeld        = new Array(false, false, false, true, true, false );
var bAttest         = new Array(false, false, false, false, true, true );
var iCounter		= 6
var iSteun			= 0

function Openen(){
	if ((sBrowserName == "Netscape" ) || (sBrowserName == "Opera" && sBrowserVersion<=3)) {
        (alert("Het is mogelijk dat uw Browser de berekende velden niet correct invuld." +
		"\n\Overschrijf zo nodig de waarden."));
		bBrowserOK = false
	}
	Bereken();
}

function Weggaan() {   
    if (bIngezonden == false) {
        //   (alert("Jammer dat u zich niet inschreef. Misschien een volgende keer ?"));
    }
}

function Browser(){   
	document.forms[0].elements[0].value = navigator.appName + " " + navigator.appVersion
}  

function Aanmelden(){
    Bereken()
    
   	if (document.invoer.VoorNaam.value == "") {
   	    alert("U bent vergeten uw voornaam in te vullen!\n\nbv. Marie-Jeanne");
		document.invoer.VoorNaam.focus();
	}
    else {
	    if (document.invoer.Naam.value == "") {
    		alert("U bent vergeten uw naam in te vullen!\n\nbv. Brusselmans");
	    	document.invoer.Naam.focus();
        }
    	else {
	        if (document.invoer.Straat.value == "") {
		        alert("U bent vergeten uw straat en huisnummer in te vullen!\n\nbv. Brusselsesteenweg 14 bus 5");
			    document.invoer.Straat.focus();
    		}
	        else {
		        if (document.invoer.Postcode.value == "") {
			        alert("U bent vergeten uw postcode in te vullen!\n\nbv. 3030");
				    document.invoer.Postcode.focus();
      	    	}
	    		else {
		    		if (document.invoer.Gemeente.value == "") {
			    		alert("U bent vergeten uw gemeente in te vullen!\n\nbv. Tienen");
				    	document.invoer.Gemeente.focus();
    				}
	    			else {
		    			if (document.invoer.Land.value == "") {
			    			alert("U bent vergeten uw land in te vullen!\n\nbv. Nederland");
				    		document.invoer.Land.focus();
    					}
    	    			else {
        			    	if ((document.invoer.FormTotaal.value <= "0") && (document.invoer.Commentaar.value == "")) {
    		    				alert("U bent vergeten iemand lid te maken of iets te bestellen!"
								+ "\nHet totaal te betalen bedrag is 0.");
	   			    			document.invoer.LidgeldType.focus();
	    			    	}
	    			    	else {
    	    	    			if (document.invoer.EmailFrom.value > " ") {
                	    			IsEmailValid(0,"EmailFrom");
									//document.invoer.EmailFrom.value = document.invoer.email.value;
   	       	    	    		}
                                
    	    			    	else {
                                    bEmailOk = true;
                                }
       	    	    			if (bEmailOk) {
                                    window.status="Gegevens worden verzonden.  Een ogenblik a.u.b.";
	    		    				document.forms[0].submit();
		    		    			bIngezonden= true;
    			    			}
			    			}
				    	}
    				}
	    		}
		    }
    	}
    }
}

function Bereken() {
	//  Indien netscape
	if (bBrowserOK == true) {
		BerekenIE();
	}
}

function BerekenIE() {
    // Initialisatie
    window.status	= "Berekening lidgelden en betalingen.  Een ogenblik a.u.b."
    bLid            = false;
    bAttest         = false;

    var TempEur = 0.00;

    // Berekening lidgeld
//	alert("Begin berekening lidgeld");
	for (var i = 0; i < iCounter ; i++) {
        if (document.invoer.LidgeldType.value == aLidgeldType[i]) {
   	        document.invoer.FormLidgeld.value = fixIt(aLidgeld[i]);
           	document.invoer.Lidgeld.value = fixIt(aLidgeld[i]);
           	iSteun	= fixIt(aSteun[i]);
            bLid    = bLidgeld[i];
   	        bAttest = bAttest[i];
       	    i = 99;
        }
   	}

    // Steun
//    if (bAttest == true) {
//        TempEur = 40.00;
//    }
//    else {
//        TempEur = 0.00;
//    }        

    document.invoer.FormTotaalSteun.value = iSteun + fixIt(document.invoer.ExtraSteun.value);
    document.invoer.TotaalSteun.value = fixIt(document.invoer.FormTotaalSteun.value);

    if (document.invoer.TotaalSteun.value >= 40) {    
        document.invoer.FormAttest.value = "U ontvangt een attest voor " + (fixIt(document.invoer.TotaalSteun.value)) + " euro";
    }
    else {
        document.invoer.FormAttest.value = "Vanaf 40 euro ontvangt u een attest";
    }

    // Totaal te betalen

    document.invoer.Totaal.value = (fixIt(  fixIt(document.invoer.FormLidgeld.value) 
                                                + fixIt(document.invoer.TotaalSteun.value))
//                                                + " Eur"
                                              );
    document.invoer.FormTotaal.value = document.invoer.Totaal.value;
    
    // Afsluiten berekening    
    window.status="Vul het formulier in en druk op Aanmelden";


}

// Afrondingen voor Euro
function fixIt(num) {
	return(Math.round(num*100)/100);
}


// -----------------------------------------------------------------
// Function    : IsEmailValid
// Language    : JavaScript
// Description : Checks if given email address is of valid syntax
// Copyright   : (c) 1998 Shawn Dorman
// http://www.goodnet.com/~sdorman/web/IsEmailValid.html
// -----------------------------------------------------------------
// Ver    Date    Description of modification
// --- ---------- --------------------------------------------------
// 1.0 09/04/1996 Original write
// 1.1 09/30/1998 CHG: Use standard header format
// -----------------------------------------------------------------
// Source: Webmonkey Code Library
// (http://www.hotwired.com/webmonkey/javascript/code_library/)
// -----------------------------------------------------------------

function IsEmailValid(FormName,ElemName)
{
//var bEmailOk  = true
var Temp     = document.forms[FormName].elements[ElemName]
var AtSym    = Temp.value.indexOf('@')
var Period   = Temp.value.lastIndexOf('.')
var Space    = Temp.value.indexOf(' ')
var Length   = Temp.value.length - 1   // Array is from 0 to length-1

if ((AtSym < 1) ||                     // '@' cannot be in first position
    (Period <= AtSym+1) ||             // Must be atleast one valid char btwn '@' and '.'
    (Period == Length ) ||             // Must be atleast one valid char after '.'
    (Space  != -1))                    // No empty spaces permitted
   {  
      bEmailOk = false
//      alert('Please enter a valid e-mail address!')
      alert('U hebt een ongeldig e-mail adres ingevoerd!\n\nbv. jan.vantongeren@mijnprovider.be')
      Temp.focus()
   }
else 
    {
    bEmailOk = true
    }
//return bEmailOk
return 
}

function ExtraSteun(){
    (alert	("Indien U de VRL vzw extra wil steunen ontvangt U een attest voor belastingsvermindering "
		+	"van het gestorte bedrag boven 40 euro, exclusief het lidgeld 17 euro"
		+	"in overeenstemming met de Belgische wetten en besluiten."
		+	"\n\Het attest wordt u toegezonden in het begin van het volgend jaar."
		+	"\n\n\In naam van de patiënten danken wij U bij voorbaat."
			));
}