Index: WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/ToeleveringService.cls.xml
===================================================================
diff -u -r58838 -r73594
--- WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/ToeleveringService.cls.xml	(.../ToeleveringService.cls.xml)	(revision 58838)
+++ WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/ToeleveringService.cls.xml	(.../ToeleveringService.cls.xml)	(revision 73594)
@@ -23,18 +23,13 @@
 <Private>1</Private>
 </Property>
 
-<Property name="MailApi">
-<Type>TECH.Mail.MailAPI</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="FlowToeService">
 <Type>WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService.FlowToeService</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>ToeleveringVoorbereidingService:APPS.Halux.Voorbereiding.VoorbereidingService="",BatchService:APPS.Halux.common.BatchService="",ToeleveringApi:DOM.AKP.ToeleveringAPI="",Logger:vhLib.Logger="",MailApi:TECH.Mail.MailAPI="",FlowToeService:WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService.FlowToeService=""</FormalSpec>
+<FormalSpec>ToeleveringVoorbereidingService:APPS.Halux.Voorbereiding.VoorbereidingService="",BatchService:APPS.Halux.common.BatchService="",ToeleveringApi:DOM.AKP.ToeleveringAPI="",Logger:vhLib.Logger="",FlowToeService:WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService.FlowToeService=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -44,7 +39,6 @@
 	Set ..BatchService = $$$Inject(BatchService, ##class(APPS.Halux.common.impl.BatchService).%New())
 	Set ..ToeleveringApi = $$$Inject(ToeleveringApi, ##class(DOM.AKP.impl.DataM.DataMToeleveringAPI).%New())
 	Set ..Logger = $$$Inject(Logger, ##class(vhLib.Logger).%New("CalculatedProduct"))
-	Set ..MailApi = $$$Inject(MailApi, ##class(TECH.Mail.impl.MailAPI).%New())
 	Set ..FlowToeService = $$$Inject(FlowToeService, ##class(WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService.FlowToeService).%New())
 	
 	Quit $$$OK
@@ -73,8 +67,7 @@
 				Set LoggingDetail = "Toelevering '"_ToeleveringId_"' is out of sync!! "
 					_"Er zijn lijnen waarvan de ProductId '"_OudProductId_"' niet meer overeenstemt met die op de OrderLijn in AX '"_NieuwProductId
 					_"'. De Toelevering is echter al klaargezet of zit al in een Batch, dus de aanpassing werd overgelaten aan de OrderSync VHIP901 - Order2Admin. "
-					_"ICT moet geen actie ondernemen, Halux planning is hiervan verwittigd per e-mail."
-				Do ..VerstuurMail(OrderId, ToeleveringId, OudProductId)
+					_"ICT moet geen actie ondernemen."
 			}
 			
 			Do ..Logger.Warning("ProductUpdater", LoggingDetail)
@@ -155,32 +148,6 @@
 <Implementation><![CDATA[	Lock -^KTO(6332,ToeleveringId)
 ]]></Implementation>
 </Method>
-
-<Method name="VerstuurMail">
-<FormalSpec>OrderId:%String,ToeleveringId:%String,OudProductId:%String</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim BatchId As %String = ..BatchService.ZoekBijhorendeBatchIdVoorToelevering(ToeleveringId)
-	#dim Mail As TECH.Mail.Mail = ..MailApi.MaakNieuwMail()
-	#dim Titel As %String = ""
-	#dim Inhoud As %String = ##class(TECH.StringUtils).BuildText("Beste collega, " _$$$CRLF _$$$CRLF)
-	
-	Set Titel = ##class(TECH.StringUtils).BuildText("OPGELET !!! Toelevering {0} matcht niet meer met Order {1}, naar aanleiding van een ProductUpdate in AX. ", ToeleveringId, OrderId)
-	
-	Set Inhoud = Inhoud _##class(TECH.StringUtils).BuildText("Op order {0} werd product {1} aangepast door een wijziging van de orderlijn in AX. " _$$$CRLF, OrderId, OudProductId)
-	Set Inhoud = Inhoud _##class(TECH.StringUtils).BuildText("Bij het verwerken van het order via de interface vanuit AX zal toelevering {0} uit batch {1} gehaald worden. " _$$$CRLF _$$$CRLF, ToeleveringId, BatchId)
-	Set Inhoud = Inhoud _"Met vriendelijke groeten, " _$$$CRLF _$$$CRLF
-	Set Inhoud = Inhoud _"ICT"
-	
-	Do Mail.ZetIsHTML($$$True)
-	Do Mail.VoegToeOntvanger("planning_halux@vanhoecke.be")
-	Do Mail.ZetVerzender($$$SystemMail("CalculatedProduct ProductUpdater"))
-	Do Mail.ZetOnderwerp(Titel)
-	Do Mail.ZetInhoud(Inhoud)
-	
-	Do ..MailApi.VerstuurMail(Mail)
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: vhTest/Mock/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/ToeleveringService.cls.xml
===================================================================
diff -u -r58703 -r73594
--- vhTest/Mock/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/ToeleveringService.cls.xml	(.../ToeleveringService.cls.xml)	(revision 58703)
+++ vhTest/Mock/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/ToeleveringService.cls.xml	(.../ToeleveringService.cls.xml)	(revision 73594)
@@ -9,7 +9,7 @@
 <Inheritance>right</Inheritance>
 
 <Method name="%OnNew">
-<FormalSpec>ToeleveringVoorbereidingService:APPS.Halux.Voorbereiding.VoorbereidingService="",BatchService:APPS.Halux.common.BatchService="",ToeleveringApi:DOM.AKP.ToeleveringAPI="",Logger:vhLib.Logger="",MailApi:TECH.Mail.MailAPI="",FlowToeService:WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService.FlowToeService=""</FormalSpec>
+<FormalSpec>ToeleveringVoorbereidingService:APPS.Halux.Voorbereiding.VoorbereidingService="",BatchService:APPS.Halux.common.BatchService="",ToeleveringApi:DOM.AKP.ToeleveringAPI="",Logger:vhLib.Logger="",FlowToeService:WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService.FlowToeService=""</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[	Quit $$$OK
 ]]></Implementation>
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/ToeleveringService/Test.cls.xml
===================================================================
diff -u -r58838 -r73594
--- vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/ToeleveringService/Test.cls.xml	(.../Test.cls.xml)	(revision 58838)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/ToeleveringService/Test.cls.xml	(.../Test.cls.xml)	(revision 73594)
@@ -38,11 +38,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="MailApi">
-<Type>TECH.Mail.MailAPI</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="FlowToeService">
 <Type>WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService.FlowToeService</Type>
 <Private>1</Private>
@@ -57,7 +52,6 @@
 	Set ..BatchService = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
 	Set ..ToeleveringApi = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).%New()
 	Set ..Logger = ##class(vhTest.Mock.vhLib.Logger).%New()
-	Set ..MailApi = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
 	Set ..FlowToeService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService.FlowToeService).%New()
 ]]></Implementation>
 </Method>
