Index: APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml
===================================================================
diff -u -r39036 -r39157
--- APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml	(.../VerkoopService.cls.xml)	(revision 39036)
+++ APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml	(.../VerkoopService.cls.xml)	(revision 39157)
@@ -15,19 +15,25 @@
 <Private>1</Private>
 </Property>
 
+<Property name="OfferteEventRaiser">
+<Type>APPS.VKP.event.OfferteEventRaiser</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>OfferteService:APPS.VKP.OfferteService="",WinkelkarService:APPS.EC.Winkelkar.WinkelkarService=""</FormalSpec>
+<FormalSpec>OfferteService:APPS.VKP.OfferteService="",WinkelkarService:APPS.EC.Winkelkar.WinkelkarService="",WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository="",OfferteRepository:APPS.VKP.Offerte.impl.OfferteRepository="",OfferteEventRaiser:APPS.VKP.event.OfferteEventRaiser</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Do ##super(OfferteService, WinkelkarService)
+	Do ##super(OfferteService, WinkelkarService, WinkelkarRepository, OfferteRepository)
 	Set ..Applicatie = ..GeefApplicatie()
 	Set ..WinkelkarService = $$$Inject(WinkelkarService, ##class(APPS.EC.Winkelkar.impl.ExterneWinkelkarService).%New())
 	Set ..OfferteHerberekenaar = ##class(APPS.EC.Verkoop.impl.OfferteHerberekenaar).%New(,,,..WinkelkarService)
 	Set ..GeldigheidVermeldingBepaler = ##class(APPS.EC.Verkoop.impl.GeldigheidVermeldingBepaler).%New()
-	
+	Set ..OfferteEventRaiser = $$$Inject(OfferteEventRaiser,##class(APPS.VKP.event.OfferteEventRaiser).%New())
+
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -70,7 +76,7 @@
 	#dim OfferteBewaarder As APPS.VKP.OfferteBewaarder = ..OfferteService.GeefOfferteBewaarder()
 	Do OfferteBewaarder.Bewaar(Offerte)
 	
-	Do ..OfferteService.RaiseOfferteGemaaktEvent(Offerte.GeefID())
+	Do ..OfferteEventRaiser.RaiseOfferteGemaaktEvent(Offerte.GeefID())
 	
 	Set OfferteIDenWinkelkarID = ##class(APPS.EC.dto.OfferteIDEnWinkelkarID).%New()
 	Set OfferteIDenWinkelkarID.OfferteID = Offerte.GeefID()