Index: vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/Base.cls.xml
===================================================================
diff -u -r45862 -r46555
--- vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/Base.cls.xml	(.../Base.cls.xml)	(revision 45862)
+++ vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/Base.cls.xml	(.../Base.cls.xml)	(revision 46555)
@@ -87,7 +87,7 @@
 	Set VertaalApi = ##class(vhTest.Mock.DOM.common.Transl.VertaalAPI).%New()
 	do VertaalApi.IndienMethodCall("GeefVertaler",..Personality.GeefTaal(),"Unishop").DanReturn(##class(vhTest.Utils.Vertaler).%New(""))
 	
-	#Dim Rapporteur As APPS.EC.Rapporteur.Rapporteur = ##class(APPS.EC.Rapporteur.impl.HandelRapporteur).%New(,MailApi,VertaalApi)
+	#Dim Rapporteur As APPS.EC.Rapporteur.Rapporteur = ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.MailVerzender.Handel).%New(,MailApi,VertaalApi)
 	
 	Do Rapporteur.Rapporteer(OfferteStub)
 	
Index: APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender/HandelRapporteur.cls.xml
===================================================================
diff -u -r45862 -r46555
--- APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender/HandelRapporteur.cls.xml	(.../EC/Rapporteur/impl/HandelRapporteur.cls.xml)	(revision 45862)
+++ APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender/HandelRapporteur.cls.xml	(.../VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender/Handel.cls.xml)	(revision 46555)
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
-<Class name="APPS.EC.Rapporteur.impl.HandelRapporteur">
+<Class name="APPS.VKP.Offerte.impl.BesteldeOfferteMelder.MailVerzender.Handel">
 <Super>APPS.EC.Rapporteur.impl.Rapporteur</Super>
 
 <Property name="OfferteUrlBepaler">
Index: APPS/VKP/Offerte/impl/BesteldeOfferteMelder.cls.xml
===================================================================
diff -u -r46554 -r46555
--- APPS/VKP/Offerte/impl/BesteldeOfferteMelder.cls.xml	(.../BesteldeOfferteMelder.cls.xml)	(revision 46554)
+++ APPS/VKP/Offerte/impl/BesteldeOfferteMelder.cls.xml	(.../BesteldeOfferteMelder.cls.xml)	(revision 46555)
@@ -3,24 +3,42 @@
 <Class name="APPS.VKP.Offerte.impl.BesteldeOfferteMelder">
 <Super>DOM.common.PersonalityVisitor,APPS.VKP.Offerte.BesteldeOfferteMelder</Super>
 
-<Property name="Rapporteur">
-<Type>APPS.EC.Rapporteur.impl.HandelRapporteur</Type>
+<Property name="MailVerzenderHandel">
+<Type>APPS.VKP.Offerte.impl.BesteldeOfferteMelder.MailVerzender.Handel</Type>
 <Private>1</Private>
 </Property>
 
+<Property name="MailVerzenderVanHoecke">
+<Type>APPS.VKP.Offerte.impl.BesteldeOfferteMelder.MailVerzender.VanHoecke</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="HttpZenderSFS">
+<Type>APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.SFS</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="HttpZenderHaefele">
+<Type>APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.HaefeleBE</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Offerte">
 <Type>APPS.VKP.Offerte</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>Rapporteur:APPS.EC.Rapporteur.impl.HandelRapporteur</FormalSpec>
+<FormalSpec>MailVerzenderHandel:APPS.VKP.Offerte.impl.BesteldeOfferteMelder.MailVerzender.Handel</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	set ..Rapporteur = $$$Inject(Rapporteur,##class(APPS.EC.Rapporteur.impl.HandelRapporteur).%New())
+	set ..MailVerzenderHandel = $$$Inject(MailVerzenderHandel,##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.MailVerzender.Handel).%New())
+	set ..MailVerzenderVanHoecke = ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.MailVerzender.VanHoecke).%New()
+	set ..HttpZenderSFS = ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.SFS).%New()
+	set ..HttpZenderHaefele = ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.HaefeleBE).%New()
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -37,93 +55,73 @@
 
 <Method name="VerwerkVanHoecke">
 <FormalSpec>VanHoeckePersonality:DOM.common.VanHoeckePersonality</FormalSpec>
