Index: AAPClient/UI/DnaCodeScherm.pas
===================================================================
diff -u -r216 -r217
--- AAPClient/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 216)
+++ AAPClient/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 217)
@@ -240,7 +240,7 @@
       ToonPopupScherm(Response.Header.Omschrijving, 'Probeer opnieuw');
       Self.ModalResult := mrPallet;
     end else begin
-      ToonPopupScherm('Pallet '+UiContext.Pallet+' volledig verwerkt', 'Probeer opnieuw');
+      ToonPopupScherm('Pallet '+UiContext.Pallet+' volledig verwerkt','OK','',19,-1,-1,clGreen);
       Self.ModalResult := mrPallet;
     end;
   finally