/*
  Javascript-Bestand voor Bereikbaarheidskaart
  Copyright 2008 Goudappel Coffeng, Deventer, Netherlands (Bsd)
*/

// --------------------------------
// globale variabelen
// --------------------------------

var map, dragControl, dragControl;
var mapnik; 
var selectcontrol;
var vectors;
var projGoogle;
var projWGS84;
var projRD;
var style_type=new Array();

var global_rechten = 0;
var global_gebruiker = "";
var global_pw = "";
var global_SID = "";

var global_tabelinhoud = "";
var global_tabelzichtbaar = true;
var global_legendainhoud = "";
var global_legendazichtbaar = true;
var global_ScenarioLegenda = "";

var SubmenuVerander="";


var InfoMenuHoogte = 0;  
var Tabellen = new Array();
var Geoitems = new Array();
var Groepitems = new Array();
var Locatiezoeker_Eigendata = new Array();
var ID = "";

var nieuwekaartWMS1,nieuwekaartWMS2;


// ---------------------
function init()
// ---------------------
{
  if (AktMenu==1 || AktMenu==2 || AktMenu==4 || AktMenu==5) Hoofdmenu = AktMenu;
  

  projGoogle = new OpenLayers.Projection("EPSG:900913"); // 4326
  projWGS84 = new OpenLayers.Projection("EPSG:4326"); //
  projRD = new OpenLayers.Projection("EPSG:28992"); //
  OpenLayers.IMAGE_RELOAD_ATTEMPTS = 3;
  OpenLayers.Util.onImageLoadErrorColor = "transparent";

var proj = new OpenLayers.Projection("EPSG:900913"); // 4326

  var options = {
    projection: new OpenLayers.Projection("EPSG:900913"),
    displayProjection: new OpenLayers.Projection("EPSG:4326"),
    units: "m",
    numZoomLevels: 18,
    maxResolution: 156543.0339,
    maxExtent: new OpenLayers.Bounds(-20037508, -20037508,20037508, 20037508.34), 
    restrictedExtent: new OpenLayers.Bounds(380000, 6500000,840000, 7150000), 
    eventListeners: {"changebaselayer": resizeMap }
  };

  map = new OpenLayers.Map('map', options);
  mapnik = new OpenLayers.Layer.TMS("OpenStreetMap","http://a.tile.openstreetmap.org/",{'opacity': 1,type: 'png', getURL: osm_getTileURL,displayOutsideMaxExtent: true,attribution: ''});

  
  datalaag = new OpenLayers.Layer.WMS
  ( "Data", "mapserver/maakkaart.php",
    {'layers': '', 'p':"NL", format:'png'},
    {'opacity': 1,'isBaseLayer': false,'wrapDateLine': false,'reproject': false,'singleTile': true,'ratio': 1 } 
  );
  datalaag.setVisibility(false);
  datalaag2 = new OpenLayers.Layer.WMS
  ( "Data", "mapserver/maakkaart.php",
    {'layers': '', 'p':"NL", format:'png'},
    {'opacity': 1,'isBaseLayer': false,'wrapDateLine': false,'reproject': false,'singleTile': true,'ratio': 1 } 
  );
  datalaag2.setVisibility(false);
    
   
   nieuwekaartWMS1 = new OpenLayers.Layer.WMS( 
      "Nieuwe Kaart 1", 
      "http://webservice.nieuwekaart.nl/cgi-bin/nkn",
      { layers: 'nk_wonen,nk_werken,nk_voorziening,nk_gemengd,nk_verkeer', 
        format:'gif',
        transparent: 'true'},
      { isBaseLayer: false,
        singleTile: true,
        ratio: 1,                
        minScale:200000,     
        projection: new OpenLayers.Projection("EPSG:54004"),
        sphericalcorrection:true,
        corrx: 47,
        corry: 170,
        visibility:false
      });                                                     

    nieuwekaartWMS2 = new OpenLayers.Layer.WMS( 
      "Nieuwe Kaart 2", 
      "http://webservice.nieuwekaart.nl/cgi-bin/nkn",
      { layers: 'nk_groen,nk_water,nk_landbouw,nk_recreatie', 
        format:'gif',
        transparent: 'true'},
      { isBaseLayer: false,
        singleTile: true,
        ratio: 1,         
        minScale:200000,            
        projection: new OpenLayers.Projection("EPSG:54004"),
        sphericalcorrection:true,
        corrx: 47,
        corry: 170,
        visibility:false
      });    
      
    datalaag.events.register("loadstart",0,loadStart);
    datalaag.events.register("loadend",0,loadEnd);    
 
   
    map.addLayers([mapnik, datalaag, datalaag2, nieuwekaartWMS1, nieuwekaartWMS2]);
   


    var point = new OpenLayers.LonLat(5.2, 52.2);
    point.transform(projWGS84,projGoogle);
    map.setCenter(point,9);
    
     
  
// ------------
// Editfuncties
// ------------

  var click = new OpenLayers.Control.Click_bsd();
  click.onClick = eventClick;
  map.addControl(click);
  click.activate();

  //resizeMap();
  getTabellen();
}

// ------------
var popup = null;
function closepopup()
// ------------
{
	if (popup)
	{ map.removePopup(popup);
    popup.destroy();
    popup = null;
  }
}  

// ------------
function MaakPopup(poptekst)
// ------------
{  
  closepopup();  
  popup = new OpenLayers.Popup.FramedCloud("instructies",
         map.getCenter(),
         new OpenLayers.Size(400,400),
         poptekst+"<br>&nbsp;<br>&nbsp;", 
         null,
         true);
  map.addPopup(popup);
}

// ------------
function MaakPopupHome(poptekst) //voor informatie op de home en op de informatie pagina
// ------------
{  
  closepopup();  
  
  $bounds=map.getExtent();
  $left=$bounds.left;
  $right=$bounds.right;
  $uitdekant=($right-$left)/10;
  $top=$bounds.top;
    
  //    var point = new OpenLayers.LonLat(5.2, 52.2);
  //  point.transform(projWGS84,projGoogle);
  
  popup =new OpenLayers.Popup("popup",
                   new OpenLayers.LonLat($left+$uitdekant,$top-$uitdekant),
                   new OpenLayers.Size(600,500),
                   poptekst+"<br>&nbsp;<br>&nbsp;",
                   true);

  map.addPopup(popup);
}

// ------------
function handleeventClick(hReq)
// ------------
// handle voor 'echte' (eventClick) en voor vraag naar Detailinfo uit popup (getDetail)
// ------------
{
	var arr = hReq.responseText.split("|");
  var id,i,t;
  closepopup();  
  if (arr[0]=="1")     // toevoegen of verwijderen geoobjecten in tabel
  {
  for (i=1;i<arr.length;i++) // dit zijn alle ids die zijn aangeklikt
    { 
      if ((id=parseInt(arr[i]))>0)
      {
      	if (((Menuitemnaam[Hoofdmenu]=='Deur-tot-deurreistijden')  && (Submenu==1))||((Menuitemnaam[Hoofdmenu]=='Bereikbaarheid')  && (Submenu==7))|| ((Menuitemnaam[Hoofdmenu]=='130 km/u')&& (Submenu==1)) || ((Menuitemnaam[Hoofdmenu]=='Duurzaamheid')&& (Submenu==4)))// deur tot deur reistijden
          { 
          Geoitems.push(id);  // onvoorwaardelijk toevoegen, meerdere keren dezelfde dus toegestaan
          }
        else if ((Menuitemnaam[Hoofdmenu]=='Bereikbaarheid') && (Ondermenu<4)||(Menuitemnaam[Hoofdmenu]=='130 km/u') && (Ondermenu==2)|| ((Menuitemnaam[Hoofdmenu]=='130 km/u')&& (Submenu==2)))//isochronen
        { 
          Geoitems = new Array();
          Geoitems.push(id);
        }          
        else if (Menuitemnaam[Hoofdmenu]=='Duurzaamheid') // checken of al in lijst, dan verwijderen anders toevoegen
        {  
          t = OpenLayers.Util.indexOf(Geoitems,id);  // als deze id nog niet in array dan toevoegen anders (weer) verwijderen
          if (t==-1) Geoitems.push(id); else Geoitems.splice(t, 1);
        } 
      } 
    }  
    MaakMenu();
  }  
}

var eventClicklonlat;
// ------------
function eventClick(e)
// ------------
{
  var xy = e.xy;
  var zoom = map.getZoom();
  if (instellingen.mobiliteitsmanagement) return;	
  var geotabel,datatype;
  var beperkTypeData = 0;
  var abounds = map.calculateBounds();
  var ascale=(abounds.right-abounds.left)/1000;
    
  eventClicklonlat = map.getLonLatFromViewPortPx(xy);
  
    if ( ((Menuitemnaam[Hoofdmenu]=='Deur-tot-deurreistijden') && (Submenu==1)) ||((Menuitemnaam[Hoofdmenu]=='Bereikbaarheid')  && (Submenu==7))||(aktKaart==-1)|| ((Menuitemnaam[Hoofdmenu]=='130 km/u')&& (Submenu==1))|| ((Menuitemnaam[Hoofdmenu]=='Duurzaamheid')&& (Submenu==4)))  
    {
      geotabel="geo_pc4";
      datatype="pol";    
    }    
      else
    {  
      geotabel=Tabellen[aktKaart].geotabel;
      datatype=Tabellen[aktKaart].datatype;
    }
  
  if  ((Menuitemnaam[Hoofdmenu]=='Demografie')||(Menuitemnaam[Hoofdmenu]=='Bereikbaarheid' && Submenu==4)||(Menuitemnaam[Hoofdmenu]=='Bereikbaarheid' && Submenu==5))
  {}
  else 
  {  
      new OpenLayers.Ajax.Request("mapserver/GetFeature.php", { method: 'get', parameters:
	    {'x': Math.floor(eventClicklonlat.lon),
	     'y': Math.floor(eventClicklonlat.lat), 
	     'zoom': zoom, 
	     'geotabel': geotabel, 
	     'datatype': datatype,
	     'beperkTypeData': beperkTypeData,
	     'ID':-1  },
	    onComplete: handleeventClick
	  });
  }	
  

}


//---------------------------
function postcodeClick(postcode4)
	{
	Geoitems = new Array();
	Geoitems.push(postcode4);
	aktualiseer_isochronen();
	}

// -----------------------------------------------
function getDetail(geotabel,ID,x,y,zoom,beperkTypeData)
// geeft beschikbare informatie over een geofeature
// wordt aangeroepen uit link van GetFeature.php
// -----------------------------------------------
{
  new OpenLayers.Ajax.Request("mapserver/GetFeature.php", { method: 'get', parameters:
    {'x': Math.floor(eventClicklonlat.lon),
     'y': Math.floor(eventClicklonlat.lat), 
     'zoom': zoom, 
     'beperkTypeData': beperkTypeData,
     'geotabel': geotabel, 
     'datatype': "all",
     'ID':ID  },
    onComplete: handleeventClick
  });
}



 var w_oud=0;
 var h_oud=0;
