Index: AXimpl/Dynamics/SalesOrderIn/Converter/Mailer.cls.xml
===================================================================
diff -u -r53678 -r54176
--- AXimpl/Dynamics/SalesOrderIn/Converter/Mailer.cls.xml	(.../Mailer.cls.xml)	(revision 53678)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/Mailer.cls.xml	(.../Mailer.cls.xml)	(revision 54176)
@@ -123,7 +123,13 @@
 	Set Inhoud = Inhoud _Exceptie.GeefExtraInfo()
 	Set Inhoud = Inhoud _Exceptie.GeefSpecifiekeData()
 	
-	Do ..Verzend(Klant, AXUser, Titel, Inhoud)
+	#dim MailNaarTHB As %Boolean = $$$False
+	#dim IsValideerSalesIdError As %Boolean = ##class(TECH.StringUtils).StartsWith(Exceptie.GeefOmschrijving(), "Er bestaat reeds een order met verschillend SalesId.")
+	If (IsValideerSalesIdError) {
+		Set MailNaarTHB = $$$True
+	}
+	
+	Do ..Verzend(Klant, AXUser, Titel, Inhoud, MailNaarTHB)
 ]]></Implementation>
 </Method>
 
@@ -213,7 +219,7 @@
 </Method>
 
 <Method name="Verzend">
-<FormalSpec>Klant:DOM.VKP.VanHoeckeKlant,AXUsername:%String,Titel:%String,Inhoud:%String</FormalSpec>
+<FormalSpec>Klant:DOM.VKP.VanHoeckeKlant,AXUsername:%String,Titel:%String,Inhoud:%String,MailNaarTHB:%Boolean=0</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim Gebruiker As DOM.common.VanHoeckeGebruiker = Klant.GeefInterneVerantwoordelijke()
@@ -240,6 +246,7 @@
 	Do Mail.ZetIsHTML($$$True)
 	Do Mail.VoegToeOntvanger(MailTo)
 	Do:$Length(AXUserEmail) Mail.VoegToeOntvanger(AXUserEmail)
+	Do:MailNaarTHB Mail.VoegToeOntvangerBCC("Tommy.Hebb@vanhoecke.be")
 
 	Do ..MailApi.VerstuurMail(Mail)
 ]]></Implementation>