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