Index: AAPClient/UI/DnaCodeScherm.pas
===================================================================
diff -u -r175 -r176
--- AAPClient/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 175)
+++ AAPClient/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 176)
@@ -72,7 +72,7 @@
     if fWaarschuwingModalResult = mrYes then begin
       Self.ModalResult := mrDnaCode;
     end else begin
-      fWaarschuwingModalResult := ToonPopupScherm('Nieuwe toelevering starten?','Ja','Nee',true,6,7);
+      fWaarschuwingModalResult := ToonPopupScherm('Nieuwe toelevering starten?','Ja','Nee',14,6,7);
       if fWaarschuwingModalResult = mrYes then begin
         ZetToeleveringStatus(DnaCodeStatus.OnHold);
         Self.ModalResult := mrPallet;