Index: ProScan/UI/HernoemPalletScherm.pas
===================================================================
diff -u -r524 -r525
--- ProScan/UI/HernoemPalletScherm.pas	(.../HernoemPalletScherm.pas)	(revision 524)
+++ ProScan/UI/HernoemPalletScherm.pas	(.../HernoemPalletScherm.pas)	(revision 525)
@@ -97,7 +97,7 @@
     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 not (TCommonFunctions.IsFrameId(edtNieuweCode.Text)) and (StartsText('O1',edtOudeCode.Text) or TCommonFunctions.IsFrameId(GeefPalletCodeVanDnaCode(edtOudeCode.Text))) then begin
+    end else if not (TCommonFunctions.IsFrameId(edtNieuweCode.Text)) and ((StartsText('O1',edtOudeCode.Text) or TCommonFunctions.IsFrameId(GeefPalletCodeVanDnaCode(edtOudeCode.Text)))) then begin
       ToonPopupScherm('Hier moet een Vhosskast ingescand worden.','Probeer opnieuw','');
       edtNieuweCode.Text := '';
     end else begin