Index: WSimpl/Vhisie4/KlantActiviteit/KlantActiviteitMelder.cls.xml
===================================================================
diff -u -r47510 -r55928
--- WSimpl/Vhisie4/KlantActiviteit/KlantActiviteitMelder.cls.xml	(.../KlantActiviteitMelder.cls.xml)	(revision 47510)
+++ WSimpl/Vhisie4/KlantActiviteit/KlantActiviteitMelder.cls.xml	(.../KlantActiviteitMelder.cls.xml)	(revision 55928)
@@ -52,7 +52,6 @@
 		If $$$Not(..KlantActiviteitRepository.BestaatViaKlantId(KlantId)) {
 			#dim Klant As DOM.VKP.VanHoeckeKlant = ..VerkoopAPI.GeefKlant(KlantId)
 			If $$$Not(Klant.IsCommercieelActief()) {
-				Do ..VerzendMelding(Klant)
 				Do ..VoegToeKlantActiviteit(KlantId)
 			}
 		}
Index: vhUnitTest/WSimpl/Vhisie4/KlantActiviteit/KlantActiviteitMelder/VerzendMeldingIndienNodig/Test.cls.xml
===================================================================
diff -u -r47207 -r55928
--- vhUnitTest/WSimpl/Vhisie4/KlantActiviteit/KlantActiviteitMelder/VerzendMeldingIndienNodig/Test.cls.xml	(.../Test.cls.xml)	(revision 47207)
+++ vhUnitTest/WSimpl/Vhisie4/KlantActiviteit/KlantActiviteitMelder/VerzendMeldingIndienNodig/Test.cls.xml	(.../Test.cls.xml)	(revision 55928)
@@ -3,13 +3,10 @@
 <Class name="vhUnitTest.WSimpl.Vhisie4.KlantActiviteit.KlantActiviteitMelder.VerzendMeldingIndienNodig.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test: Mail wordt verzonden als een inactieve klant activiteit vertoont">
+<Method name="Test: Mail wordt NIET MEER verzonden als een inactieve klant activiteit vertoont, registreert wel activiteit">
 <Implementation><![CDATA[
 	Set KlantMock = ##class(vhTest.Mock.DOM.VKP.VanHoeckeKlant).%New()
 	Do KlantMock.VerwachtMethodCall("IsCommercieelActief").DanReturn($$$False)
-	Do KlantMock.VerwachtMethodCall("GeefNaam").DanReturn("DummyNaam")
-	Do KlantMock.VerwachtMethodCall("GeefID").DanReturn("DummyID")
-	Do KlantMock.VerwachtMethodCall("GeefRegio").DanReturn("DummyRegio")
 	
 	Set KlantActiviteitDummy = ##class(WSimpl.Vhisie4.KlantActiviteit.KlantActiviteit).%New()
 	
@@ -20,17 +17,10 @@
 
 	Set VerkoopAPIMock = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
 	Do VerkoopAPIMock.VerwachtMethodCall("GeefKlant","DummyKlantId").DanReturn(KlantMock)
-	
-	Set MailMock = ##class(vhTest.Mock.TECH.Mail.Mail).%New()
-	Do MailMock.VerwachtMethodCall("ZetVerzender", """OV"" <AdminCACHE@vanhoecke.be>").DanDoeNiks()
-	Do MailMock.VerwachtMethodCall("ZetOnderwerp", "Klant activiteit op vhisie 4 voor klant 'DummyNaam' met KlantId 'DummyID'").DanDoeNiks()
-	Do MailMock.VerwachtMethodCall("ZetInhoud", "Klant DummyNaam met KlantId DummyID staat commercieel inactief en vertoont activiteit op vhisie 4." _$$$CRLF _"Op datum en tijd 2011-06-30 09:15:00" _$$$CRLF _"(Deze melding is éénmalig.)").DanDoeNiks()
-	Do MailMock.VerwachtMethodCall("ZetIsHTML",1).DanDoeNiks()
-	Do MailMock.VerwachtMethodCall("VoegToeOntvanger","OV_weborder_RDummyRegio").DanDoeNiks()
-	
+		
 	Set MailApiMock = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
-	Do MailApiMock.VerwachtMethodCall("MaakNieuwMail").DanReturn(MailMock)
-	Do MailApiMock.VerwachtMethodCall("VerstuurMail", MailMock).DanDoeNiks()
+	Do MailApiMock.VerwachtMethodCall("MaakNieuwMail").Nooit()
+	Do MailApiMock.VerwachtMethodCall("VerstuurMail", $$$ElkeWaarde).Nooit()
 	
 	Set DateTimeAPIMock = ##class(vhTest.Mock.TECH.DateTime.DateTimeAPI).%New()
 	Do DateTimeAPIMock.VerwachtMethodCall("CurrentTimeStamp").DanReturn($$$DummyTimeStamp)
@@ -46,7 +36,6 @@
 	Do VerkoopAPIMock.Verifieer()
 	Do DateTimeAPIMock.Verifieer()
 	Do KlantMock.Verifieer()
-	Do MailMock.Verifieer()
 ]]></Implementation>
 </Method>