Index: PlanScan/Main.dfm
===================================================================
diff -u -r288 -r289
--- PlanScan/Main.dfm	(.../Main.dfm)	(revision 288)
+++ PlanScan/Main.dfm	(.../Main.dfm)	(revision 289)
@@ -27,7 +27,7 @@
     Top = 0
     Width = 635
     Height = 336
-    ActivePage = tsGebruikers
+    ActivePage = tsDnaCodes
     Align = alClient
     TabOrder = 1
     object tsDnaCodes: TTabSheet
Index: PlanScan/Main.pas
===================================================================
diff -u -r288 -r289
--- PlanScan/Main.pas	(.../Main.pas)	(revision 288)
+++ PlanScan/Main.pas	(.../Main.pas)	(revision 289)
@@ -215,7 +215,6 @@
 procedure TfmMain.ZoekAlleGebruikers();
 var
   fZoekGebruikersResponse: ZoekGebruikersResponse;
-  Gebruikers: ArrayOfGebruikerGebruiker;
 begin
   fZoekGebruikersResponse := TAgent.Create(UiContext).ZoekAlleGebruikers();
   try