Index: AAPClient/ProScanMain.pas
===================================================================
diff -u -r19 -r34
--- AAPClient/ProScanMain.pas	(.../ProScanMain.pas)	(revision 19)
+++ AAPClient/ProScanMain.pas	(.../ProScanMain.pas)	(revision 34)
@@ -95,6 +95,9 @@
     //PalletScherm tonen
     if fHuidigScherm.ClassType = TfmPalletScherm then begin
       fModalResult := fHuidigScherm.ShowModal;
+      if fHuidigScherm.ModalResult = mrYes then begin
+        fHuidigScherm := fHomeScherm;
+      end;
 
 
       continue;