// ============================================FIETS_PREMIE======================================================


	aPCdata = new MakeArray(44);     // Postcode regio tabel
	var i=0;
	aPCdata[ i++] = new Regio( 1000, 1112, 1);
	aPCdata[ i++] = new Regio( 1115, 1115, 1);
	aPCdata[ i++] = new Regio( 1117, 1118, 1);
	aPCdata[ i++] = new Regio( 1120, 1121, 1);
	aPCdata[ i++] = new Regio( 1180, 1191, 1);
	aPCdata[ i++] = new Regio( 1440, 1448, 1);
	aPCdata[ i++] = new Regio( 1500, 1509, 1);
	aPCdata[ i++] = new Regio( 1800, 1827, 1);
	aPCdata[ i++] = new Regio( 2000, 2037, 1);
	aPCdata[ i++] = new Regio( 2050, 2051, 1);
	aPCdata[ i++] = new Regio( 2060, 2061, 1);
	aPCdata[ i++] = new Regio( 2130, 2135, 1);
	aPCdata[ i++] = new Regio( 2240, 2245, 1);
	aPCdata[ i++] = new Regio( 2270, 2275, 1);
	aPCdata[ i++] = new Regio( 2280, 2289, 1);
	aPCdata[ i++] = new Regio( 2300, 2334, 1);
	aPCdata[ i++] = new Regio( 2500, 2629, 1);
	aPCdata[ i++] = new Regio( 2700, 2728, 1);
	aPCdata[ i++] = new Regio( 3000, 3089, 1);
	aPCdata[ i++] = new Regio( 3100, 3125, 1);
	aPCdata[ i++] = new Regio( 3130, 3139, 1);
	aPCdata[ i++] = new Regio( 3300, 3329, 1);
	aPCdata[ i++] = new Regio( 3430, 3439, 1);
	aPCdata[ i++] = new Regio( 3500, 3585, 1);
	aPCdata[ i++] = new Regio( 3800, 3824, 1);
	aPCdata[ i++] = new Regio( 4800, 4839, 1);
	aPCdata[ i++] = new Regio( 5000, 5049, 1);
	aPCdata[ i++] = new Regio( 5200, 5237, 1);
	aPCdata[ i++] = new Regio( 5240, 5249, 1);
	aPCdata[ i++] = new Regio( 5600, 5657, 1);
	aPCdata[ i++] = new Regio( 5660, 5667, 1);
	aPCdata[ i++] = new Regio( 5670, 5674, 1);
	aPCdata[ i++] = new Regio( 6040, 6045, 1);
	aPCdata[ i++] = new Regio( 6130, 6137, 1);
	aPCdata[ i++] = new Regio( 6160, 6167, 1);
	aPCdata[ i++] = new Regio( 6200, 6229, 1);
	aPCdata[ i++] = new Regio( 6400, 6422, 1);
	aPCdata[ i++] = new Regio( 6500, 6546, 1);
	aPCdata[ i++] = new Regio( 6800, 6846, 1);
	aPCdata[ i++] = new Regio( 7500, 7548, 1);
	aPCdata[ i++] = new Regio( 8200, 8245, 1);
	aPCdata[ i++] = new Regio( 8900, 8938, 1);
	aPCdata[ i++] = new Regio( 9700, 9747, 1);

function MakeArray(n) {
    this.length = n;
    for (var i=0; i <= n; i++){
        this[i] = null;
    }
    return this
}

function Regio( vanpc, totpc, regio) {
  this.vanpc = vanpc;         // Vanaf pc
  this.totpc = totpc;         // Tot EN MET pc
  this.regio = regio;         // Regiocode
}

function Pc2Regio( pPc) {
  var vRegio = 2;              // Standaard regiocode
	//pPc = parseInt(pPc.substring(0,4));
  for ( i=0; i < (aPCdata.length - 1); i++) {
    if ((aPCdata[i].vanpc <= pPc) && (aPCdata[i].totpc >= pPc)) {
      vRegio = aPCdata[i].regio;
      i = ( aPCdata.length + 1);      // uit loop
    }
  }

  return vRegio
}