// -----------------------------------------------
function resizeMap()
// -----------------------------------------------
{
     
  var centre = map.getCenter();
  var zoom = map.getZoom();
  var tabelbreedte =650;
    if ((Hoofdmenu==2 && Submenu==2)||(Hoofdmenu==4 && Submenu==2))         //Menuitemnaam['Bereikbaarheid'/Kilometerprijs] wordt niet herkend, vervangen door indexnummer 2 en 4 (hoofdmenu==2 en ==4)
    {
    tabelbreedte=270;
    }
  var legendabreedte=150
  var hoogtebovenmenu=145;
  var ruimterechts=15;
  var ruimtelinks=277;
  var ruimteonder=10;
  var w = mygetWndW()-ruimtelinks-15;
  var h = mygetWndH();
  var resize = true; 
    
  if (((w_oud-w) >-20) &&((w_oud-w) <20 )){
  w=w_oud;
  resize=false;
 }   
  w_oud=w
      
  if (((h_oud-h) >-20) &&((h_oud-h) <20 )){
  h=h_oud;
  //console.log((h));
  resize=false;
 }   
 h_oud=h
    
 if (resize=true){
 
//legenda rechts boven in
 document.getElementById("info").style.top = hoogtebovenmenu+5+"px";
 document.getElementById("info").style.right = ruimterechts+12+"px";   
 document.getElementById("info").style.width = legendabreedte+"px"; 
 if (aLegenda==1){document.getElementById("info").style.width = (legendabreedte*2)+"px"}
 if (bLegenda==1){document.getElementById("info").style.width = (legendabreedte*2)+"px"}
 if (bLegenda==1 && aLegenda==1){document.getElementById("info").style.width = (legendabreedte*3)+"px"} 
                   
//tabel links onderin kaart
 document.getElementById("tabel").style.bottom = ruimteonder+10+"px";
 document.getElementById("tabel").style.left =ruimtelinks+5+"px"; 
 document.getElementById("tabel").style.width=tabelbreedte+"px"

//informatie tekstblok
 document.getElementById("home").style.top = hoogtebovenmenu+"px";    
 document.getElementById("home").style.left = ruimtelinks+"px";
 document.getElementById("home").style.width = w-5+"px";
 document.getElementById("home").style.height = (h-hoogtebovenmenu+5)+"px";
 document.getElementById("home").style.visibility = "hidden";
   
//kaart
 document.getElementById("map").style.top = hoogtebovenmenu+"px";
 document.getElementById("map").style.left = ruimtelinks+"px";
 document.getElementById("map").style.width = (w)+"px";
 document.getElementById("map").style.height = (h-hoogtebovenmenu-5)+"px";
 
 //laden kaart symbool
document.getElementById("ladend0").style.left = (ruimtelinks+75)+"px";
document.getElementById("ladend0").style.top = hoogtebovenmenu+5+"px";

 //laden tabel symbool
document.getElementById("ladendT").style.left = (ruimtelinks+45)+"px";
document.getElementById("ladendT").style.bottom = ruimteonder+15+"px";

//menu linker kant
 document.getElementById("links").style.top = hoogtebovenmenu+"px";   
 document.getElementById("links").style.width = ruimtelinks-15+"px";  
 document.getElementById("links").style.height = (h-hoogtebovenmenu-15)+"px";
 
 //menu bronvermelding
 document.getElementById("bronvermelding").style.bottom = ruimteonder+10+"px";   
 document.getElementById("bronvermelding").style.right = ruimterechts+10+"px";        
} //opnieuw resizen als hoogte en breedte veranderd zijn

if (Menuitemnaam[Hoofdmenu]=='Home'||Menuitemnaam[Hoofdmenu]=='Informatie')
{
 document.getElementById("home").style.visibility = "visible";
}


//tabel aan of uit en in of uitklappen
if (global_tabelinhoud=="")
    {
      document.getElementById("tabel").style.visibility = "hidden";
    }
else
    {
     if (global_tabelzichtbaar)
      {   
        var te = "<table width=\"100%\">";
        te +="<tr><td>"+ global_tabelinhoud +"</td>";
        te +="<td valign=\"top\" align=\"right\">";  
        te +="<img onclick='global_tabelzichtbaar=false; resizeMap();' src='buttons/sluitenkleinpijl.png'></td></tr>";
        te +="</table>";
      }
      else
      {   
        var te = "<table width=\"100%\"><tr><td><b> Informatie </b></td><td valign=\"top\" align=\"right\">";   
        te += "<img onclick='global_tabelzichtbaar=true; resizeMap();' src='buttons/pluskleinpijl.png'></td></tr></table>";
      }
      document.getElementById("tabel").innerHTML = te;
      document.getElementById("tabel").style.visibility = "visible";
     }

//legenda aan of uit en in of uitklappen
if (global_legendainhoud=="")
    {
      document.getElementById("info").style.visibility = "hidden";
    
    }
else
    {
     if (global_legendazichtbaar)
      {   
        var te = "<table width=\"100%\"><tr><td><b> Legenda </b></td><td valign=\"top\" align=\"right\">";  
        te += "<img onclick='global_legendazichtbaar=false; resizeMap();' src='buttons/sluitenkleinpijl.png'></td></tr>";
        te +="<tr><td valign=\"top\">"+ global_legendainhoud +"</td></tr>";
          }
      else
      { 
        var te = "<table width=\"100%\"><tr><td><b> Legenda </b></td><td valign=\"top\" align=\"right\">";   
        te += "<img onclick='global_legendazichtbaar=true; resizeMap();' src='buttons/pluskleinpijl.png'></td></tr></table>";
      }
      document.getElementById("info").innerHTML = te;
      document.getElementById("info").style.visibility = "visible";
    }


  map.setCenter(centre, zoom);
}


var tpoint;
var aktKaart = -1;
function handlegetTabellen(hReq)
{
  Tabellen = new Array();
  Groepitems = new Array();
  var rijen;
	var format = new OpenLayers.Format.XML();
	var nodes = format.read(hReq.responseText);
	var allNodes = nodes.getElementsByTagName("tabellen");
	if (allNodes.length==0) alert("ongeldige XML input");
	var rijen = allNodes[0].getElementsByTagName("rij");
  var potentialNode, fullName;
  var aItem = "", aHoofdItem="";
  var arr;  
	for (s=0;s<rijen.length;s++)
	{
    allNodes = rijen[s].getElementsByTagName("*");
    var eenObject = new Object();
    for(var i=0; i<allNodes.length; ++i) eenObject[allNodes[i].nodeName]=OpenLayers.Util.getXmlNodeValue(allNodes[i]);
    eenObject.maakTabel = false;
    eenObject.klikmodus = 0;    
    arr = eenObject.datatabel.split("|");
    if (arr.length>1) eenObject.klikmodus = arr[1];    
    Tabellen[s] = eenObject;    
    if (aItem != eenObject.groepnaam)
    {
    	arr = eenObject.groepnaam.split("|");
    	if (aHoofdItem != arr[0])
      {
        var Object2 = new Object();
    	  Object2.groepnaam = arr[0];
    	  Object2.level = 2;
    	  Object2.uitgevouden = false;
    	  Object2.oudejaren = false;
    	  Groepitems.push(Object2);
    	  aHoofdItem = arr[0];
    	}
    	var Object2 = new Object();
    	Object2.groepnaam = eenObject.groepnaam;
    	Object2.level = 1;
    	Object2.uitgevouden = false;
    	Object2.oudejaren = false;
    	Groepitems.push(Object2);
    	aItem = eenObject.groepnaam;
    }	    
	}
	MaakMenu();
}

function getTabellen()
{
 // document.getElementById("links").innerHTML = "<p class=\"titel\">Haal Tabellen op ...<br><img src=\"http://www.goudmap.info/map/buttons/wait.gif\"></p>";
  new OpenLayers.Ajax.Request("getTabellen.php", { method: 'get', parameters:
    { toeval:Math.random() },
    onComplete: handlegetTabellen
  });
}

function handleLogin(hReq)
{
	if (hReq.readyState == 4)
	{
		var str = hReq.responseText.split("|");
		global_rechten = str[0];
		global_SID = str[2];
		MaakMenu();
	}
}

function Login()
{
	global_gebruiker = document.formular.naam.value;
	global_pw=document.formular.password.value;
  new OpenLayers.Ajax.Request("login.php", { method: 'get', parameters:
    { 'naam': global_gebruiker, 'password': global_pw, 'toeval': Math.random() },
    onComplete: handleLogin
  });
}

function handleOpslaan(hReq)
{
	if (hReq.readyState == 4)
	{
		GetObjecten(-1);
		alert(hReq.responseText);
	}
}

function Opslaan()
{
	gemuteerd = 0;
	if (!document.formular) { alert("Opslaan niet meer mogelijk; formulier is al verwijderd"); return; }
	var params = { 'naam': global_gebruiker, 'password': global_pw, 'toeval': Math.random() };
  for (var i=0; i<document.formular.length; i++)
    params[document.formular.elements[i].name]=document.formular.elements[i].value;
  new OpenLayers.Ajax.Request("Opslaan.php", { method: 'get', parameters: params,
    onComplete: handleOpslaan
  });
}

// ----------------------
function klikAardbolfromPopup(groepnaam,itemnaam,id)
// ----------------------
// in popup (gegenereerd in GetFeature.php) op aardbol geklikt
// wordt ook gebruikt in Menu Invloedgegevens
// id>0: GeoID wordt toegevoegd aan aktieve items
// id==-1: geen GeoID
// ----------------------
{
  closepopup();
  global_ScenarioLegenda=itemnaam;
  var item = -1; 
	for (var j=0;j<Tabellen.length;j++)
  { Tabellen[j].maakTabel=false;
    if ((Tabellen[j].groepnaam==groepnaam) && (Tabellen[j].itemnaam==itemnaam) && (Tabellen[j].aktueel==1))
      item = j; 
    if ((Tabellen[j].groepnaam==groepnaam)  && (Tabellen[j].aktueel==1) )
      Tabellen[j].maakTabel=true;      
  }
  if (item==-1) { alert("item niet gevonden: " + groepnaam+" : "+itemnaam); return; }
  aktKaart=item;
	if (id>=0) 
  { 
    Geoitems = new Array();
    Geoitems.push(id);
    MaakMenu();
	}
}

// ----------------------
function MaakTabelKaart(arr_groepitem,trend)
// ----------------------
// arr_groepitem = array met groepen en itemnamen
// trend=true : alle jaren
// trend=false: alleen aktueel jaar
// ----------------------
{
  var item = -1;
  var groepnaam;
  var itemnaam;
  for (var j=0;j<Tabellen.length;j++) Tabellen[j].maakTabel=false;
  for (var i=0;i<arr_groepitem.length;i+=2)
  { 
    groepnaam = arr_groepitem[i];
    itemnaam  = arr_groepitem[i+1];
    for (var j=0;j<Tabellen.length;j++)
    { 
      if (i==0) // kaartitem alleen voor eerste item 
        if ((Tabellen[j].groepnaam==groepnaam) && (Tabellen[j].itemnaam==itemnaam) && (Tabellen[j].aktueel==1))
          item = j; 
      if (trend)
      { if ((Tabellen[j].groepnaam==groepnaam) && (Tabellen[j].itemnaam==itemnaam) )
          Tabellen[j].maakTabel=true;
      }    
      else          
        if ((Tabellen[j].groepnaam==groepnaam)  && (Tabellen[j].itemnaam==itemnaam) && (Tabellen[j].aktueel==1) )
          Tabellen[j].maakTabel=true;
    }
  }
  if (item==-1) { alert("item niet gevonden: " + groepnaam+" : "+itemnaam); return; }
  aktKaart=item;
}


