Index: AXimpl/Dynamics/SalesOrderIn/Converter/Mailer.cls.xml
===================================================================
diff -u -r53079 -r53574
--- AXimpl/Dynamics/SalesOrderIn/Converter/Mailer.cls.xml	(.../Mailer.cls.xml)	(revision 53079)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/Mailer.cls.xml	(.../Mailer.cls.xml)	(revision 53574)
@@ -3,6 +3,11 @@
 <Class name="AXimpl.Dynamics.SalesOrderIn.Converter.Mailer">
 <Super>TECH.Mockable</Super>
 
+<Property name="AxOrderCreatorLookup">
+<Type>AXimpl.Dynamics.SalesOrderIn.Converter.AxOrderCreatorLookup</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="GebruikerLookup">
 <Type>AXimpl.Admin.Common.GebruikerLookup</Type>
 <Private>1</Private>
@@ -44,7 +49,7 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>MailApi:TECH.Mail.MailAPI="",VerkoopAPI:DOM.VKP.VerkoopAPI,DateTimeAPI:TECH.DateTime.DateTimeAPI,GebruikerLookup:AXimpl.Admin.Common.GebruikerLookup,GebruikerApi:DOM.common.GebruikerAPI</FormalSpec>
+<FormalSpec>MailApi:TECH.Mail.MailAPI="",VerkoopAPI:DOM.VKP.VerkoopAPI,DateTimeAPI:TECH.DateTime.DateTimeAPI,GebruikerLookup:AXimpl.Admin.Common.GebruikerLookup,GebruikerApi:DOM.common.GebruikerAPI,AxOrderCreatorLookup:AXimpl.Dynamics.SalesOrderIn.Converter.AxOrderCreatorLookup=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -55,6 +60,7 @@
 	Set ..DateTimeAPI = $$$Inject(DateTimeAPI, ##class(TECH.Context).Instance().GeefDateTimeAPI())
 	Set ..GebruikerLookup = $$$Inject(GebruikerLookup,##class(AXimpl.Admin.Common.GebruikerLookup).%New())
 	Set ..GebruikerApi = $$$Inject(GebruikerApi,##class(DOM.common.impl.GebruikerAPIimpl).%New())
+	Set ..AxOrderCreatorLookup = $$$Inject(AxOrderCreatorLookup, ##class(AXimpl.Dynamics.SalesOrderIn.Converter.AxOrderCreatorLookup).%New())
 	Set ..ConfigMgr = ##class(TECH.Config.ConfigMgr).Instance()
 	Set ..GeblokkeerdeOrderLijnenTekst = ""
 
@@ -160,6 +166,47 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerzendOrderBestaatMetVerschillendeSalesId">
+<FormalSpec>InkomendSalesId:%String,OrderSalesId:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim AxUser As %String
+	#dim GebruikerId As %String = ""
+	#dim Gebruiker As DOM.common.Gebruiker
+	#dim MailTo As %String = ""
+	#dim Mail As TECH.Mail.Mail = ..MailApi.MaakNieuwMail()
+	
+	Do Mail.ZetVerzender($$$SystemMail("Ax order naar admin"))
+	Do Mail.ZetIsHTML($$$True)
+	
+	#dim Titel As %String = ##class(TECH.StringUtils).BuildText("Order met OrderSalesId {0} kan niet worden verwerkt door Cache", InkomendSalesId)
+	Do Mail.ZetOnderwerp(Titel)
+	
+	#dim Inhoud As %String = ##class(TECH.StringUtils).BuildText("Beste, " _$$$CRLF _$$$CRLF)
+	Set Inhoud = Inhoud _##class(TECH.StringUtils).BuildText("Order {0} kan niet geupdate worden in Admin, omdat bij {1} de laatste 6 karakters gelijk zijn en admin dus geen updates kan doen. " _$$$CRLF, InkomendSalesId, OrderSalesId) 
+	Set Inhoud = Inhoud _##class(TECH.StringUtils).BuildText("Gelieve order '{0}' in een nieuw order steken, zodat de update opnieuw plaats kan vinden. " _$$$CRLF, InkomendSalesId)
+	Set Inhoud = Inhoud _"Bij vragen kun je naar Nicolas, Nicky of Bart gaan." _$$$CRLF _$$$CRLF
+	Set Inhoud = Inhoud _"Alvast bedankt!" _$$$CRLF _$$$CRLF
+	Set Inhoud = Inhoud _"ICT"
+	
+	Set AxUser = ..AxOrderCreatorLookup.GeefAxOrderCreatorUser(InkomendSalesId)
+	
+	If ..GebruikerLookup.BestaatGebruiker(AxUser) {
+		Set GebruikerId = ..GebruikerLookup.GeefGebruikerId(AxUser)
+		Set Gebruiker = ..GebruikerApi.GeefGebruiker(GebruikerId)
+		Do Mail.VoegToeOntvangerCC(..GeefBartVanDamAlsGebruiker().GeefEmailAdres())
+	} Else {
+		Set Inhoud = Inhoud _##class(TECH.StringUtils).BuildText("De door AX doorgegeven User '{0}' is niet gevonden in admin." _$$$CRLF _$$$CRLF , AxUser)
+		Set Gebruiker = ..GeefBartVanDamAlsGebruiker() // Of toch bidi support mailbox ???
+	}
+	
+	Set MailTo = Gebruiker.GeefEmailAdres()
+	Do Mail.VoegToeOntvanger(MailTo)
+	Do Mail.ZetInhoud(Inhoud)
+	
+	Do ..MailApi.VerstuurMail(Mail)
+]]></Implementation>
+</Method>
+
 <Method name="Verzend">
 <FormalSpec>Klant:DOM.VKP.VanHoeckeKlant,AXUsername:%String,Titel:%String,Inhoud:%String</FormalSpec>
 <Private>1</Private>