Index: AAPClient/UI/DnaCodeScherm.pas =================================================================== diff -u -r278 -r282 --- AAPClient/UI/DnaCodeScherm.pas (.../DnaCodeScherm.pas) (revision 278) +++ AAPClient/UI/DnaCodeScherm.pas (.../DnaCodeScherm.pas) (revision 282) @@ -5,7 +5,7 @@ uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, DrieKnoppenScherm, Vcl.ActnList, - Vcl.StdCtrls, DnaCodeService, Vcl.ExtCtrls, Images, Vcl.Imaging.pngimage; + Vcl.StdCtrls, DnaCodeService, Vcl.ExtCtrls, Images, Vcl.Imaging.pngimage, System.StrUtils; type TfmDnaCodeScherm = class(TfmDrieKnoppenScherm) @@ -141,7 +141,8 @@ ZetToeleveringStatus(DnaCodeStatus.InBuffer, BepaalDirecteLevering); if Self.ModalResult = mrPallet then begin ToonPopupScherm('Toelevering succesvol afgerond','OK','',19,-1,-1,clGreen); - DrukProboxEtiketAfIndienNodig; + if System.StrUtils.LeftStr(UiContext.Pallet,3) = 'TBP' then + DrukProboxEtiketAfIndienNodig; end; end else begin fWaarschuwingModalResult := ToonPopupScherm('Onvolledige toelevering','Scan code','Nieuw',18,11,12);