Index: APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml
===================================================================
diff -u -r70170 -r70177
--- APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml (.../PrintEtiketten.cls.xml) (revision 70170)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml (.../PrintEtiketten.cls.xml) (revision 70177)
@@ -56,13 +56,28 @@
1
+
+DOM.AKP.ToeleveringAPI
+1
+
+
+
+DOM.PM.ProductAPI
+1
+
+
+
+DOM.PM.IngegevenKenmerkenAPI
+1
+
+
APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten.PrintEtiketten.PrintEtikettenHelper
1
-LabelPrinterImpl:BL.Sys.LabelPrinter,AssemblageKarRepository:APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository="",BatchService:APPS.Halux.common.BatchService="",ToeleveringService:DOM.AKP.ToeleveringService=""
+LabelPrinterImpl:BL.Sys.LabelPrinter,AssemblageKarRepository:APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository="",BatchService:APPS.Halux.common.BatchService="",ToeleveringService:DOM.AKP.ToeleveringService="",ToeleveringAPI:DOM.AKP.ToeleveringAPI="",ProductAPI:DOM.PM.ProductAPI="",IngegevenKenmerkenAPI:DOM.PM.IngegevenKenmerkenAPI=""
1
1
%Status
@@ -73,7 +88,10 @@
Set ..AssemblageKarRepository = $$$Inject(AssemblageKarRepository, ##class(APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository).%New())
Set ..BatchService = $$$Inject(BatchService, ##class(APPS.Halux.common.impl.BatchService).%New())
Set ..ToeleveringService = $$$Inject(ToeleveringService, ##class(DOM.AKP.impl.ToeleveringService).%New())
- Set ..PrintEtikettenHelper = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten.PrintEtiketten.PrintEtikettenHelper).%New(..AssemblageKarRepository, ..BatchService, ..ToeleveringService)
+ Set ..ToeleveringAPI = $$$Inject(ToeleveringAPI, ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI())
+ Set ..ProductAPI = $$$Inject(ProductAPI, ##class(DOM.DomeinContext).Instance().GeefProductAPI())
+ Set ..IngegevenKenmerkenAPI = $$$Inject(IngegevenKenmerkenAPI, ##class(DOM.DomeinContext).Instance().GeefIngegevenKenmerkenAPI())
+ Set ..PrintEtikettenHelper = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten.PrintEtiketten.PrintEtikettenHelper).%New(..AssemblageKarRepository, ..BatchService, ..ToeleveringService, ..ToeleveringAPI, ..ProductAPI, ..IngegevenKenmerkenAPI)
Quit $$$OK
]]>
Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/Test.cls.xml
===================================================================
diff -u -r39927 -r70177
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/Test.cls.xml (.../Test.cls.xml) (revision 39927)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/Test.cls.xml (.../Test.cls.xml) (revision 70177)
@@ -23,6 +23,21 @@
1
+
+vhTest.Mock.DOM.PM.ProductAPI
+1
+
+
+
+vhTest.Mock.DOM.AKP.ToeleveringAPI
+1
+
+
+
+vhTest.Mock.DOM.PM.IngegevenKenmerkenAPI
+1
+
+
aTestName:%String
@@ -67,7 +83,7 @@
#dim AssemblageKarRepositoryStub As vhTest.Mock.APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository = ##class(vhTest.Mock.APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository).%New()
Do AssemblageKarRepositoryStub.IndienMethodCall("GeefKarVolgnummerViaSequentieNr", KlantEtiketUitvoeringInfo1.BatchID, $$$ElkeWaarde, "").DanReturn(1)
- #dim Verwerker As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten).%New(..FakeLabelPrinter, AssemblageKarRepositoryStub, ..BatchServiceStub, ..ToeleveringServiceStub)
+ #dim Verwerker As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten).%New(..FakeLabelPrinter, AssemblageKarRepositoryStub, ..BatchServiceStub, ..ToeleveringServiceStub, ..ToeleveringAPIStub, ..ProductAPIStub, ..IngegevenKenmerkenAPIStub)
Do Verwerker.VerwerkUitvoeringInfoLijst(Lijst,##class(APPS.Halux.PPS.Activiteit.ActiviteitParameters).%New())
Do $$$AssertCorrectGemaakteBestanden(..GeefBestandLocatie())
@@ -100,7 +116,7 @@
#dim AssemblageKarRepositoryStub As vhTest.Mock.APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository = ##class(vhTest.Mock.APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository).%New()
Do AssemblageKarRepositoryStub.IndienMethodCall("GeefKarVolgnummerViaSequentieNr", KlantEtiketUitvoeringInfo1.BatchID, $$$ElkeWaarde, "").DanReturn(1)
- #dim Verwerker As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten).%New(..FakeLabelPrinter, AssemblageKarRepositoryStub, ..BatchServiceStub, ..ToeleveringServiceStub)
+ #dim Verwerker As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten).%New(..FakeLabelPrinter, AssemblageKarRepositoryStub, ..BatchServiceStub, ..ToeleveringServiceStub, ..ToeleveringAPIStub, ..ProductAPIStub, ..IngegevenKenmerkenAPIStub)
Do Verwerker.VerwerkUitvoeringInfoLijst(Lijst,##class(APPS.Halux.PPS.Activiteit.ActiviteitParameters).%New())
Do $$$AssertCorrectGemaakteBestanden(..GeefBestandLocatie())
@@ -125,7 +141,7 @@
Do AssemblageKarRepositoryStub.IndienMethodCall("GeefKarVolgnummerViaSequentieNr", KlantEtiketUitvoeringInfo1.BatchID, 1, "").DanReturn(1)
Do AssemblageKarRepositoryStub.IndienMethodCall("GeefKarVolgnummerViaSequentieNr", KlantEtiketUitvoeringInfo1.BatchID, 2, "").DanReturn(2)
- #dim Verwerker As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten).%New(..FakeLabelPrinter, AssemblageKarRepositoryStub, ..BatchServiceStub, ..ToeleveringServiceStub)
+ #dim Verwerker As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten).%New(..FakeLabelPrinter, AssemblageKarRepositoryStub, ..BatchServiceStub, ..ToeleveringServiceStub, ..ToeleveringAPIStub, ..ProductAPIStub, ..IngegevenKenmerkenAPIStub)
Do Verwerker.VerwerkUitvoeringInfoLijst(Lijst, ##class(APPS.Halux.PPS.Activiteit.ActiviteitParameters).%New())
Do $$$AssertCorrectGemaakteBestanden(..GeefBestandLocatie())
@@ -199,6 +215,36 @@
Quit KlantEtiketData
]]>
+
+
+
+
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml
===================================================================
diff -u -r61716 -r70177
--- APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml (.../KlantEtiketten.cls.xml) (revision 61716)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml (.../KlantEtiketten.cls.xml) (revision 70177)
@@ -23,8 +23,23 @@
1
+
+DOM.AKP.ToeleveringAPI
+1
+
+
+
+DOM.PM.ProductAPI
+1
+
+
+
+DOM.PM.IngegevenKenmerkenAPI
+1
+
+
-LabelPrinterImpl:BL.Sys.LabelPrinter,AssemblageKarRepository:APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository="",BatchService:APPS.Halux.common.BatchService="",ToeleveringService:DOM.AKP.ToeleveringService=""
+LabelPrinterImpl:BL.Sys.LabelPrinter,AssemblageKarRepository:APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository="",BatchService:APPS.Halux.common.BatchService="",ToeleveringService:DOM.AKP.ToeleveringService="",ToeleveringAPI:DOM.AKP.ToeleveringAPI="",ProductAPI:DOM.PM.ProductAPI="",IngegevenKenmerkenAPI:DOM.PM.IngegevenKenmerkenAPI=""
1
1
%Status
@@ -36,14 +51,17 @@
Set ..LabelPrinterImpl = $$$Inject(LabelPrinterImpl, ##class(BL.Sys.LabelPrinter).%New())
Set ..AssemblageKarRepository = $$$Inject(AssemblageKarRepository, ##class(APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository).%New())
Set ..BatchService = $$$Inject(BatchService, ##class(APPS.Halux.common.impl.BatchService).%New())
- Set ..ToeleveringService = $$$Inject(ToeleveringService, ##class(DOM.AKP.impl.ToeleveringService).%New())
+ Set ..ToeleveringService = $$$Inject(ToeleveringService, ##class(DOM.AKP.impl.ToeleveringService).%New())
+ Set ..ToeleveringAPI = $$$Inject(ToeleveringAPI, ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI())
+ Set ..ProductAPI = $$$Inject(ProductAPI, ##class(DOM.DomeinContext).Instance().GeefProductAPI())
+ Set ..IngegevenKenmerkenAPI = $$$Inject(IngegevenKenmerkenAPI, ##class(DOM.DomeinContext).Instance().GeefIngegevenKenmerkenAPI())
Quit $$$OK
]]>
-
Index: vhTest/Fake/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml
===================================================================
diff -u -r61716 -r70177
--- vhTest/Fake/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml (.../KlantEtiketten.cls.xml) (revision 61716)
+++ vhTest/Fake/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml (.../KlantEtiketten.cls.xml) (revision 70177)
@@ -16,25 +16,21 @@
UitvoeringInfoLijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst
-
+
UitvoeringInfoLijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst
-
+
Listener:APPS.Halux.PPS.UitvoeringInfoLijstVerwerkerListener
-
+
-
+
@@ -46,14 +42,12 @@
ListenerVerwittiger:APPS.Halux.PPS.impl.UitvoeringInfoListenerVerwittiger
-
+
UitvoeringInfoVerwerker:APPS.Halux.PPS.Activiteit.impl.UitvoeringInfoUitgesteldeVerwerker
-
+
Index: vhTest/Mock/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml
===================================================================
diff -u -r61716 -r70177
--- vhTest/Mock/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml (.../KlantEtiketten.cls.xml) (revision 61716)
+++ vhTest/Mock/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml (.../KlantEtiketten.cls.xml) (revision 70177)
@@ -9,7 +9,7 @@
right
-LabelPrinterImpl:BL.Sys.LabelPrinter,AssemblageKarRepository:APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository="",BatchService:APPS.Halux.common.BatchService="",ToeleveringService:DOM.AKP.ToeleveringService=""
+LabelPrinterImpl:BL.Sys.LabelPrinter,AssemblageKarRepository:APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository="",BatchService:APPS.Halux.common.BatchService="",ToeleveringService:DOM.AKP.ToeleveringService="",ToeleveringAPI:DOM.AKP.ToeleveringAPI="",ProductAPI:DOM.PM.ProductAPI="",IngegevenKenmerkenAPI:DOM.PM.IngegevenKenmerkenAPI=""
%Status