// ----------------------
function klikAardbol(item)
// ----------------------
// in tabel op aardbol geklikt
// ----------------------
{
	aktKaart=item; 
	for (var j=0;j<Tabellen.length;j++) Tabellen[j].maakTabel=false;
	Tabellen[item].maakTabel=true;
	Geoitems = new Array();
	MaakMenu();
}

// ----------------------
function handleReistijdentoevoegen(hReq)
// ----------------------
{
  var gebiednr = parseInt(hReq.responseText);
  if (!(gebiednr>0))
    alert("fout: "+hReq.responseText);
  else
  {    
    Geoitems.push(gebiednr);
    MaakMenu();
    alert (Submenu);
  }
}

// ----------------------
function handleReistijdentoevoegenPc4(pc4)
// ----------------------
{
  {    
    Geoitems.push(pc4);
    MaakMenu();
  }
}

// ----------------------
function reistijdentoevoegen(pc4,gebiedtype)
// ----------------------
{
  new OpenLayers.Ajax.Request("GetPostcode.php", { method: 'get', parameters: {'pc':pc4,'gebiedtype':gebiedtype},
    onComplete: handleReistijdentoevoegen
  });
}

// ----------------------
function bereken_mobiliteitsmanagement(aForm)
// ----------------------
{
  Geoitems = new Array();
  Geoitems.push(parseInt(aForm.pc4.value));
  mobiliteitsmanagement_postcodes = aForm.lijst.value;
  mobiliteitsmanagement_postcode1 = aForm.pc4.value;
  var arr = mobiliteitsmanagement_postcodes.split("\n");
  for (var i=0;i<arr.length;i++)
    Geoitems.push(parseInt(arr[i]));
  MaakMenu();
  var te ='<p class="menu_text">U hebt '+arr.length+' postcodes opgegeven.<br>Klik hieronder om een rapportage met de mobiliteitskansen voor uw bedrijf te downloaden</p>';
  te+='<p class="menu_text"><a style="font-size:140%" href="getExcel.php?Query='+maakSelstring(Geoitems)+'"><b>Download Rapportage</b></a><br>(klik met rechte muistoets om op te slaan ipv te openen)</p>';
  document.getElementById("DownloadExcel").innerHTML = te;
}

// ----------------------
function eigendatatoevoegen(pc4, aantal)
// in locatiezoeker is er een postcode-aantal combinatie toegevoegd
// ---------------------- 
{
  if ((pc4<1011)||(pc4>9999)){ alert(pc4+" is geen geldige postcode"); return }
  if (aantal<=0)             { alert(aantal+" is ongeldig");           return }
  if (Locatiezoeker_Eigendata.length>=20) { alert("te veel eigen data");return }
  for (var t=0;t<Locatiezoeker_Eigendata.length;t++)
  {
    if (Locatiezoeker_Eigendata[t][0]==pc4)
    {
      alert("Postcode "+pc4+" bestaat al in lijst. Aantal is toegevoegd");
      Locatiezoeker_Eigendata[t][1] += aantal;
      MaakMenu(); return
    }
  }
  Locatiezoeker_Eigendata.push(new Array(pc4,aantal));
  MaakMenu();
}
    
// ----------------------
function aktualiseer_isochronen()
// ----------------------
// wordt getriggerd bij wisseling van selectboxen
// ----------------------
{
	var arr_skim = new Array("auto spits 2005", "auto spits 2020", "auto dal 2005", "OV 2005", "OV 2020","st","st","st","st","st","st","st","st","st","auto spits 2020 prijs","afstand","st","auto dal 2020");  
	var variabel = 'skim '+arr_skim[bereikbaarheid_scenario-1];
	global_ScenarioLegenda=variabel;
	if (richting==1) variabel+=" van"; else variabel+=" naar"; 
	klikAardbolfromPopup('Bereikbaarheidskaart|Isocronen',variabel,-1);
	akt_layer();
	akt_tabellen();
}

// ----------------------
function aktualiseer_potenties()                     //Economische potentie vaste waardes
// ----------------------
// wordt getriggerd bij wisseling van selectboxen
// ----------------------
{
  var arr_naam = new Array("auto 2005","auto 2020","OV 2008","OV 2020","fiets 2005","auto dal 2005");
  var variabel = arr_naam[parseInt(document.potenties.scenario.value)-1];
  global_ScenarioLegenda=variabel;
 	klikAardbolfromPopup('NBK|Catchment area Vast',variabel,-1);
	akt_layer();
	akt_tabellen();
}

// ----------------------
function aktualiseer_potenties_NBK()      //Economische potentie vastgesteld per provincie
// ----------------------
// wordt getriggerd bij wisseling van selectboxen
// ----------------------
{
  var arr_naam = new Array("auto 2005","auto 2020","OV 2008","OV 2020","fiets 2005","auto dal 2005");
	var variabel = arr_naam[parseInt(document.potenties.scenario.value)-1];
	global_ScenarioLegenda=variabel;
	klikAardbolfromPopup('NBK|Catchment area',variabel,-1);
	akt_layer();
	akt_tabellen();
}


// ----------------------
function aktualiseer_ontplooing()             //ontplooiing vaste waardes
// ----------------------
// wordt getriggerd bij wisseling van selectboxen
// ----------------------
{
  var arr_naam = new Array("auto 2005","auto 2020","OV 2008","OV 2020","fiets 2005","auto dal 2005");
	var variabel = arr_naam[parseInt(document.potenties.scenario.value)-1];
	global_ScenarioLegenda=variabel;
	klikAardbolfromPopup('NBK|Ontplooiingsmogelijkheden Vast',variabel,-1);
	akt_layer();
	akt_tabellen();
}

// ----------------------
function aktualiseer_ontplooing_NBK()                  //ontplooiing vastgesteld per provincie
// ----------------------
// wordt getriggerd bij wisseling van selectboxen
// ----------------------
{
  var arr_naam = new Array("auto 2005","auto 2020","OV 2008","OV 2020","fiets 2005","auto dal 2005");
 	var variabel = arr_naam[parseInt(document.potenties.scenario.value)-1];
	global_ScenarioLegenda=variabel;
	klikAardbolfromPopup('NBK|Ontplooiingsmogelijkheden',variabel,-1);
	akt_layer();
	akt_tabellen();
}

// ----------------------
function aktualiseer_profiel()
// ----------------------
// wordt getriggerd bij wisseling van selectboxen
// ----------------------
{
  var arr_naam = new Array("2008 spits","2020 spits","2008 dal","2020 dal");
	var variabel = arr_naam[parseInt(document.profiel2.scenario.value)-1];
	global_ScenarioLegenda=variabel;
	klikAardbolfromPopup('NBK|Bereikbaarheidsprofiel',variabel,-1);
	akt_layer();
	akt_tabellen();
}

// ----------------------
function aktualiseer_waardering()
// ----------------------
// wordt getriggerd bij wisseling van selectboxen
// ----------------------
{
	var arr_naam = new Array("","Waardering van gebieden auto","Waardering van gebieden ov");
	var variabel = arr_naam[parseInt(document.waardering.scenario.value)];
//	klikAardbolfromPopup('bereikbaarheidskaart|waarderinggebieden',variabel,-1);

  var item = -1; 
	for (var j=0;j<Tabellen.length;j++)
  { 
    if ((Tabellen[j].groepnaam=='bereikbaarheidskaart|waarderinggebieden') && (Tabellen[j].itemnaam==variabel))
      item = j; 
  }
  if (item>=0)
  {
    datalaag2.mergeNewParams({VARIABEL:Tabellen[item].ID, SEL:''});
    datalaag2.setOpacity(1);
    datalaag2.setVisibility(true);
  } 
  else
    datalaag2.setVisibility(false);   
  
}


// ----------------------
var Hoofdmenu = 0; 
var Submenu = 1; 
var Ondermenu = 0;
var laatsteQuery = "";
var reistijdenLijst=new Array();
var bereikbaarheid_scenario = 1; // auto ov 2005 2020 etc
var richting =2; // van/naar
var PROV="";
var Xprijs=6.7;
var aLegenda;
var bLegenda;
var Menuitemnaam=new Array("Home","","Bereikbaarheid","Duurzaamheid","","Demografie","","","Informatie","");    
var Onthoudpostcode="";
 