-<Implementation><![CDATA[	Do ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.MailVerzender.VanHoecke).%New().Verzend(..Offerte)
+<Implementation><![CDATA[	Do ..MailVerzenderVanHoecke.Verzend(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkDestil">
 <FormalSpec>DestilPersonality:DOM.common.DestilPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
+<Implementation><![CDATA[	Do ..MailVerzenderHandel.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkDupont">
 <FormalSpec>DupontPersonality:DOM.common.DupontPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
+<Implementation><![CDATA[	Do ..MailVerzenderHandel.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkKisch">
 <FormalSpec>KischPersonality:DOM.common.KischPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
+<Implementation><![CDATA[	Do ..MailVerzenderHandel.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkVanRaemdonck">
 <FormalSpec>VanRaemdonckPersonality:DOM.common.VanRaemdonckPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
+<Implementation><![CDATA[	Do ..MailVerzenderHandel.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkDaro">
 <FormalSpec>DaroPersonality:DOM.common.DaroPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
+<Implementation><![CDATA[	Do ..MailVerzenderHandel.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkSFS">
 <FormalSpec>SFSPersonality:DOM.common.SFSPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.SFS).%New().Verzend(..Offerte)
+<Implementation><![CDATA[	Do ..HttpZenderSFS.Verzend(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkHaefeleBE">
 <FormalSpec>HaefeleBEPersonality:DOM.common.HaefeleBEPersonality</FormalSpec>
 <Implementation><![CDATA[
-	Do ..Rapporteur.Rapporteer(..Offerte)
-	Do ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.HaefeleBE).%New().Verzend(..Offerte)
+	Do ..MailVerzenderHandel.Rapporteer(..Offerte)
+	Do ..HttpZenderHaefele.Verzend(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkHaefeleNL">
 <FormalSpec>HaefeleNLPersonality:DOM.common.HaefeleNLPersonality</FormalSpec>
 <Implementation><![CDATA[
-	Do ..Rapporteur.Rapporteer(..Offerte)
-	Do ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.HaefeleBE).%New().Verzend(..Offerte)
+	Do ..MailVerzenderHandel.Rapporteer(..Offerte)
+	Do ..HttpZenderHaefele.Verzend(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkHein">
 <FormalSpec>HeinPersonality:DOM.common.HeinPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
+<Implementation><![CDATA[	Do ..MailVerzenderHandel.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkVanHoeckeVoorHalux">
 <FormalSpec>VanHoeckVoorHaluxPersonality:DOM.common.VanHoeckeVoorHaluxPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Bestelde Offerte voor personality ""VanHoeckeVoorHaluxPersonality"" is niet mogelijk."))
+<Implementation><![CDATA[	Do ##class(TECH.Exceptions.InvalidInputException).Throw("Bestelde Offerte voor personality ""VanHoeckeVoorHaluxPersonality"" is niet mogelijk.")
 ]]></Implementation>
 </Method>
-
-<Method name="ToonNietGeimplementeerd">
-<FormalSpec>Personality:DOM.common.Personality</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	Try {
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.UnimplementedException).%New("Verwerk" _ Personality.GeefNaam() _ " nog niet geïmplementeerd."))
-	} Catch {
-		#dim MailAPI As TECH.Mail.MailAPI = ##class(TECH.Context).Instance().GeefMailAPI()
-		#dim Mail As TECH.Mail.Mail = MailAPI.MaakNieuwMail()
-		
-		Do Mail.ZetInhoud(##class(TECH.ExceptionHandler).Catch().GeefOmschrijving())
-		Do Mail.ZetVerzender($$$SystemMail("Unimplemented"))
-		Do Mail.ZetOnderwerp(Personality.GeefNaam())
-		Do Mail.VoegToeOntvanger("ict_sysop@vanhoecke.be")
-		
-		Do MailAPI.VerstuurMail(Mail)
-	}
-]]></Implementation>
-</Method>
 </Class>
 
 
FishEye: Tag 46555 refers to a dead (removed) revision in file `APPS/EC/Rapporteur/impl/HandelRapporteur.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?