Index: vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4/Converteer/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4/Converteer/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4/Converteer/Test.cls.xml	(revision 44592)
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteConverterVhisie4.Converteer.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Standaardgedrag">
+<Implementation><![CDATA[
+	#dim TeConverterenOfferte As DOM.VKP.Offerte = ##class(vhTest.Utils.APPS.VKP.Offerte).StandaardOfferte()
+	#dim GeconverteerdeOfferte As DOM.VKP.Offerte = ##class(vhTest.Utils.APPS.VKP.Offerte).StandaardOfferte()
+	
+	Set OfferteDto = ##class(APPS.EC.dto.Offerte).%New()
+	Set WinkelkarDto = ##class(WS.Vhisie4.WinkelkarExport.dto.Winkelkar).%New()
+	
+	Set OfferteConverterStub = ##class(vhTest.Mock.APPS.EC.Verkoop.impl.OfferteConverter).%New()
+	Do OfferteConverterStub.IndienMethodCall("ConverteerNaarECommerce",TeConverterenOfferte).DanReturn(OfferteDto)
+	
+	Set WinkelkarExportConverterStub = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Converter).%New()
+	Do WinkelkarExportConverterStub.IndienMethodCall("ConvertUnishopOfferte",OfferteDto).DanReturn(WinkelkarDto)
+	
+	Set KlantBestellingNaarLeverancierOfferteKopieerderStub = ##class(vhTest.Mock.APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder).%New()
+	Do KlantBestellingNaarLeverancierOfferteKopieerderStub.IndienMethodCall("Kopieer", TeConverterenOfferte).DanReturn(GeconverteerdeOfferte)
+	
+	Set OfferteServiceMock = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
+	Do OfferteServiceMock.VerwachtMethodCall("KoppelAanOfferteVanHandel",GeconverteerdeOfferte,TeConverterenOfferte)
+	
+	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Do WinkelkarRepositoryMock.VerwachtMethodCall("Bewaar",WinkelkarDto).DanDoeNiks()
+	
+	Set Converter = ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteConverterVhisie4).%New(OfferteServiceMock,KlantBestellingNaarLeverancierOfferteKopieerderStub,WinkelkarRepositoryMock,OfferteConverterStub,WinkelkarExportConverterStub)
+	Do Converter.Converteer(TeConverterenOfferte)
+	
+	Do WinkelkarRepositoryMock.Verifieer()
+	Do OfferteServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml
===================================================================
diff -u -r44540 -r44592
--- APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml	(.../KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml)	(revision 44540)
+++ APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml	(.../KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml)	(revision 44592)
@@ -13,21 +13,34 @@
 <Private>1</Private>
 </Property>
 
-<Property name="WinkelkarSender">
-<Type>WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Sender</Type>
+<Property name="WinkelkarRepository">
+<Type>WSimpl.Vhisie4.Winkelkar.WinkelkarRepository</Type>
 <Private>1</Private>
 </Property>
 
+<Property name="OfferteConverter">
+<Type>APPS.EC.Verkoop.impl.OfferteConverter</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="WinkelkarExportConverter">
+<Type>WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Converter</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>OfferteService:APPS.VKP.OfferteService,KlantBestellingNaarLeverancierOfferteKopieerder:APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder,WinkelkarSender:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Sender</FormalSpec>
+<FormalSpec>OfferteService:APPS.VKP.OfferteService,KlantBestellingNaarLeverancierOfferteKopieerder:APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder,WinkelkarRepository:WSimpl.Vhisie4.Winkelkar.WinkelkarRepository,OfferteConverter:APPS.EC.Verkoop.impl.OfferteConverter,WinkelkarExportConverter:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Converter</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..OfferteService = $$$Inject(OfferteService, ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefOfferteService())
 	Set ..KlantBestellingNaarLeverancierOfferteKopieerder = $$$Inject(KlantBestellingNaarLeverancierOfferteKopieerder, ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder).%New())
-	Set ..WinkelkarSender = $$$Inject(WinkelkarSender, ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Sender).%New())
+	Set ..WinkelkarRepository = $$$Inject(WinkelkarRepository, ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New())
+	Set ..OfferteConverter = $$$Inject(OfferteConverter, ##class(APPS.EC.Verkoop.impl.OfferteConverter).%New())
+	Set ..WinkelkarExportConverter = $$$Inject(WinkelkarExportConverter, ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Converter).%New())
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -38,7 +51,7 @@
 <Implementation><![CDATA[
 	#dim LeverancierOfferte As APPS.VKP.Offerte = ..KlantBestellingNaarLeverancierOfferteKopieerder.Kopieer(KlantBestelling)
 	
-	#dim Response As WS.Vhisie4.WinkelkarExport.SendResponse = ..WinkelkarSender.Send(##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Converter).%New().ConvertUnishopOfferte(##class(APPS.EC.Verkoop.impl.OfferteConverter).%New().ConverteerNaarECommerce(LeverancierOfferte)))
+	#dim Response As WS.Vhisie4.WinkelkarExport.SendResponse = ..WinkelkarRepository.Bewaar(..WinkelkarExportConverter.ConvertUnishopOfferte(..OfferteConverter.ConverteerNaarECommerce(KlantBestelling)))
 	
 	Do ..OfferteService.KoppelAanOfferteVanHandel(LeverancierOfferte,KlantBestelling)