// ----------------------
function MaakMenu()
// ----------------------
{
	var te="";
	var waarde,nwaarde;
	var id,i,j,gevonden;
	var oudejaren;
	var aHoofditem = "";
	var arr;
  closepopup();
  document.getElementById("links").innerHTML = "";
  document.getElementById("info").innerHTML = "";
  global_tabelinhoud=""
  global_legendainhoud="" 
  document.getElementById("home").innerHTML = "";
  datalaag.setVisibility(false);
   
  
// bovenmenu
// ---------

  var te='<ul id="nav">';
  for (var t=0;t<=9;t++)
  { if (Menuitemnaam[t].length>0)
    {
	  	te += '<li><a ';
	    if (Hoofdmenu==t) te+= 'class="active"';
	    te += ' href="javascript:aktKaart=-1;Geoitems = new Array(); for(var j=0;j<Tabellen.length;j++) Tabellen[j].maakTabel=false;Submenu=1;Ondermenu=0;Hoofdmenu='+t+';MaakMenu()">'+Menuitemnaam[t]+'</a></li>';    
    } 
  } 
  
   
  te += '</ul>';
  document.getElementById("bovenmenu").innerHTML = te;

  
  if (Menuitemnaam[Hoofdmenu]!='Demografie')
  {
  nieuwekaartWMS1.setVisibility(false)
  nieuwekaartWMS2.setVisibility(false)  
  }
  

// Linker Menu voor Home
// ---------



  if (Menuitemnaam[Hoofdmenu]=='Home')   {
      if ((Submenu>1)){
         Hoofdmenu=8; //'Informatie'
         }

    te = '<div class="name"><h1>Welkom op de Nationale Bereikbaarheidskaart</h1></div>';
    te += '<p> Via bovenstaand menu zijn verschillende kaartbeelden van de bereikbaarheid van Nederland te bekijken.<br></p>';
    
    te+='<form name="postcode" onSubmit="Hoofdmenu=2;Submenu=2;Onthoudpostcode=parseInt(document.postcode.pc4.value);Geoitems[0]=Onthoudpostcode;MaakMenu();" action="javascript:handleReistijdentoevoegenPc4(document.postcode.pc4.value);">';
    te+='<p><input name="pc4" type="text" size="17" maxlength="10""><br><br>';
    te+='<input type="button" name="pb" value="Vul uw postcode in \n en bekijk de kaart" onclick="Hoofdmenu=2;Submenu=2;Onthoudpostcode=document.postcode.pc4.value;Geoitems[0]=Onthoudpostcode;MaakMenu() ">';//Hoofdmenu=Menuitemnaam[Bereikbaarheid] vervangen door Hoofdmenu=2
    te+='</p></form>';
    
    te += '<div class="name"><h1>Hou mij op de hoogte</h1></div>';
   // te += '<p>Ik ontvang graag meer informatie.<br></p>';
    te+='<form name="informatie" action="javascript:handleInformatieAanvraag(document.informatie.email.value);">';
    te+='<p><input name="email" type="text" size="20" maxlength="100" value="uw emailadres">';
    te+='<input type="button" name="pb" value="SEND" onclick="handleInformatieAanvraag(document.informatie.email.value)";>';
    te+='</p></form>';
    
    te += '<div class="name"><h1>Veel gestelde vragen</h1></div>';
    te+=MaakSubmenu(new Array("","","","Wat kan ik ermee?","Hoe is de kaart gemaakt?","Over ons","Artikelen","Contact","",""),Submenu,"subnav");
        
    
    popuptekst = '<table width="80" border="0" align="left" cellpadding="5" cellspacing="5">';
    popuptekst += '<tr>';
    popuptekst += '<td align="center" valign="top">';
    popuptekst += '<img src="buttons/foto1.jpg" width=200 align="left">';
    popuptekst += '</td>';
    popuptekst += '</tr><tr><td>';
    popuptekst += '<img src="buttons/foto2.jpg" width=200 align="left">';
    popuptekst += '</td></tr></table>';
    
    popuptekst += '<table><tr><td valign=top><div class="name"><h1>Welkom op de Nationale Bereikbaarheidskaart</h1><div><p><i>Informatie over bereikbaarheid in &eacute;&eacute;n oogopslag</i></p>';
    popuptekst += '<p class="toelichting_text">De <span style="color:grey"><b>Nationale Bereikbaarheidskaart van Nederland</b></span> is een digitale kaart waarop u informatie kunt vinden over de bereikbaarheid en over emissies door het verkeer in Nederland voor nu en in 2020. </p>'; 
    
    
    popuptekst += '<p class="toelichting_text">';
    popuptekst += 'De bereikbaarheidskaart geeft de invloed weer van infrastructuur op de ontwikkelingskansen van gebieden. Hiermee wordt in &eacute;&eacute;n oogopslag zichtbaar welke kansen en bedreigingen nieuwe infrastructuur of filevorming heeft op woon- en werkgebieden.</p>';
    popuptekst += '<p class="toelichting_text">';
    popuptekst +='Deze informatie is interessant voor beleidsmakers, maar ook voor ondernemers en inwoners. De bereikbaarheidskaart helpt een betere integrale afweging te maken tussen ruimtelijke en mobiliteitsontwikkelingen.</p>';
    popuptekst += '<p class="toelichting_text">De reistijden voor elke willekeurige verplaatsing vormen de basis van de nationale bereikbaarheidskaart.<br><br></p>';    
    popuptekst += '<p class="toelichting_text"><b>Kantoorgebouw op multimodaal knooppunt populair</b><br><a href = "pdf/Vastgoedmarkt.pdf" target="_blank">Download hier </a>het artikel uit de vastgoedmarkt van augustus 2011.<br>';//<a href = "pdf/Vastgoedmarkt.pdf" target="_blank"><img src="pdf/bannerVastgoed.jpg" width=450></a></p>';    
     popuptekst += '<br><b>Stedelijke bereikbaarheid</b><br><a href = "pdf/Stedelijke_bereikbaarheid.PDF" target="_blank">Download hier </a>het artikel uit Stadswerk magazine, nummer 7 2011.<br><br>Heeft u vragen over een van deze artikelen dan kunt u contact opnemen met <a href="mailto:rbos@goudappel.nl">Ron Bos</a>: rbos@goudappel.nl, 0570-666815</p>';                                                                        
                                                                           
   // popuptekst += '</td></tr><tr><td><p class="toelichting_text"><b>Disclaimer:</b> De informatie die deze kaart geeft over reistijden is gebaseerd op een zorgvuldige verwerking van beschikbare data. Desalniettemin kunnen de makers van de kaart geen verantwoording nemen voor schade die mogelijk ontstaat door het gebruik van de informatie. Nieuwe data over bijvoorbeeld reistijden of kenmerken van het wegen- of OV-netwerk zal aanleiding zijn om de kaart te actualiseren. Dat geldt ook voor wijzigingen in het investeringsprogramma ruimte en transport en andere ontwikkelingen, zoals \'betalen per kilometer\'.';
    //popuptekst += '<br>Het verkeersmodel dat ten grondslag ligt aan deze website houdt nog geen rekening met inwoners en arbeidsplaatsen over de grens en op de waddeneilanden.</p></div>';
    popuptekst += '</td>';
    popuptekst += '</table>'; 
	   
    document.getElementById("home").innerHTML=popuptekst;
  } 
  
        
// Linker Menu voor Deur-tot-deur Reistijden           //vervangen door hoofdmenu== bereikbaarheid submenu=6
// ---------
  if ((Menuitemnaam[Hoofdmenu]=='Deur-tot-deurreistijden') ) 	
  {	
    PROV = "NL";
    te = '<div class="name space"><h1>Deur-tot-deurreistijden</h1></div>';
    te += '<p>Met deze module krijgt u een algemene indruk van de verschillen in reistijd bij gebruik van de auto en het openbaar vervoer.</p>';
              
    if (Submenu==1)//deur-tot-deur reistijden
    {
      aktKaart=-1;  
      if (Geoitems.length % 2 == 0)
        te += '<p>Klik in de kaart voor de <b>vertreklocatie</b> van een te berekenen verbinding of voer de viercijferige postcode in van de vertreklocatie</p>';
      else
        te += '<p>Klik in de kaart voor het <b>bestemmingslocatie</b> van een te berekenen verbinding of voer de viercijferige postcode in van de bestemmingslocatie</p>';      
      te+='<form name="postcode" action="javascript:handleReistijdentoevoegenPc4(document.postcode.pc4.value);">';
      te+='<p><input name="pc4" type="text" size="10" maxlength="10" value="'+Geoitems[0]+'">';
      te+='<input type="button" name="pb" value=" OK " onclick="handleReistijdentoevoegenPc4(this.form.pc4.value);">';
      te+='</p></form>';
      var poptekst="";
      if (Geoitems.length == 0)
        poptekst="<b>Klik op de kaart<br>om de vertreklocatie<br>te bepalen</b>";
      if (Geoitems.length == 1)
        poptekst="<b>Klik op de kaart<br>om de bestemming<br>te bepalen</b>";
      if (poptekst!="") MaakPopup(poptekst)
    }   
  }
  

// --------------------------    
// linker menu Bereikbaarheid
// --------------------------  
  if (Menuitemnaam[Hoofdmenu]=='Bereikbaarheid') 	  
// --------------------------    
  { 
     ;
    te ='<div class="name space"><h1>Bereikbaarheid</h1></div>';
    te+=MaakSubmenu(new Array("","","Reistijdisochronen","","Ontplooiingsmogelijkheden","Bezoekerspotentieel","Multimodale bereikbaarheid","Deur-tot-deurreistijden en emissies"),Submenu,"subnav");
    te+='<br><br>'; 
  	
    
    if (Submenu==1) // hoofdmenu
    {  
     aktKaart=-1;for(var j=0;j<Tabellen.length;j++) Tabellen[j].maakTabel=false;Geoitems=new Array();
    } 
            
    if (Submenu==2) // reistijdisochronen
    {
     
     	//te +='<div class="titel space"><h1>Bereikbaarheid van<br>een postcode</h1></div>';
      te += '<p>Klik op een locatie in de kaart of vul een postcode in ';      
      aktualiseer_isochronen(); 
       	      
      if (Geoitems.length > 0)
        te += 'voor het zichtbaar maken van de reistijdisochronen.</p>';
      else
      te += 'om een locatie voor de reistijdisochronen te bepalen.</p>';      
          
      //kies postcode
      if (Geoitems[0]>0) {
        postcodeinvullen=Geoitems[0]
      }
      postcodeinvullen=""
    	te +='<form name="pcform" onsubmit=postcodeClick(parseInt(document.pcform.pc4.value)) action="javascript:handleReistijdentoevoegenPc4(parseInt(document.pcform.pc4.value));"><p>Postcode (4 cijfers):<br><input name="pc4" type="text" size="10" maxlength="6" value="'+postcodeinvullen+'">';
    	te +='<input type="button" name="sdf" value=" OK " onclick="postcodeClick(parseInt(this.form.pc4.value))"> ';
    	te +='</p></form>';    
            
      te+='<p>Vanuit / naar:<br><SELECT NAME="scenario" onchange="richting=parseInt(this.value); aktualiseer_isochronen();">';
      te+='<OPTION VALUE="2" '+((richting==2)?'selected':'')+'>Reistijden naar de postcode</OPTION>';
      te+='<OPTION VALUE="1" '+((richting==1)?'selected':'')+'>Reistijden vanuit de postcode</OPTION>';
      te+='</SELECT><br><br></p>';
      
                   
      te+='<form name="scenario">';        
      te+='<p>Scenario:<br><SELECT NAME="scenario" onchange="bereikbaarheid_scenario=parseInt(this.value); aktualiseer_isochronen();">';
      te+='<OPTION VALUE="1" '+((bereikbaarheid_scenario==1)?'selected':'')+'>Auto: ochtendspits, huidige situatie</OPTION>';
      te+='<OPTION VALUE="2" '+((bereikbaarheid_scenario==2)?'selected':'')+'>Auto: ochtendspits, 2020 (indicatief)</OPTION>';      
      te+='<OPTION VALUE="3" '+((bereikbaarheid_scenario==3)?'selected':'')+'>Auto: daluren, huidige situatie</OPTION>';
      te+='<OPTION VALUE="18" '+((bereikbaarheid_scenario==18)?'selected':'')+'>Auto: daluren, 2020 (indicatief)</OPTION>';
      te+='<OPTION VALUE="4" '+((bereikbaarheid_scenario==4)?'selected':'')+'>OV: ochtendspits, huidige situatie</OPTION>';
      te+='<OPTION VALUE="5" '+((bereikbaarheid_scenario==5)?'selected':'')+'>OV: ochtendspits, 2020 (indicatief)</OPTION>';
      te+='</SELECT><br><br></p>';
      
    //  te += '<br> <a href="javascript:Ondermenu=0;Submenu=1;MaakMenu()"><img src="micons/pijlterug.png"> Terug </a>';
	  te+='</form>';            
    }

    if ((Submenu<4) && (Geoitems.length == 0))
    {
      if (Submenu==1) // hoofdmenu
        var poptekst="<b>Kies eerst een toepassing<br>uit het menu links</b>";
        else  
        var poptekst="<b>Klik op de kaart<br>om het centrum van<br>de isochronen te bepalen</b>";
        MaakPopup(poptekst);  
    } 

    if (Submenu==4)//ontplooiingsmogelijkheden
    {
    	//te+='<div class="titel space"><h1>Ontplooiingsmogelijkheden</h1></div>';
      te+=MaakOndermenu(new Array("","Ontplooiingsmogelijkheden vanuit woonlocaties, Nederland","Ontplooiingsmogelijkheden vanuit woonlocaties, per provincie",""),Ondermenu,"subnav");    
      // Ondermenu=1 //per provincie verwijderd
                                
	  if (Ondermenu==2) //per provincie
	    {
	      klikAardbolfromPopup('NBK|Ontplooiingsmogelijkheden','auto 2005',-1);
	      te+='<form name="provincies" >';
  	    te+='<br>Provincie:<br><SELECT NAME="provincie"  onchange="PROV = this.value; aktualiseer_ontplooing_NBK();">';
  	        te+='<OPTION VALUE="NL">Kies provincie...</OPTION>';
  	      	te+='<OPTION VALUE="GR">Groningen</OPTION>';
  		      te+='<OPTION VALUE="FR">Friesland</OPTION>';
  		      te+='<OPTION VALUE="DR">Drenthe</OPTION>';
        		te+='<OPTION VALUE="FL">Flevoland</OPTION>';
        		te+='<OPTION VALUE="OV">Overijssel</OPTION>';
        		te+='<OPTION VALUE="GL">Gelderland</OPTION>';
        		te+='<OPTION VALUE="UT">Utrecht</OPTION>';
        		te+='<OPTION VALUE="NH">Noord-Holland</OPTION>';
        		te+='<OPTION VALUE="ZH">Zuid-Holland</OPTION>';
        		te+='<OPTION VALUE="ZL">Zeeland</OPTION>';
        		te+='<OPTION VALUE="NB">Noord-Brabant</OPTION>';
        		te+='<OPTION VALUE="LB">Limburg</OPTION>';
        		te+='<OPTION VALUE="NL">Nederland</OPTION>';
        te+='</SELECT></form>';
	      
        te+='<form name="potenties" >';
	      te+='<br>Scenario:<br><SELECT NAME="scenario" onchange="aktualiseer_ontplooing_NBK();">';
	        te+='<OPTION VALUE="1">Auto: ochtendspits, huidige situatie</OPTION>';
  	     	te+='<OPTION VALUE="2">Auto: ochtendspits, 2020 (indicatief)</OPTION>';
  	     	te+='<OPTION VALUE="6">Auto: daluren, huidige situatie</OPTION>';
      		te+='<OPTION VALUE="3">OV: ochtendspits, huidige situatie</OPTION>';
      		te+='<OPTION VALUE="4">OV: ochtendspits, 2020 (indicatief)</OPTION>';
    		  te+='<OPTION VALUE="5">Fiets</OPTION>';
    		te+='</SELECT><br><br></form>';      
			}
	  
	   if (Ondermenu==1)   //voor nederland, vaste legendawaarden
	    {
	      PROV = "NL";
	      klikAardbolfromPopup('NBK|Ontplooiingsmogelijkheden Vast','auto 2005',-1);
	      te+='<form name="potenties" >';
	      te+='<br>Scenario:<br><SELECT NAME="scenario" onchange="aktualiseer_ontplooing();">';
	       	te+='<OPTION VALUE="1">Auto: ochtendspits, huidige situatie</OPTION>';
      		te+='<OPTION VALUE="2">Auto: ochtendspits, 2020 (indicatief)</OPTION>';
      	 te+='<OPTION VALUE="6">Auto: daluren, huidige situatie</OPTION>';
        	te+='<OPTION VALUE="3">OV: ochtendspits, huidige situatie</OPTION>';
      		te+='<OPTION VALUE="4">OV: ochtendspits, 2020 (indicatief)</OPTION>';
      		te+='<OPTION VALUE="5">Fiets</OPTION>';
      		te+='</SELECT><br><br></form>';     
		  }
	   }
     
     if (Submenu==5) //Bezoekerspotentieel, economische potentie
     { //te +='<div class="titel space"><h1>Economische potenties</h1></div>';
     	te+=MaakOndermenu(new Array("","Bezoekerspotentieel van locaties, Nederland","Bezoekerspotentieel van locaties, per provincie",""),Ondermenu,"subnav");    
     	// Ondermenu=1 //per provincie verwijderd
      if (Ondermenu==2)             //per provincie
	    {
	      klikAardbolfromPopup('NBK|Catchment area','auto 2005',-1);
	      te+='<form name="provincies" >';
	        te+='<br>Provincie:<br><SELECT NAME="provincie"  onchange="PROV = this.value; aktualiseer_potenties_NBK();">';
    	        te+='<OPTION VALUE="NL">Kies provincie...</OPTION>';
    	      	te+='<OPTION VALUE="GR">Groningen</OPTION>';
          		te+='<OPTION VALUE="FR">Friesland</OPTION>';
          		te+='<OPTION VALUE="DR">Drenthe</OPTION>';
          		te+='<OPTION VALUE="FL">Flevoland</OPTION>';
          		te+='<OPTION VALUE="OV">Overijssel</OPTION>';
          		te+='<OPTION VALUE="GL">Gelderland</OPTION>';
          		te+='<OPTION VALUE="UT">Utrecht</OPTION>';
          		te+='<OPTION VALUE="NH">Noord-Holland</OPTION>';
          		te+='<OPTION VALUE="ZH">Zuid-Holland</OPTION>';
          		te+='<OPTION VALUE="ZL">Zeeland</OPTION>';
          		te+='<OPTION VALUE="NB">Noord-Brabant</OPTION>';
          		te+='<OPTION VALUE="LB">Limburg</OPTION>';
          		te+='<OPTION VALUE="NL">Nederland</OPTION>';
		      te+='</SELECT></form>';
	      
        te+='<form name="potenties" >';
	      te+='<br>Scenario:<br><SELECT NAME="scenario" onchange="aktualiseer_potenties_NBK();">';  
	      	te+='<OPTION VALUE="1">Auto: ochtendspits, huidige situatie</OPTION>';
		      te+='<OPTION VALUE="2">Auto: ochtendspits, 2020 (indicatief)</OPTION>';  
	       te+='<OPTION VALUE="6">Auto: daluren, huidige situatie</OPTION>';
      		te+='<OPTION VALUE="3">OV: ochtendspits, huidige situatie</OPTION>';
      		te+='<OPTION VALUE="4">OV: ochtendspits, 2020 (indicatief)</OPTION>';
      		te+='<OPTION VALUE="5">Fiets</OPTION>';
		    te+='</SELECT><br><br></form>';    
		  }
	  
	   if (Ondermenu==1)        //voor nederland, vaste legendawaarden
	    {
     	      PROV = "NL";	 	
     	      klikAardbolfromPopup('NBK|Catchment area Vast','auto 2005',-1);
	          te+='<form name="potenties">';
    	      te+='<br>Scenario:<br><SELECT NAME="scenario" onchange="aktualiseer_potenties();">';
    	      	te+='<OPTION VALUE="1">Auto: ochtendspits, huidige situatie</OPTION>';
          		te+='<OPTION VALUE="2">Auto: ochtendspits, 2020 (indicatief)</OPTION>';
          	  te+='<OPTION VALUE="6">Auto: daluren, huidige situatie</OPTION>';
    	      	te+='<OPTION VALUE="3">OV: ochtendspits, huidige situatie</OPTION>';
          		te+='<OPTION VALUE="4">OV: ochtendspits, 2020 (indicatief)</OPTION>';
          		te+='<OPTION VALUE="5">Fiets</OPTION>';
          	te+='</SELECT><br><br></form>';
   	  }
     }
      if (Submenu==6)     //bereikbaarheidsprofiel
      {
       klikAardbolfromPopup('NBK|Bereikbaarheidsprofiel','2008 dal',-1);
       PROV = "NL";
	      te+='<form name="profiel2" >';
	      te+='<br>Scenario:<br><SELECT NAME="scenario" onchange="aktualiseer_profiel();">';
	      te+='<OPTION VALUE="3">Huidige situatie, daluren</OPTION>';
        te+='<OPTION VALUE="1">Huidige situatie, ochtendspits</OPTION>';
				te+='</SELECT></form>';      
      }
     
     
     if (Submenu==7)     //deur-tot-deur reistijden
      {
      PROV = "NL";
      //te += '<div class="titel space"><h1>Deur-tot-deur reistijden</h1></div>';
      //te += '<p>Met deze module krijgt u een algemene indruk van de verschillen in reistijd bij gebruik van de auto en het openbaar vervoer.</p>';
              
          
          aktKaart=-1;  
          if (Geoitems.length % 2 == 0)
            te += '<p>Klik in de kaart voor de <b>vertreklocatie</b> van een te berekenen verbinding of voer de viercijferige postcode in van de vertreklocatie</p>';
          else
            te += '<p>Klik in de kaart voor het <b>bestemmingspunt</b> van een nieuwe verbinding of voer de viercijferige postcode in van de bestemmingslocatie</p>';      
          te+='<form name="postcode" action="javascript:handleReistijdentoevoegenPc4(document.postcode.pc4.value);">';
          te+='<p><input name="pc4" type="text" size="10" maxlength="10">';
          te+='<input type="button" name="pb" value=" OK " onclick="handleReistijdentoevoegenPc4(this.form.pc4.value);">';
          te+='</p></form>';
          var poptekst="";
          if (Geoitems.length == 0)
            poptekst="<b>Klik op de kaart<br>om de vertreklocatie<br>te bepalen</b>";
          if (Geoitems.length == 1)
            poptekst="<b>Klik op de kaart<br>om de bestemming<br>te bepalen</b>";
          if (poptekst!="") MaakPopup(poptekst)
      }
  }  




  if (((Menuitemnaam[Hoofdmenu]=='Demografie') && (Submenu!=9)))// Demografie
  {
  PROV = "NL";
  te = '<div class="name space"><h1>Demografie</h1></div>';
  te+=MaakSubmenu(new Array("","Inwoners 2008","Inwoners 2020","Arbeidsplaatsen 2008","Arbeidsplaatsen 2020"),Submenu,"subnav");
  
  if (Submenu==1)
{
  klikAardbolfromPopup('NBK|Inwoners',"inwoners",-1);
   }
  if (Submenu==2)
 {
  klikAardbolfromPopup('NBK|Inwoners',"inwoners20",-1);
   }
  if (Submenu==3)
 {
  klikAardbolfromPopup('NBK|Inwoners',"arbeidsplaatsen",-1);
   }
 
  if (Submenu==4)
{
  klikAardbolfromPopup('NBK|Inwoners',"arbeidsplaatsen20",-1);
   }
 }
   
  
  if (Menuitemnaam[Hoofdmenu]=='Duurzaamheid') 	//Duurzaamheid
  {
   te= '<div class="name space"><h1>Duurzaamheid</h1></div>';
   te+= MaakSubmenu(new Array("","","CO2-emissies per inwoner","Emissies per postcodegebied","Emissies bij deur-tot-deurverplaatsingen"),Submenu,"subnav");
   PROV = "NL";
  
  if (Submenu==4)
     {            
          aktKaart=-1;  
          if (Geoitems.length % 2 == 0)
            te += '<p>Klik in de kaart voor de <b>vertreklocatie</b> van een te berekenen verbinding of voer de viercijferige postcode in van de vertreklocatie</p>';
          else
            te += '<p>Klik in de kaart voor het <b>bestemmingspunt</b> van een nieuwe verbinding of voer de viercijferige postcode in van de bestemmingslocatie</p>';      
          te+='<form name="postcode" action="javascript:handleReistijdentoevoegenPc4(document.postcode.pc4.value);">';
          te+='<p><input name="pc4" type="text" size="10" maxlength="10">';
          te+='<input type="button" name="pb" value=" OK " onclick="handleReistijdentoevoegenPc4(this.form.pc4.value);">';
          te+='</p></form>';
          var poptekst="";
          if (Geoitems.length == 0)
            poptekst="<b>Klik op de kaart<br>om de vertreklocatie<br>te bepalen</b>";
          if (Geoitems.length == 1)
            poptekst="<b>Klik op de kaart<br>om de bestemming<br>te bepalen</b>";
          if (poptekst!="") MaakPopup(poptekst)
     
      }
  if (Submenu==2)// co2 per inwoner per gemeente
     {
      te+='<p>In deze kaart is de CO2emissie per gemeente voor het vervoer te zien. De emissie is berekend op basis van jaarlijks onderzoek naar het gebruikte vervoermiddel en afgelegde afstanden van inwoners in Nederland (MON 2002 tot 2008).</p>'
      klikAardbolfromPopup('Duurzaamheid|Co2',"ton CO2 per inwoner per jaar",-1);
     }
  if (Submenu==3)// co2 per pc4
     {
      te+='<p style="color:red">Deze kaart is nog in ontwikkeling.<br></p>'
      te+='<p>In deze kaart is de CO2emissie per postcodegebied te zien voor het verkeer. ';
      te+='De emissie is berekend op basis van het aantal inwoners en arbeidsplaatsen in het gebied,';
      te+=' gecombineerd met de lengte van de verplaatsingen en periode van de dag. Bron van deze verplaatsingskenmerken';
      te+=' is het Nationale Verkeersmodel waarmee ook de reistijden en vertragingen zijn berekend voor de bereikbaarheidskaarten.</p>' ;
      
         te+=MaakOndermenu(new Array("","Co2 tijdens de spits vanuit","","Co2 tijdens de spits naar",""),Ondermenu,"subnav");
         if (Ondermenu==1){
          klikAardbolfromPopup('Duurzaamheid|Co2Postcode',"ton CO2 per postcode tijdens de spits",-1)};

         if (Ondermenu==2){
          klikAardbolfromPopup('Duurzaamheid|Co2Postcode',"ton CO2 per postcode tijdens de daluren",-1)};
        
         if (Ondermenu==3){
          klikAardbolfromPopup('Duurzaamheid|Co2Postcode',"ton CO2 per postcode tijdens de spits naar",-1)};
                   
         if (Ondermenu==4){
          klikAardbolfromPopup('Duurzaamheid|Co2Postcode',"ton CO2 per postcode tijdens de daluren naar",-1)};
     }   

  }
  
  
  if (Menuitemnaam[Hoofdmenu]=='130 km/u') 	//Kilometerprijs
  { PROV = "NL";
    
    te = '<div class="name space"><h1>130 km/u</h1></div>';
    te += '<p>Met deze module krijgt u een algemene indruk van de verschillen in reistijd bij gebruik van de auto bij invoering van een maximumsnelheid van 130 km/uur.</p>';
    
    //te = '<div class="name space"><h1>Kilometerprijs</h1></div>';
    //te += '<p>Met deze module krijgt u een algemene indruk van de verschillen in reistijd bij gebruik van de auto in 2020 en in 2020 bij invoering van de kilometerbeprijzing.</p>';
    //te += '<p>Kijk voor meer informatie ook op <a href="http://www.kilometerprijs.info" target="_blank">www.kilometerprijs.info</a></p>';
    
    
        
   // te+=MaakSubmenu(new Array("","Reistijd en kilometerprijs tussen twee postcodegebieden","Reistijdisochronen","",""),Submenu,"subnav");
    te+=MaakSubmenu(new Array("","","Reistijdisochronen","",""),Submenu,"subnav");
   
   
      
    /*if (Submenu==1)//kilometerprijs tussen twee locatie
    {
      aktKaart=-1;  
      if (Geoitems.length % 2 == 0)
        te += '<p>Klik in de kaart voor het <b>vertreklocatie</b> van een te beoordelen verbinding of voer de viercijferige postcode in van de vertreklocatie</p>';
      else
   	te += '<p>Klik in de kaart voor het <b>bestemmingspunt</b> van een nieuwe verbinding of voer de viercijferige postcode in van de bestemmingslocatie</p>';      
      te+='<form name="postcode" action="javascript:handleReistijdentoevoegenPc4(document.postcode.pc4.value);">';
      te+='<p><input name="pc4" type="text" size="10" maxlength="10">';
      te+='<input type="button" name="pb" value=" OK " onclick="handleReistijdentoevoegenPc4(this.form.pc4.value);">';
      te+='</p></form>';
      var poptekst="";
      if (Geoitems.length == 0)
        poptekst="<b>Klik op de kaart<br>om de vertreklocatie<br>te bepalen</b>";
      if (Geoitems.length == 1)
        poptekst="<b>Klik op de kaart<br>om de bestemming<br>te bepalen</b>";
      if (poptekst!="") MaakPopup(poptekst)
      */
      
  /*    te+='<p> Vul hier de prijs in per kilometer waar je mee wilt rekenen. </p>'
       te+= '<form name="prijs" action=" javascript:akt_tabellen();">';
  	te+= '<p><input name="Gprijs" type="text" size="5" maxlength="5" value=4>cent';
  	te+= '<input type="button" name="pb" value=" OK " onclick="Xprijs=this.form.Gprijs.value; akt_tabellen();">';
	te+= '</p></form> ';  */
//	te+= '<p style="font-size:9px";"font-color=#424242">Op dit moment hanteren we het basistarief van 6,7 cent, zodra de spitstarieven bekend zijn zullen wij deze op de juiste wegvakken invoeren zodat we voor uw reis de juiste prijs kunnen berekenen. Daarbij veronderstellen we overigens dat u volgens de snelste route rijdt.</p>'; 
///Prijs is standaard ingesteld op 4 cent bij het invullen van een raar bedrag wordt ook gerekend met 4 cent (zie in code akt_tabellen Xprijs)


  
 //   }

    if (Submenu==2) // reistijdisochronen
    {
     	te += '<p>Klik op een locatie in de kaart of vul een postcode in';  
       if (bereikbaarheid_scenario==1){bereikbaarheid_scenario=2}    
      aktualiseer_isochronen();   	      
      te += 'om een locatie voor de reistijdisochronen te bepalen.</p>';      
          
         
      //kies postcode
    	te +='<form name="pcform"><p>Postcode (4 cijfers):<br><input name="pc4" type="text" size="10" maxlength="6">';
	    te +='<input type="button" name="sdf" value=" OK " onclick="postcodeClick(parseInt(this.form.pc4.value))"> ';
	    te +='</p></form>';    
            
      te+='<p>Vanuit / naar:<br><SELECT NAME="scenario" onchange="richting=parseInt(this.value); aktualiseer_isochronen();">';
      te+='<OPTION VALUE="1" '+((richting==1)?'selected':'')+'>Reistijden vanuit de postcode</OPTION>';
      te+='<OPTION VALUE="2" '+((richting==2)?'selected':'')+'>Reistijden naar de postcode</OPTION>';      
      te+='</SELECT><br><br></p>';
             
      te+='<form name="scenario">';        
      te+='<p>Scenario:<br><SELECT NAME="scenario" onchange="bereikbaarheid_scenario=parseInt(this.value); aktualiseer_isochronen();">';
//      te+='<OPTION VALUE="1" '+((bereikbaarheid_scenario==1)?'selected':'')+'>Auto: ochtendspits, huidige situatie (indicatief)</OPTION>';
      	te+='<OPTION VALUE="1" '+((bereikbaarheid_scenario==1)?'selected':'')+'>Auto: ochtendspits, huidige situatie</OPTION>';
        te+='<OPTION VALUE="15" '+((bereikbaarheid_scenario==15)?'selected':'')+'>Auto: ochtendspits, huidige situatie, 130 km/u (indicatief)</OPTION>';  
	   // te+='<OPTION VALUE="15" '+((bereikbaarheid_scenario==15)?'selected':'')+'>Auto: ochtendspits, huidige situatie, 130 km/u (indicatief)</OPTION>';
	    te+='</SELECT><br><br></p>';
	
     // te+='<p style="font-size:7pt";"font-color=#424242">Kilometerprijs <br> In deze variant is een aanname gedaan voor de afname van het aantal autoritten op de verschillende afstanden. Door de afname van het aantal autoritten is er minder verkeer op de weg en zodoende verbetert de bereikbaarheid. In deze variant wordt niet het onderscheid gemaakt tussen vrachtverkeer en personenauto&#146;s, en ook wordt er geen onderscheid gemaakt naar motief (bijvoorbeeld woon-werk verkeer, zakelijk verkeer etc.)</p>'; 
       
    }    

}   
  if (Menuitemnaam[Hoofdmenu]=='Informatie') 	//informatie
  { 
   te = '<div class="name space"><h1>Informatie</h1></div>';

   te+=MaakSubmenu(new Array("","","","Wat kan ik ermee?","Hoe is de kaart gemaakt?","Over ons","Artikelen","Contact","",""),Submenu,"subnav");
   
   popuptekst='<table><tr><td>';
    
   if (Submenu==6){   //artikelen
         MeinFenster = window.open("http://www.kennisportalbereikbaarheid.nl/Internet/Webpages/Standard.asp?PageID=1", "Artikelen", "width=1000,height=700");        
         MeinFenster.focus();
         popuptekst+='<p>De pagina wordt in een nieuw venster geopend. De pagina kan ook worden geopend met deze link <br></p><a href="http://www.kennisportalbereikbaarheid.nl/Internet/Webpages/Standard.asp?PageID=1" target="_blank">Artikelen</a>';
   }
    
  if (Submenu==3){  //wat kan ik er mee
     popuptekst+='<div class="name space"><h1>Wat kan ik ermee?</h1></div>';
     popuptekst+= '<p class="toelichting_text">Vastgoedeigenaren en -ontwikkelaars, winkelcentra, huurders, publiekstrekkers - ze hebben allen belang bij goede bereikbaarheid. De bereikbaarheidskaart geeft inzicht in de invloed van infrastructuur op de bereikbaarheid van een plek door daarbij ook de ruimtelijke ordening mee te nemen. De bereikbaarheidskaart koppelt ruimte en mobiliteit en kan hierbij ondersteunen in beleidsinformatie die betrekking heeft op vraagstukken rondom infrastructuur en ruimtelijke ontwikkelingen. Enkele vragen zijn bijvoorbeeld:</p>';
     popuptekst+= '<p class="toelichting_text" style="margin-bottom: 0px"><b>Bereikbaarheidsverkenningen</b></p>';
     popuptekst+= '<ul><li>Ben ik in de toekomst ook nog een interessante vestingsplaats?</li>';
     popuptekst+= '<li>Welke gebieden profiteren of hebben last van nieuwe ontwikkelingen en files?</li>';
     popuptekst+= '<li>Hoe is het met de concurrentiepositie van mijn regio?</li>';
     popuptekst+= '<li>Waar kan ik mijn bedrijf in de toekomst het beste vestigen?</li></ul>';
     popuptekst+= '<p class="toelichting_text" style="margin-bottom: 0px"><b>Effectbepalingen</b></p>';
     popuptekst+= '<ul><li>Wat is het effect van mijn plannen op de concurrentiepositie van mijn regio?</li>';
     popuptekst+= '<li>Wat betekenen mijn plannen voor mijn doelgroepen?</li>';
     popuptekst+= '<li>Wat is de impact van een wegafsluiting op de bereikbaarheid van het centrum?</li>';
     popuptekst+= '<li>Hoe blijf ik een aantrekkelijke gemeente/regio om te wonen en werken?</li></ul>';
     popuptekst+= '<p class="toelichting_text" style="margin-bottom: 0px"><b>Beleidscommunicatie</b></p>';
     popuptekst+= '<ul><li>Hoe leg ik de consequenties van mijn plannen uit?</li>';
     popuptekst+= '<li>Hoe overtuig ik mijn doelgroep (lokaal, provincie) dat ze mee moeten gaan in mijn keuze?</li>';
     popuptekst+= '<li>Hoe creëer ik draagvlak voor mijn wegwerkzaamheden?</li>';
     popuptekst+= '<li>Hoe laat ik de ruimtelijk-economische effecten van mijn verkeersingrepen zien?</li></ul>';

     
     popuptekst+= '<p class="toelichting_text"></p>';
     popuptekst+= '<p class="toelichting_text"></p>';
     popuptekst+= '<p class="toelichting_text"></p>';
   }
   
    if (Submenu==4){             //Hoe is de kaart gemaakt
      popuptekst+='<div class="name space"><h1>Hoe is de kaart gemaakt?</h1></div>';
      /*
      popuptekst+= '<p class="toelichting_text"><b>Achtergrond</b>';
    	popuptekst+= '<br>Vastgoedeigenaren en -ontwikkelaars, winkelcentra, huurders, publiekstrekkers - ze hebben allen belang bij goede bereikbaarheid. Maar bij locatieontwikkeling kijken private partijen meestal naar de overheid. Alleen: die overheid kan de mobiliteitsgroei niet bijbenen. We staan aan de vooravond van grootschalige, private investeringen in bereikbaarheid. Dat is een majeure transitie, waarvoor de Raad voor Verkeer en Waterstaat onlangs aandacht heeft gevraagd. Het project \'Stations, Vastgoedwaarde en Bereikbaarheid\' van Transumo wil met nieuwe gezichtspunten en rekeninstrumenten deze transitie ondersteunen.</p>';
    	popuptekst+= '<p class="toelichting_text"><b>Reistijden vanuit gebied per auto, ochtendspits 2020</b>';
    	popuptekst+= '<br>Transumo is een programma waarin meer dan 150 Nederlandse kennisinstellingen, bedrijven en overheden hebben samengewerkt aan onderzoek op het gebied van duurzame mobiliteit. Transumo wil bijdragen aan een transitie van het huidige mobiliteitssysteem naar een systeem dat bijdraagt aan versterking van de economische concurrentiepositie, en daarnaast het milieu en de mens grote aandacht geeft.</p>';
    	*/
    	popuptekst+= '<p class="toelichting_text"><b>Verkeersmodel achter de Bereikbaarheidskaart</b>';
    	popuptekst+= '<br>Om de reistijden te voorspellen wordt gebruik gemaakt van een nationaal verkeersprognosemodel in <a href="http://www.omnitrans.nl">OmniTRANS</a> waarbij een zogenaamde dynamische toedelingstechniek (MaDAM) is gebruikt. Daardoor is ook rekening gehouden met files die vertraging veroorzaken. Het verplaatsingspatroon is berekend tussen 4000 zones (postcodegebieden). De rekenresultaten zijn gekalibreerd op waargenomen verkeersintensiteiten en waargenomen reistijden.</p>';
      popuptekst += '<p class="toelichting_text"><b>Disclaimer:</b> De informatie die deze kaart geeft over reistijden is gebaseerd op een zorgvuldige verwerking van beschikbare data. Desalniettemin kunnen de makers van de kaart geen verantwoording nemen voor schade die mogelijk ontstaat door het gebruik van de informatie. Nieuwe data over bijvoorbeeld reistijden of kenmerken van het wegen- of OV-netwerk zal aanleiding zijn om de kaart te actualiseren. Dat geldt ook voor wijzigingen in het investeringsprogramma ruimte en transport en andere ontwikkelingen, zoals \'betalen per kilometer\'.';
      popuptekst += '<br>Het verkeersmodel dat ten grondslag ligt aan deze website houdt nog geen rekening met inwoners en arbeidsplaatsen over de grens en op de waddeneilanden.</p></div>';
      popuptekst +='<span><table style="padding-top:2px; ">';
      popuptekst +='<tr><td colspan=2>&nbsp</td></tr>';
      popuptekst +='<tr><td style="font-size:8pt" valign=top>Initiatief:</td><td style="font-size:8pt"><a href="http://www.transumo.nl">Transumo</a></<td></tr>';
      popuptekst +='<tr><td style="font-size:8pt"valign=top>Applicatie:</td><td style="font-size:8pt"><a href="http://www.goudappel.nl">Goudappel Coffeng BV</a></<td></tr>';
      popuptekst +='<tr><td style="font-size:8pt"valign=top>Databronnen:</td><td style="font-size:8pt"></<td></tr>';
      popuptekst +='<tr><td style="font-size:8pt"valign=top>Verkeersmodel:</td><td style="font-size:8pt"><a href="http://www.goudappel.nl">Goudappel Coffeng BV</a>, <a href="http://www.omnitrans.nl">OmniTRANS</a></<td></tr>';
      popuptekst +='<tr><td style="font-size:8pt"valign=top>Socio-economische gegevens:</td><td style="font-size:8pt"><a href="http://www.abf.nl">ABF, primos prognoses en werkgelegenheidsprognoses</a></<td></tr>';
      popuptekst +='<tr><td style="font-size:8pt"valign=top>Postcodegebieden:</td><td style="font-size:8pt"><a href="http://www.andes.nl">Andes</a></<td></tr>'
      popuptekst +='<tr><td style="font-size:8pt"valign=top>Achtergrondlaag:</td><td style="font-size:8pt"><a href="http://www.openstreetmap.nl">Openstreetmap</a></<td></tr>';
      popuptekst +="</table></span>";
    }

  if (Submenu==5){  //over ons
      popuptekst+='<div class="name space"><h1>Over ons</h1></div>';
      popuptekst+='<p class="toelichting_text">Goudappel Coffeng wil d&eacute specialist zijn op het gebied van mobiliteit. We staan bekend om onze grote kennis en passie, benaderen mobiliteitsvraagstukken vanuit een brede kijk op mobiliteit en ruimte. Verkeersordening is ons sleutelbegrip. We volgen nieuwe maatschappelijke ontwikkelingen en spelen er op in. Om ons voortdurend te verplaatsen in wat er leeft en wat er gaat komen.</p>';
      popuptekst+='<p class="toelichting_text">Goudappel Coffeng heeft vestigingen in Deventer, Amsterdam, Den Haag, Eindhoven en Leeuwarden.</p>';
      popuptekst+='<p class="toelichting_text">Kijk op <a href="www.goudappel.nl" target="_blank">www.goudappel.nl</a> voor meer informatie.</p>';
   }

    if (Submenu==7){  // contact
        popuptekst += '<div class="name space"><h1>Contact</h1></div>';
        popuptekst +='<p class="menu_head"> Goudappel Coffeng BV </p>';
        popuptekst +='<p class="menu_text"> ';
        popuptekst +='Snipperlingsdijk 4<br>7417 BJ Deventer';
        popuptekst +='<br><br>Postbus 161<br>7400 AD Deventer';
        popuptekst +='<br><br>T: +31(0)570 - 666 222<br>F: +31(0)570 - 666 888<br>E: <A HREF="mailto:mmulder@goudappel.nl">mail ons</a><br>I:  <a href="www.goudappel.nl">www.goudappel.nl</a></p>';
        popuptekst +='<hr style="color:"grey"; background-color:red; height:1px;">';
 
    }
    
    popuptekst += '</td><td valign=\"top\">';


    document.getElementById("home").innerHTML =popuptekst;
  }
  
  bron='<a href="uitlegKaartbeeld.html" target="_blank">Uitleg kaartbeelden</a><br>';
  bron+='Achtergrondlaag: <a href="http://www.openstreetmap.nl" target="_blank">Openstreetmap</a>';
  
  
  document.getElementById("links").innerHTML = te;
  document.getElementById("bronvermelding").innerHTML = bron;   

  akt_layer();
  akt_tabellen();
}
  
