Index: ProScan/UI/HernoemPalletScherm.pas
===================================================================
diff -u -r512 -r518
--- ProScan/UI/HernoemPalletScherm.pas	(.../HernoemPalletScherm.pas)	(revision 512)
+++ ProScan/UI/HernoemPalletScherm.pas	(.../HernoemPalletScherm.pas)	(revision 518)
@@ -96,6 +96,9 @@
     if StartsText('K',edtOudeCode.Text) and not (TCommonFunctions.IsKaderdeurLocatie(edtNieuweCode.Text)) then begin
       ToonPopupScherm('Hier moet een kaderdeurlocatie ingescand worden.','Probeer opnieuw','');
       edtNieuweCode.Text := '';
+    end else if StartsText('O1',edtOudeCode.Text) and not (TCommonFunctions.IsFrameId(edtNieuweCode.Text)) then begin
+      ToonPopupScherm('Hier moet een Vhosskast ingescand worden.','Probeer opnieuw','');
+      edtNieuweCode.Text := '';
     end else begin
       HernoemPallet(edtOudeCode.Text, edtNieuweCode.Text);
       edtOudeCode.Text := '';