@@ -168,26 +162,19 @@
 	#dim LoggingDetail As %String = "Toelevering '"_..#RandomToeleveringId_"' is out of sync!! "
 	Set LoggingDetail = LoggingDetail_"Er zijn lijnen waarvan de ProductId '"_..#RandomOudProductId_"' niet meer overeenstemt met die op de OrderLijn in AX '"_..#RandomNieuwProductId
 	Set LoggingDetail = LoggingDetail_"'. De Toelevering is echter al klaargezet of zit al in een Batch, dus de aanpassing werd overgelaten aan de OrderSync VHIP901 - Order2Admin. "
-	Set LoggingDetail = LoggingDetail_"ICT moet geen actie ondernemen, Halux planning is hiervan verwittigd per e-mail."
+	Set LoggingDetail = LoggingDetail_"ICT moet geen actie ondernemen."
 	Do LoggerMock.VerwachtMethodCall("Warning", "ProductUpdater", LoggingDetail)
 	
-	#dim Mail As TECH.Mail.Mail = ##class(TECH.Mail.impl.Mail).%New()
-	#dim MailApiMock As TECH.Mail.MailAPI = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
-	Do MailApiMock.VerwachtMethodCall("MaakNieuwMail").DanReturn(Mail)
-	Do MailApiMock.VerwachtMethodCall("VerstuurMail", Mail).DanDoeNiks()
-	
 	Set ..ToeleveringVoorbereidingService = ToeleveringVoorbereidingServiceStub
 	Set ..BatchService = BatchServiceStub
 	Set ..ToeleveringApi = ToeleveringApiStub
 	Set ..Logger = LoggerMock