function akt_tabellen()
{  
// MaakTabellen
  
  var Query=maakSelstring(Geoitems);
  Query += "!0";
  var tel=0;
  Query += "#";

  if (((Menuitemnaam[Hoofdmenu]=='Deur-tot-deurreistijden') && (Submenu==1))||((Menuitemnaam[Hoofdmenu]=='Bereikbaarheid') && (Submenu==7)))
  {
    Query += "0#0#gen2";
    tel=1;
  } 
	else if  ((Menuitemnaam[Hoofdmenu]=='Duurzaamheid') && (Submenu==4))
	{
	Query += "0#0#gen4";
        tel=1;	
	}
	else if ((Menuitemnaam[Hoofdmenu]=='Kilometerprijs')&&(Submenu==1))
	{
		
		    if ((Xprijs>0) && (Xprijs<99))
		    {}
	            else
		    {
		    (Xprijs=6.7);
		    }
		    Query += "0#" + Xprijs + "#gen3";
		    tel=1;
	}
  else
  {
    for (var j=0;j<Tabellen.length;j++)
      if (Tabellen[j].maakTabel) 
      { Query += Tabellen[j].ID + "|";
        tel++;
      }
    Query += "#";  
    if (aktKaart>-1) Query += Tabellen[aktKaart].geotabel;
    Query += "#";  
    if (aktKaart>-1) Query += Tabellen[aktKaart].datatabel;
  }
   

	//Scenario in de legenda

    scenarioLegenda=""  ;
   	if ((Menuitemnaam[Hoofdmenu]=='Bereikbaarheid' && Submenu!=7)||(Menuitemnaam[Hoofdmenu]=='Kilometerprijs' && Submenu==2))
      { global_ScenarioLegenda = global_ScenarioLegenda.replace(/skim /i,"")
        global_ScenarioLegenda = global_ScenarioLegenda.replace(/auto 2005/,"Reistijden per auto tijdens de ochtendspits in 2008")
        global_ScenarioLegenda = global_ScenarioLegenda.replace("auto 2020","Reistijden per auto tijdens de ochtendspits in 2020 (indicatief)")
        global_ScenarioLegenda = global_ScenarioLegenda.replace(/auto spits 2005/,"Reistijden per auto tijdens de ochtendspits in 2008")
        global_ScenarioLegenda = global_ScenarioLegenda.replace(/auto dal 2005/,"Reistijden per auto tijdens de daluren in 2008")
        global_ScenarioLegenda = global_ScenarioLegenda.replace("auto spits 2020","Reistijden per auto tijdens de ochtendspits in 2020 (indicatief)")
        global_ScenarioLegenda = global_ScenarioLegenda.replace(/auto dal 2020/,"Reistijden per auto tijdens de daluren in 2020 (indicatief)")
        global_ScenarioLegenda = global_ScenarioLegenda.replace("OV 2005","Reistijden per OV tijdens de ochtendspits in 2008")
        global_ScenarioLegenda = global_ScenarioLegenda.replace("OV 2008","Reistijden per OV tijdens de ochtendspits in 2008")
        global_ScenarioLegenda = global_ScenarioLegenda.replace("OV 2020","Reistijden per OV tijdens de ochtendspits in 2020 (indicatief)")
        global_ScenarioLegenda = global_ScenarioLegenda.replace("fiets 2005","Reistijden per fiets in 2008")
        global_ScenarioLegenda = global_ScenarioLegenda.replace("2005","2008")
        global_ScenarioLegenda = global_ScenarioLegenda.replace("2008 dal","daluren huidige situatie")
        global_ScenarioLegenda = global_ScenarioLegenda.replace("2008 dal","ochtendspits huidige situatie")
        //global_ScenarioLegenda = global_ScenarioLegenda.replace("2008","huidig")
        var result =global_ScenarioLegenda.match("indicatief","gi");
        if (result !="indicatief" ) {
        global_ScenarioLegenda = global_ScenarioLegenda.replace("2020","2020 (indicatief)")}
        global_ScenarioLegenda = global_ScenarioLegenda.replace(/van\b/,"vanuit de betreffende locatie")
        global_ScenarioLegenda = global_ScenarioLegenda.replace(/naar$/,"naar de betreffende locatie")
        global_ScenarioLegenda = global_ScenarioLegenda.replace(/\bprijs/,"met kilometerprijs")
        scenarioLegenda ="<tr><td colspan=5>Scenario: ";                          
        scenarioLegenda +=global_ScenarioLegenda;
        scenarioLegenda +="</td><tr>"; }
   
            
  if (tel==0)
  { if (InfoMenuHoogte != 0)
       	document.getElementById("info").innerHTML = "";
    	resizeMap();
  }
  else
  {   
  	if (laatsteQuery != Query)
  	{   	       
	    var nieuwInfoMenuHoogte = 200;
	    var pretekst = "";
      var aid=-1; 
      if (aktKaart>=0)  
      { 
      //geen tekst in informatieboxje onderin
      	 if ((Menuitemnaam[Hoofdmenu]=='Demografie')||((Menuitemnaam[Hoofdmenu]=='Bereikbaarheid')&&(Submenu==4))||((Menuitemnaam[Hoofdmenu]=='Bereikbaarheid')&&(Submenu==5))||((Menuitemnaam[Hoofdmenu]=='Bereikbaarheid')&&(Submenu==6))||((Menuitemnaam[Hoofdmenu]=='Duurzaamheid')&&(Submenu==3)) )
  	  	{ nieuwInfoMenuHoogte = 0;   	
  	  	  pretekst ='99';
  	  	  global_ScenarioLegenda="";
  	  	}  
	    }	

	
	//if (Menuitemnaam[Hoofdmenu]=='Demografie')//demografie dan nieuwe kaart tonen
  //{
   if (nieuwekaartWMS1.getVisibility()) aLegenda=1; else aLegenda=0;
 if (nieuwekaartWMS2.getVisibility()) bLegenda=1; else bLegenda=0; 
	 
	    
	 //NIEUWE KAART   
	 var nieuwekaart ="";
	 nieuwekaart +="<table><hr><tr><td><p class='infotekst'>De Nieuwe Kaart van Nederland";
  		var lagen=new Array("nieuwekaartWMS1","Rode plannen",
                      "nieuwekaartWMS2","Groene plannen"               
                      );
  		//for (var i=0;i<lagen.length;i+=2)
  		
		
    	 //nieuwe kaart rood
    	 nieuwekaart += "<br><input type='checkbox'";
    	 if (aLegenda==1) nieuwekaart += " checked ";
    	 nieuwekaart += "name='"+lagen[0]+"' onmousedown='javascript:"+lagen[0]+".setVisibility(!this.checked);akt_tabellen();'>"+lagen[1];
    	 
    	 
    	 //nieuwe kaart groen
    	 nieuwekaart += "<br><input type='checkbox' ";
    	 if (bLegenda==1) nieuwekaart += " checked ";
    	 nieuwekaart += " name='"+lagen[2]+"' onmousedown='javascript:"+lagen[2]+".setVisibility(!this.checked);akt_tabellen();'>"+lagen[3];
  	 nieuwekaart +="</p>"; 
	 
	 nieuwekaart += "<p>Voor meer informatie zie ook <a href=http://www.nieuwekaart.nl target=_blank> www.nieuwekaart.nl </a></p></td></tr></table>";
	    global_legendainhoud+=nieuwekaart;

 
	 	 
	 	
	 	 
    	if (pretekst!="")          //als informatie (pretekst) vast staat, was het geval bij bijv ontplooiing
           {
    	  	 if (pretekst==99)
    	  	 {
                global_tabelinhoud = "";
    	  	  }
            else
            {   
                global_tabelinhoud = pretekst; 
            }  	  	  
        	  	  //legenda update
        	  	  var aid=-1; if (aktKaart>=0) aid = Tabellen[aktKaart].ID;
    	      		global_legendainhoud = "<div class=\"name space\"><h1>Maken Legenda...</h1></div>";
    	      		resizeMap();
    	      
    	      		new OpenLayers.Ajax.Request("GetLegenda.php", { method: 'get', parameters:
    		    	{'Query': Query,
    	      		'AktKaart': aid,
    	      		'aLegenda':aLegenda,
    	      		'bLegenda':bLegenda
    	      		},
    		      onComplete: function(hReq) {global_legendainhoud = hReq.responseText+scenarioLegenda+nieuwekaart; resizeMap();}
    		      });
		        
    	  	} 
      else // extern ophalen
    	{
        var aid=-1; if (aktKaart>=0) aid = Tabellen[aktKaart].ID;
	      global_legendainhoud = "<div class=\"name space\"><h1>Maken Legenda...</h1></div>";
	      global_tabelinhoud="<div class=\"name space\"><p class=\"infotekst\">Maken tabel...</p></div>"
	      document.getElementById("ladendT").style.visibility = "visible";
	      resizeMap();
	      
	      new OpenLayers.Ajax.Request("GetLegenda.php", { method: 'get', parameters:
		    {'Query': Query,
	       'AktKaart': aid,
	       'aLegenda':aLegenda,
	       'bLegenda':bLegenda
	      },
		      onComplete: function(hReq) {global_legendainhoud = hReq.responseText+scenarioLegenda+nieuwekaart; resizeMap();}
		      
		    });    
			          
	     new OpenLayers.Ajax.Request("GetData.php", { method: 'get', parameters:
		    {'Query': Query,
	       'AktKaart': aid
	      },
	      onComplete: function(hReq) {global_tabelinhoud = hReq.responseText; document.getElementById("ladendT").style.visibility = "hidden"; resizeMap();}
	      });
	}
	
    	
    		
	  } 
  }	    
}

 


