Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/LeverAdresMaker.cls.xml
===================================================================
diff -u -r48576 -r49046
--- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/LeverAdresMaker.cls.xml	(.../LeverAdresMaker.cls.xml)	(revision 48576)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/LeverAdresMaker.cls.xml	(.../LeverAdresMaker.cls.xml)	(revision 49046)
@@ -61,7 +61,7 @@
 		If ..LeverAdresRepository.BestaatViaAXLeverAdresId(OrderHeader.LocationId) {
 			Set LeverAdres = ..LeverAdresRepository.GeefViaAXLeverAdresId(OrderHeader.LocationId)
 		} Else {
-			Do ..VerzendMail(OrderHeader)
+			Do ..LogAdresNietGevonden(OrderHeader)
 		}
 		Do LeverAdres.ZetID("")
 		Do LeverAdres.ZetAxLeveradresId(OrderHeader.LocationId)
@@ -75,32 +75,13 @@
 ]]></Implementation>
 </Method>
 
-<Method name="VerzendMail">
+<Method name="LogAdresNietGevonden">
 <FormalSpec>OrderHeader:AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderHeader</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim Klant As DOM.VKP.VanHoeckeKlant = ..VerkoopApi.GeefKlant(##class(AXimpl.AxToAdminUtils).ConvertCustomerID(OrderHeader.CustAccount))
-	#dim Gebruiker As DOM.VKP.VanHoeckeKlant = Klant.GeefInterneVerantwoordelijke()
-
-	#dim MailTo As %String = ""
-
-	if $IsObject(Gebruiker) {
-		Set MailTo = Gebruiker.GeefEmailAdres()
-	} Else {
-		Set MailTo = "ICT_Meldingen@vanhoecke.be"
-	}
-
-	#dim Inhoud As %String
-	Set Inhoud = "Er werd geprobeerd een order te maken in Admin vanuit AX voor klant '"_Klant.GeefNaam()_"'. Het gebruikte AxLeverAdresId '"_OrderHeader.LocationId_"' is echter onbekend in Admin."
-			
-	#dim Mail As TECH.Mail.Mail = ..MailApi.MaakNieuwMail()
-	Do Mail.ZetVerzender($$$SystemMail("Ax order naar admin"))
-	Do Mail.ZetOnderwerp("Ax order naar admin - onbekende AxLocationId '"_OrderHeader.SalesId_"'")
-	Do Mail.ZetInhoud(Inhoud)
-	Do Mail.ZetIsHTML($$$True)
-	Do Mail.VoegToeOntvanger(MailTo)
-
-	Do ..MailApi.VerstuurMail(Mail)
+	#dim Inhoud As %String = "Er werd geprobeerd een order te maken in Admin vanuit AX voor klant '"_Klant.GeefNaam()_"'. Het gebruikte AxLeverAdresId '"_OrderHeader.LocationId_"' is echter onbekend in Admin."
+	Do ..Logger.Warning("SalesOrderIn - Leveringsadres aanmaken", Inhoud)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/LeverAdresMaker/MaakLeverAdres/Test.cls.xml
===================================================================
diff -u -r48576 -r49046
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/LeverAdresMaker/MaakLeverAdres/Test.cls.xml	(.../Test.cls.xml)	(revision 48576)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/LeverAdresMaker/MaakLeverAdres/Test.cls.xml	(.../Test.cls.xml)	(revision 49046)
@@ -51,43 +51,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: AXLeverAdresId ingevuld en nog niet gekend -&gt; gegevens uit header overnemen en mail naar de BiDi">
-<Implementation><![CDATA[
-	#dim StandaardOrder As AXif.Dynamics.SalesOrderIn.Envelope = ##class(vhTest.Utils.AXif.Dynamics.SalesOrderIn.Envelope).StandaardOrder()
-	#dim StandaardOrderHeader As AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderHeader = StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1)
-	Set StandaardOrderHeader.LocationId = ..#AXLeverAdresId
-	
-	Set ProjectSettingsApiStub = ##class(vhTest.Mock.DOM.common.ProjectSettingsAPI).%New()
-	Do ProjectSettingsApiStub.IndienMethodCall("IsActiefAxLeverancierId").DanReturn($$$True)
-	
-	Set LeverAdresRepositoryStub = ##class(vhTest.Mock.DOM.VKP.impl.LeverAdresRepository).%New()
-	Do LeverAdresRepositoryStub.IndienMethodCall("BestaatViaAXLeverAdresId",..#AXLeverAdresId).DanReturn($$$False)
-	
-	Set MailStub = ##class(vhTest.Mock.TECH.Mail.Mail).%New()
-	Do MailStub.IndienMethodCall("ZetVerzender",$$$ElkeWaarde).DanDoeNiks()
-	Do MailStub.IndienMethodCall("ZetOnderwerp",$$$ElkeWaarde).DanDoeNiks()
-	Do MailStub.IndienMethodCall("ZetInhoud",$$$ElkeWaarde).DanDoeNiks()
-	Do MailStub.IndienMethodCall("ZetIsHTML",$$$ElkeWaarde).DanDoeNiks()
-	Do MailStub.IndienMethodCall("VoegToeOntvanger",$$$ElkeWaarde).DanDoeNiks()
-	Set MailApi = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
-	Do MailApi.IndienMethodCall("MaakNieuwMail").DanReturn(MailStub)
-	Do MailApi.VerwachtMethodCall("VerstuurMail",MailStub)
-	
-	Set LeverAdresMaker = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter.LeverAdresMaker).%New(ProjectSettingsApiStub,LeverAdresRepositoryStub,MailApi)
-	#dim LeverAdres As DOM.VKP.impl.LeverAdres = LeverAdresMaker.MaakLeverAdres(StandaardOrderHeader)
-	
-	Do $$$AssertEquals(LeverAdres.Gemeente,StandaardOrderHeader.DlvAddrCity)
-	Do $$$AssertEquals(LeverAdres.Postcode,StandaardOrderHeader.DlvAddrZipCode)
-	Do $$$AssertEquals(LeverAdres.Straat,StandaardOrderHeader.DlvAddrStreet1)
-	Do $$$AssertEquals(LeverAdres.LandNr,StandaardOrderHeader.DlvAddrCountry)
-	Do $$$AssertEquals(LeverAdres.Naam,StandaardOrderHeader.DeliveryName)
-	Do $$$AssertEquals(LeverAdres.Telefoon,"+3237601900")
-	Do $$$AssertEquals(LeverAdres.AxLeveradresId,..#AXLeverAdresId)
-	
-	Do MailApi.Verifieer()
-]]></Implementation>
-</Method>
-
 <Method name="Test: AXLeverAdresId ingevuld en gekend -&gt; gegevens uit Caché opvissen en id leegmaken">
 <Implementation><![CDATA[
 	#dim StandaardOrder As AXif.Dynamics.SalesOrderIn.Envelope = ##class(vhTest.Utils.AXif.Dynamics.SalesOrderIn.Envelope).StandaardOrder()