Index: APPS/Halux/Docs/EtiketBuilder.cls.xml =================================================================== diff -u -r31873 -r51302 --- APPS/Halux/Docs/EtiketBuilder.cls.xml (.../EtiketBuilder.cls.xml) (revision 31873) +++ APPS/Halux/Docs/EtiketBuilder.cls.xml (.../EtiketBuilder.cls.xml) (revision 51302) @@ -1,7 +1,7 @@ -%RegisteredObject +TECH.RegisteredObject APPS.Halux.Docs.EtiketPrinterBepaler @@ -74,6 +74,10 @@ #dim ToeleveringLijn As DOM.AKP.ProductToeleveringLijn = Toelevering.GeefToeleveringLijn(ToeleveringLijnID) #dim ProductID As %String = ToeleveringLijn.GeefProductID() #dim Partij As DOM.PARTIJ.Partij = ##class(DOM.DomeinContext).Instance().GeefPartijAPI().GeefPartij(Toelevering.GeefKlantID()) + If $$$HasLength(##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(Toelevering.GeefOrderID()).GeefOorsprongKetting()) { + #dim Order As DOM.VKP.Order = ##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(Toelevering.GeefOrderID()) + Set Partij = ##class(DOM.DomeinContext).Instance().GeefPartijAPI().GeefPartij(Order.GeefEindPersonality().GeefKlantID()) + } Set MPEtiketBuilder = ##class(APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New() #dim Etiket As BL.Etiket.LadeKlantEtiketVHoss = MPEtiketBuilder.MaakMaatwerkProductInVHossEtiket(ProductID,Partij,Aantal)