Index: ProScan/UI/DnaCodeScherm.pas
===================================================================
diff -u -r647 -r664
--- ProScan/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 647)
+++ ProScan/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 664)
@@ -274,7 +274,6 @@
   fDirecteLeveringResponse: DirecteLeveringResponse;
   fAgent: TAgent;
 begin
-  result := false;
   fAgent := TAgent.Create(UiContext);
   fDirecteLeveringResponse := fAgent.IsDirecteLevering(UiContext.Toelevering);
   fAgent.Free;