Index: vhUnitTest/APPS/Halux/Planning/impl/BatchStarter/StartBatch/Test.cls.xml
===================================================================
diff -u -r59094 -r66703
--- vhUnitTest/APPS/Halux/Planning/impl/BatchStarter/StartBatch/Test.cls.xml (.../Test.cls.xml) (revision 59094)
+++ vhUnitTest/APPS/Halux/Planning/impl/BatchStarter/StartBatch/Test.cls.xml (.../Test.cls.xml) (revision 66703)
@@ -38,6 +38,11 @@
1
+
+APPS.Halux.PPS.MatService
+1
+
+
aTestName:%String
@@ -74,12 +80,15 @@
Do ..DnaCodeServiceMock.VerwachtMethodCall("MaakDnaCodesVoorBatch", BatchStub).DanReturn(DnaCodes)
Do ..DnaCodeServiceMock.VerwachtMethodCall("BewaarDnaCodes", DnaCodes).DanDoeNiks()
+ Do ..MatServiceMock.VerwachtMethodCall("BewaarMattenInfo", BatchStub).DanDoeNiks()
+
Do ..InitImplementation()
Do ..BatchStarterImpl.StartBatch(BatchStub)
Do $$$AssertEquals(BatchBewaarderSpy.BewaarBatchAantalKeerOpgeroepen,2)
Do SequentieServiceMock.Verifieer()
Do ..DnaCodeServiceMock.Verifieer()
+ Do ..MatServiceMock.Verifieer()
Do $$$AssertEquals(EventRaiserSpy.IsEventGeraised("BatchGeslotenEvent"),"")
]]>
@@ -130,7 +139,7 @@
1
-
Index: APPS/Halux/Planning/impl/BatchStarter.cls.xml
===================================================================
diff -u -r59486 -r66703
--- APPS/Halux/Planning/impl/BatchStarter.cls.xml (.../BatchStarter.cls.xml) (revision 59486)
+++ APPS/Halux/Planning/impl/BatchStarter.cls.xml (.../BatchStarter.cls.xml) (revision 66703)
@@ -28,8 +28,13 @@
1
+
+APPS.Halux.PPS.MatService
+1
+
+
-BatchBewaarder:APPS.Halux.Planning.BatchBewaarder,BatchSequentieService:APPS.Halux.common.impl.SequentieService,BatchSequentieVerwijderaar:APPS.Halux.Planning.impl.BatchSequentieVerwijderaar,Logger:vhLib.Logger,DnaCodeService:APPS.Halux.AAP.DnaCodeService
+BatchBewaarder:APPS.Halux.Planning.BatchBewaarder,BatchSequentieService:APPS.Halux.common.impl.SequentieService,BatchSequentieVerwijderaar:APPS.Halux.Planning.impl.BatchSequentieVerwijderaar,Logger:vhLib.Logger,DnaCodeService:APPS.Halux.AAP.DnaCodeService,MatService:APPS.Halux.PPS.MatService
1
1
%Status
@@ -40,6 +45,7 @@
Set ..BatchSequentieVerwijderaar = $$$Inject(BatchSequentieVerwijderaar,##class(APPS.Halux.Planning.impl.BatchSequentieVerwijderaar).%New())
Set ..Logger = $$$Inject(Logger, ##class(vhLib.Logger).%New())
Set ..DnaCodeService = $$$Inject(DnaCodeService,##class(APPS.Halux.PPS.Activiteit.impl.TBX.KlantEtiketIoCContainer).Instance().Resolve("DnaCodeService"))
+ Set ..MatService = $$$Inject(MatService, ##class(APPS.Halux.PPS.MatService).%New())
Quit $$$OK
]]>
@@ -60,18 +66,18 @@
Batch:APPS.Halux.common.Batch