Index: vhUnitTest/BL/PPS/TBX/DocsV1/EtikettenCommissieOne/Test.cls.xml =================================================================== diff -u -r54303 -r71813 --- vhUnitTest/BL/PPS/TBX/DocsV1/EtikettenCommissieOne/Test.cls.xml (.../Test.cls.xml) (revision 54303) +++ vhUnitTest/BL/PPS/TBX/DocsV1/EtikettenCommissieOne/Test.cls.xml (.../Test.cls.xml) (revision 71813) @@ -10,12 +10,10 @@ right -LabelPrinter:BL.Sys.LabelPrinter="",BatchService:APPS.Halux.common.BatchService="",ProductieSequentieRepository:APPS.Halux.common.ProductieSequentieRepository="",ToeleveringService:DOM.AKP.ToeleveringService,LogoBepaler:BL.PPS.common.impl.OnderdelendoosLogoBepaler,ProductieService:APPS.Halux.common.ProductieService="" +LabelPrinter:BL.Sys.LabelPrinter="",BatchService:APPS.Halux.common.BatchService="",ProductieSequentieRepository:APPS.Halux.common.ProductieSequentieRepository="",ToeleveringService:DOM.AKP.ToeleveringService,LogoBepaler:BL.Flow.Levering.LabelLogoBepaler,ProductieService:APPS.Halux.common.ProductieService="" %Status Index: BL/PPS/TBX/DocsV1.cls.xml =================================================================== diff -u -r70831 -r71813 --- BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 70831) +++ BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 71813) @@ -96,7 +96,7 @@ -BL.PPS.common.impl.OnderdelendoosLogoBepaler +BL.Flow.Levering.LabelLogoBepaler 1 @@ -181,7 +181,7 @@ -LabelPrinter:BL.Sys.LabelPrinter="",BatchService:APPS.Halux.common.BatchService="",ProductieSequentieRepository:APPS.Halux.common.ProductieSequentieRepository="",ToeleveringService:DOM.AKP.ToeleveringService,LogoBepaler:BL.PPS.common.impl.OnderdelendoosLogoBepaler,ProductieService:APPS.Halux.common.ProductieService="" +LabelPrinter:BL.Sys.LabelPrinter="",BatchService:APPS.Halux.common.BatchService="",ProductieSequentieRepository:APPS.Halux.common.ProductieSequentieRepository="",ToeleveringService:DOM.AKP.ToeleveringService,LogoBepaler:BL.Flow.Levering.LabelLogoBepaler,ProductieService:APPS.Halux.common.ProductieService="" 1 1 %Status @@ -195,7 +195,7 @@ Set ..ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI() Set ..TBXMatToEnuMatConverter = ##class(BL.PPS.TBX.impl.TBXMatToEnuMatConverter).%New() Set ..MatFormatter = ##class(APPS.Halux.PPS.impl.Formatter.Mat).%New() - Set ..LogoBepaler = $$$Inject(LogoBepaler, ##class(BL.PPS.common.impl.OnderdelendoosLogoBepaler).%New()) + Set ..LogoBepaler = $$$Inject(LogoBepaler, ##class(BL.Flow.Levering.LabelLogoBepaler).%New()) Set ..ProboxInhoudEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxInhoudEtiketGenerator).%New() Set ..ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New() Quit $$$OK @@ -1993,6 +1993,7 @@ #dim OrderID As %String = Toelevering.GeefOrderID() #dim Klant As DOM.VKP.VanHoeckeKlant = ..ToeleveringService.GeefKlant(TOENr) + #dim KlantNummer As %Integer = Klant.GeefCode() Set pxLabel=##class(BL.PPS.TBX.sub.pxCommissie).%New() @@ -2002,7 +2003,7 @@ Set pxLabel.Device = ..#LabelPrinter } Set pxLabel.Layout =..#LabelExtraCommissie - Set pxLabel.Logo = ..LogoBepaler.GeefLogo(Klant) + Set pxLabel.Logo = ..LogoBepaler.GeefLogo(Toelevering.GeefOorsprongKetting(), KlantNummer) Set pxLabel.KlantNaam = Klant.GeefNaam() Set pxLabel.CommissieRef = ..CommissieRef(Klant.GeefCode(),OrderID) Set pxLabel.OrderNr = OrderID