// ----------------------
  function akt_layer()
// ----------------------
{
    

  if (SubmenuVerander!="")
  {
  x=(Hoofdmenu +"_"+ Submenu);

 //alert (SubmenuVerander + x + Onthoudpostcode);  

 if (SubmenuVerander=="0_1" && x=="2_2")
  {Geoitems[0]=Onthoudpostcode}
 else if(SubmenuVerander!=x)
  {Geoitems=new Array};
  }

 //  alert (Geoitems[0]); 

  SubmenuVerander=Hoofdmenu +"_"+ Submenu;
 


  var sel=maakSelstring(Geoitems);
  if ((Menuitemnaam[Hoofdmenu]=='Bereikbaarheid')&&(Submenu==2)&&(Ondermenu>=3)) // locatiezoeker
    for (var t=0;t<Locatiezoeker_Eigendata.length;t++)
      sel += "!"+Locatiezoeker_Eigendata[t][0]+"!"+Locatiezoeker_Eigendata[t][1];
  else
    sel += "!0";                        
  
  
  
  if (aktKaart!=-1)
  {
  	
  	var provincie = "NL";
    	if ((PROV.length)>0) 
    	{
    	provincie = PROV
	}
    	
    datalaag.mergeNewParams({VARIABEL:Tabellen[aktKaart].ID, SEL:sel, p:provincie});
    datalaag.setOpacity(0.5);
    mapnik.setOpacity(0.5);
    datalaag.setVisibility(true);    
  }
  else if (((Menuitemnaam[Hoofdmenu]=='Deur-tot-deurreistijden') && (Submenu==1))|| ((Menuitemnaam[Hoofdmenu]=='Bereikbaarheid')&& (Submenu==7))|| ((Menuitemnaam[Hoofdmenu]=='Kilometerprijs')&& (Submenu==1))|| ((Menuitemnaam[Hoofdmenu]=='Duurzaamheid')&& (Submenu==4)))
  {
    datalaag.mergeNewParams({VARIABEL:"gen2", SEL:sel});
    datalaag.setOpacity(0.5);
    mapnik.setOpacity(0.5);    
    datalaag.setVisibility(true);    
  } 	
	
  else
  {   
  	datalaag.setVisibility(false);
  	mapnik.setOpacity(1);
  }	
}

