Index: AAPClient/UI/HernoemPalletScherm.pas
===================================================================
diff -u -r340 -r342
--- AAPClient/UI/HernoemPalletScherm.pas	(.../HernoemPalletScherm.pas)	(revision 340)
+++ AAPClient/UI/HernoemPalletScherm.pas	(.../HernoemPalletScherm.pas)	(revision 342)
@@ -82,7 +82,7 @@
       end;
       if StartsText('K',edtOudeCode.Text) then
         fEnkelDezeDnaCode := edtOudeCode.Text;
-
+        lblNieuweCode.Caption := 'Scan nieuwe kaderdeurlocatie';
       if fEnkelDezeDnaCode = '' then begin
         HernoemPallet(edtOudeCode.Text,'');
         pcHernoemPallet.ActivePageIndex := 1;
@@ -207,6 +207,7 @@
   pcHernoemPallet.ActivePageIndex := 0;
   edtOudeCode.Text := '';
   edtNieuweCode.Text := '';
+  lblNieuweCode.Caption := 'Scan nieuwe pallet- of DNA-Code';
   edtOudeCode.SetFocus;
   GridLeegmaken;
   inherited;