-	Set ..MailApi = MailApiMock
 	
 	#dim ToeleveringService As WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService = ..GeefToeleveringService()
 	#dim IsToeleveringVerwerkt As %Boolean = ToeleveringService.VerwerkToelevering(..#RandomToeleveringId, ..#RandomOudProductId, ..#RandomNieuwProductId)
 	
 	Do $$$AssertFalse(IsToeleveringVerwerkt)
 	Do ..Logger.Verifieer()
-	Do ..MailApi.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -209,33 +196,26 @@
 	#dim LoggingDetail As %String = "Toelevering '"_..#RandomToeleveringId_"' is out of sync!! "
 	Set LoggingDetail = LoggingDetail_"Er zijn lijnen waarvan de ProductId '"_..#RandomOudProductId_"' niet meer overeenstemt met die op de OrderLijn in AX '"_..#RandomNieuwProductId
 	Set LoggingDetail = LoggingDetail_"'. De Toelevering is echter al klaargezet of zit al in een Batch, dus de aanpassing werd overgelaten aan de OrderSync VHIP901 - Order2Admin. "
-	Set LoggingDetail = LoggingDetail_"ICT moet geen actie ondernemen, Halux planning is hiervan verwittigd per e-mail."
+	Set LoggingDetail = LoggingDetail_"ICT moet geen actie ondernemen."
 	Do LoggerMock.VerwachtMethodCall("Warning", "ProductUpdater", LoggingDetail)
 	
-	#dim Mail As TECH.Mail.Mail = ##class(TECH.Mail.impl.Mail).%New()
-	#dim MailApiMock As TECH.Mail.MailAPI = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
-	Do MailApiMock.VerwachtMethodCall("MaakNieuwMail").DanReturn(Mail)
-	Do MailApiMock.VerwachtMethodCall("VerstuurMail", Mail).DanDoeNiks()
-	
 	Set ..ToeleveringVoorbereidingService = ToeleveringVoorbereidingServiceStub
 	Set ..BatchService = BatchServiceStub
 	Set ..ToeleveringApi = ToeleveringApiStub
 	Set ..Logger = LoggerMock
-	Set ..MailApi = MailApiMock
 	
 	#dim ToeleveringService As WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService = ..GeefToeleveringService()
 	#dim IsToeleveringVerwerkt As %Boolean = ToeleveringService.VerwerkToelevering(..#RandomToeleveringId, ..#RandomOudProductId, ..#RandomNieuwProductId)
 	
 	Do $$$AssertFalse(IsToeleveringVerwerkt)
 	Do ..Logger.Verifieer()
-	Do ..MailApi.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefToeleveringService">
 <Private>1</Private>
 <ReturnType>WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService</ReturnType>
-<Implementation><![CDATA[	Quit ##class(WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService).%New(..ToeleveringVoorbereidingService, ..BatchService, ..ToeleveringApi, ..Logger, ..MailApi, ..FlowToeService)
+<Implementation><![CDATA[	Quit ##class(WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.OrderService.ToeleveringService).%New(..ToeleveringVoorbereidingService, ..BatchService, ..ToeleveringApi, ..Logger, ..FlowToeService)
 ]]></Implementation>
 </Method>