function Mutatievragen(vraag)
{ if (gemuteerd)
  {
    vraag += String.fromCharCode(10);  
    vraag += "Wilt u doorgaan zonder opslaan?";  
	  return confirm(vraag);
	} 
	else return true;
}	

// ----------------------
function maakSelstring(Geoitems)
// ----------------------
{
	var s="";
  for (var i=0;i<Geoitems.length;i++)
    if (i==0) s+=Geoitems[i]; else s+= "|" + Geoitems[i];
  return s;  
}

// ----------------------
function MaakSubmenu(SubMenuitemnaam,Submenu,acss)   
// ----------------------
{
  var te='<ul id="'+acss+'">';
  te += '<li style="height:1px; padding:1px; ">&nbsp;</li>';
  for (var t=1;t<SubMenuitemnaam.length;t++)
  { 
  	if (SubMenuitemnaam[t]!="")
  	{
	    if (SubMenuitemnaam[t].substring(0,1)=="*")
	    { 
	      te += "<li class='vast'>"+SubMenuitemnaam[t].substring(1)+"</li>";
	    }
	    else
	    {
		    te += '<li ';
		    if (Submenu==t) te+= 'class="active"';
		    te += '><a ';
		    if (Submenu==t) te+= 'class="active"'; 
		    te += 'href="javascript:Submenu='+t+';Ondermenu=1;MaakMenu()">'+SubMenuitemnaam[t]+'</a></li>';
	    }
	  } 
  } 
  te += '</ul>';
  return te;
}

