Index: vhUnitTest/APPS/Halux/PPS/AansturingService/TestAansturingService.cls.xml
===================================================================
diff -u -r29059 -r58740
--- vhUnitTest/APPS/Halux/PPS/AansturingService/TestAansturingService.cls.xml	(.../TestAansturingService.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/Halux/PPS/AansturingService/TestAansturingService.cls.xml	(.../TestAansturingService.cls.xml)	(revision 58740)
@@ -159,7 +159,13 @@
 
 	#dim BatchID As %String = 9999
 	
-	set ActieService = ##class(vhUnitTest.APPS.Halux.PPS.AansturingService.AansturingServiceMock).%New()
+	#dim MailDummy = ##class(TECH.Mail.impl.Mail).%New()
+	
+	#dim MailApiMock As vhTest.Mock.TECH.Mail.MailAPI = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
+	Do MailApiMock.VerwachtMethodCall("MaakNieuwMail").DanReturn(MailDummy)
+	Do MailApiMock.VerwachtMethodCall("VerstuurMail",MailDummy).DanDoeNiks()
+	
+	set ActieService = ##class(vhUnitTest.APPS.Halux.PPS.AansturingService.AansturingServiceMock).%New(,,,,,MailApiMock)
 	set ActieParameters = ##class(%ListOfDataTypes).%New()
 	
 	do ActieService.VoerUitAansturingActieVoorBatch(BatchID,..ActiviteitGroepIDs.GetAt(1),..ActieIDs.GetAt(1),ActieParameters)
@@ -185,6 +191,8 @@
 	Do ..VerwijderActies()
 	
 	Do ..VerwijderActiviteitGroepen()
+	
+	Do MailApiMock.Verifieer()
 ]]></Implementation>
 </Method>