Index: ProScan/UI/DnaCodeScherm.pas
===================================================================
diff -u -r405 -r406
--- ProScan/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 405)
+++ ProScan/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 406)
@@ -150,6 +150,8 @@
     RondAfKaderdeurDag();
     UiContext.Toelevering := '';
     UiContext.Pallet := '';
+  end else if (UiContext.Modus = modusVHOSS) then begin
+    PalletBijwerken(DnaCodeStatus.InBuffer,false);
   end else begin
     if lblAantalGescand.Caption = lblTotaalAantal.Caption then begin
       fIsDirecteLevering := (UiContext.Modus = modusDefault) and BepaalDirecteLevering;