// ----------------------
function MaakOndermenu(SubMenuitemnaam,Ondermenu,acss)   
// ----------------------
{
  var te='<ul id="'+acss+'">';
  te += '<li style="height:1px; padding:1px; ">&nbsp;</li>';
  for (var t=1;t<SubMenuitemnaam.length;t++)
  { 
  	if (SubMenuitemnaam[t]!="")
  	{
	    if (SubMenuitemnaam[t].substring(0,1)=="*")
	    { 
	      te += "<li class='vast'>"+SubMenuitemnaam[t].substring(1)+"</li>";
	    }
	    else
	    {
		    te += '<li ';
		    if (Ondermenu==t) te+= 'class="active"';
		    te += '><a ';
		    if (Ondermenu==t) te+= 'class="active"'; 
		    te += 'href="javascript:Ondermenu='+t+';MaakMenu()">'+SubMenuitemnaam[t]+'</a></li>';
      }
    }
  } 
  //te += '<li ><a href="javascript:Ondermenu=0;Submenu=1;MaakMenu()"><img src="micons/pijlterug.png"> Terug </a></li>';
  
  te += '</ul>';
  return te;
}

// ----------------------
function MaakOpties(tekst,arr_items)
// ----------------------
{
	var te = tekst;
	klikAardbolfromPopup(arr_items[2],arr_items[1],-1);
  te+='<form name="profiel" >';
  te+='<SELECT NAME="scenario" onchange="temparr=this.value.split(\'@\');klikAardbolfromPopup(temparr[0],temparr[1],-1); akt_layer(); akt_tabellen();">';
  for (i=0;i<arr_items.length;i+=3) 
    te+='<OPTION VALUE="'+arr_items[i+2]+'@'+arr_items[i+1]+'">'+arr_items[i]+'</OPTION>';
	te+='<br><br></SELECT>';     
	return te; 
}


// ------------
function handleInformatieAanvraag(email) {
// ------------
    new OpenLayers.Ajax.Request("verstuur-informatie.php", { method: 'get', parameters:
    	{'Email': email
  		},
    	onComplete: alert("Bedankt voor uw interesse, uw mailadres is geregistreerd.")
    });

}


// ------------
function loadStart() {
// ------------
  document.getElementById("ladend0").style.visibility = "visible";
}

// ------------
function loadEnd() {
// ------------
  document.getElementById("ladend0").style.visibility = "hidden";
}