function GetPremie( pVerzBedrag, pRegioCode)
{
	var nAantal = 0;
	var nBasisPremie = 0;
	var nGetPremie = 0;
	var pPc = 2;
	var bContract = document.premie.contract[0].checked? true:false; 


	//Verzekerd bedrag
	nAantal = Math.ceil( ( (Math.ceil(pVerzBedrag)) / 50)) - 4;
	if (pRegioCode == 1){
		nBasisPremie = 35;
		if (!bContract)
		nBasisPremie = 80;
	  }
	else {
		nBasisPremie = 16;
		if (!bContract)
		nBasisPremie = 42;
 	}
	if (bContract){
		nGetPremie = ( nBasisPremie ) + (nAantal * ( pRegioCode == 1 ? 5 : 4));
	}
	else {
		nGetPremie = ( nBasisPremie ) + (nAantal * ( pRegioCode == 1 ? 10 : 8));
	}

	return nGetPremie;
}


function CalcPremie()
{
	var bOk=false;				//1
	var vPremie=0;				//2
	var vAankoop=0;				//3
	var vRegio=0;				//4
	var nAantal=0;				//5
	var nBasisPremie=0;			//6
	var nGetPremie=0;			//7
	var vVerzBedrag=0;			//8
	var vPolis = 3.5;			//10
	vVerzBedrag = parseInt( document.premie.verzbedrag.value );
	vPostcode = parseInt( document.premie.postcode.value) ;
	bOk = true;
	if ( !vPostcode > 0 )       { bOk = false; }
	if ( !vVerzBedrag > 0 )    { bOk = false; }
	if (!bOk) {
		document.premie.polistext.value = "Als u alle gegevens heeft ingevuld, komt hier de premie te staan.";
		return;       // Stop de berekening
	}

	vRegio = Pc2Regio( vPostcode);    // Regio code bepalen
	vPremie =  GetPremie( vVerzBedrag, vRegio);

	//**********************************************************  
	var vAssure = vPremie * .097; 	 
	var vTotal = vPremie + vAssure;
	document.premie.polistext.value = "Hier ziet u de premie voor uw Fietsverzekering.\n\n";
	if (document.premie.contract[0].checked) {
		document.premie.polistext.value += "Deze premie is gebaseerd op een contractduur van 1 jaar met stilzwijgende verlenging.\n\n"
	}
	else {
		document.premie.polistext.value += "Deze premie is gebaseerd op een contractduur van 3 jaar. Na 3 jaar stopt de verzekering.\n\n"
	}
	document.premie.polistext.value += "Verzekerde som € " + pad(formatcurrency(document.premie.verzbedrag.value),7) + "\t\t\t€ " + pad(formatcurrency(vPremie),9) + "\n";
	document.premie.polistext.value += "Assurantiebelasting\t\t\t\t€ " + pad(formatcurrency(vAssure),9) + "\n";
	document.premie.polistext.value += "--------------------------------------------------------------\n";
	document.premie.polistext.value += "Totaal\t\t\t\t\t\t€ " + pad(formatcurrency(vTotal),9) + "\n";
	document.premie.polistext.value += "\n\nDe poliskosten bedragen € 3.50 excl. 9,7% assurantiebelasting.";
	document.premie.vSum.value = formatcurrency(vTotal);
}

//postcode
function postcode_onchange()
{
	if (document.premie.postcode.value < 1000|| document.premie.postcode.value > 9999)
	{
		alert("U heeft een niet bestaande postcode ingevuld. Een juiste postcode bestaat uit 4 cijfers gevolgd door 2 letters.");
		(document.premie.postcode.value) =  "";
	}
	CalcPremie();
}

//aankoopbedrag
function verzbedrag_onchange()
{
	if (document.premie.verzbedrag.value < 250)
	{
	alert("De minimale premie wordt berekend over Euro 250,-");
	(document.premie.verzbedrag.value) =  250;
	}
	if (document.premie.verzbedrag.value > 5000)
	{
		alert("Het te verzekeren bedrag is maximaal Euro 5000,- , informeer voor mogelijkheden en premies bij hogere bedragen!");
		(document.premie.verzbedrag.value) =  "";
	}
	CalcPremie();
}
