Index: APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml =================================================================== diff -u -r71855 -r71861 --- APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml (.../LadeKlantEtiketBuilder.cls.xml) (revision 71855) +++ APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml (.../LadeKlantEtiketBuilder.cls.xml) (revision 71861) @@ -220,9 +220,12 @@ Set Etiket.VerzendWijze = $P(Order.GeefVerzendingWijze(),";") Set Etiket.LblOrder = ..GeefVertalingLabel("ORDER",Partij.GeefTaal(),"Order") Set Etiket.OrderID = Order.GeefID() - Set Etiket.LogoImg = Klant.GeefLogo() - - #dim InfoItems As %ListOfObjects = ..GeefInfoItems(Partij, ProductOrderLijn, ToeleveringLijn) + Set Etiket.LogoImg = ##class(BL.Flow.Levering.LabelLogoBepaler).%New().GeefLogo(Order.GeefOorsprongKetting(), Klant.GeefCode()) + If (Etiket.LogoImg = "Logo\Logo VHZwart.svg") { + Set Etiket.LogoImg = Klant.GeefLogo() + } + + #dim InfoItems As %ListOfObjects = ..GeefInfoItems(Partij, ProductOrderLijn, ToeleveringLijn) Do ..VoegToeInfoItems(Etiket,Partij,InfoItems) Quit Etiket