Index: ProScan/UI/DnaCodeScherm.pas
===================================================================
diff -u -r498 -r499
--- ProScan/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 498)
+++ ProScan/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 499)
@@ -177,6 +177,7 @@
     UiContext.Pallet := '';
   end else if (UiContext.Modus = modusVHOSS) then begin
     RondAfVhossBatch();
+    UiContext.Toelevering := '';
     UiContext.Pallet := '';
   end else begin
     fIsDirecteLevering := (UiContext.Modus = modusDefault) and BepaalDirecteLevering;