Index: ProScan/UI/PalletScherm.pas
===================================================================
diff -u -r669 -r674
--- ProScan/UI/PalletScherm.pas	(.../PalletScherm.pas)	(revision 669)
+++ ProScan/UI/PalletScherm.pas	(.../PalletScherm.pas)	(revision 674)
@@ -60,6 +60,8 @@
 
   //checken of pallet in gebruik is indien het vorige geslaagd is
   if fPalletGevalideerd and not(UiContext.Modus = modusKAD) and not(UiContext.Modus = modusVHOSS ) then begin
+    if (UiContext.MoetTbpCodeGenereren = true) then
+      edtPallet.Text := '000000'; // Kleine hack om hieronder een foute statuscode te geven
     fAgent := TAgent.Create(UiContext);
     fZoekViaPalletCodeResponse := fAgent.ZoekViaPalletCode(edtPallet.Text);
     fAgent.Free;