Index: vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4/Converteer/Test.cls.xml
===================================================================
diff -u -r44592 -r45465
--- vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4/Converteer/Test.cls.xml	(.../Test.cls.xml)	(revision 44592)
+++ vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4/Converteer/Test.cls.xml	(.../Test.cls.xml)	(revision 45465)
@@ -7,12 +7,13 @@
 <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()
+	#dim LeverancierOfferte 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)
+	Do OfferteConverterStub.IndienMethodCall("ConverteerNaarECommerce",GeconverteerdeOfferte).DanReturn(OfferteDto)
 	
 	Set WinkelkarExportConverterStub = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Converter).%New()
 	Do WinkelkarExportConverterStub.IndienMethodCall("ConvertUnishopOfferte",OfferteDto).DanReturn(WinkelkarDto)
@@ -21,10 +22,12 @@
 	Do KlantBestellingNaarLeverancierOfferteKopieerderStub.IndienMethodCall("Kopieer", TeConverterenOfferte).DanReturn(GeconverteerdeOfferte)
 	
 	Set OfferteServiceMock = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
-	Do OfferteServiceMock.VerwachtMethodCall("KoppelAanOfferteVanHandel",GeconverteerdeOfferte,TeConverterenOfferte)
+	Do OfferteServiceMock.VerwachtMethodCall("KoppelAanOfferteVanHandel",LeverancierOfferte,TeConverterenOfferte)
+	Do OfferteServiceMock.VerwachtMethodCall("VerwijderOfferte",GeconverteerdeOfferte)
 	
 	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("Bewaar",WinkelkarDto).DanDoeNiks()
+	Do WinkelkarRepositoryMock.VerwachtMethodCall("Bewaar",WinkelkarDto).DanReturn("42")
+	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteViaID","42").DanReturn(LeverancierOfferte)
 	
 	Set Converter = ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteConverterVhisie4).%New(OfferteServiceMock,KlantBestellingNaarLeverancierOfferteKopieerderStub,WinkelkarRepositoryMock,OfferteConverterStub,WinkelkarExportConverterStub)
 	Do Converter.Converteer(TeConverterenOfferte)
Index: APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml
===================================================================
diff -u -r44729 -r45465
--- APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml	(.../KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml)	(revision 44729)
+++ APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml	(.../KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml)	(revision 45465)
@@ -49,10 +49,14 @@
 <FormalSpec>KlantBestelling:APPS.VKP.Offerte</FormalSpec>
 <ReturnType>APPS.VKP.Offerte</ReturnType>
 <Implementation><![CDATA[
-	#dim LeverancierOfferte As APPS.VKP.Offerte = ..KlantBestellingNaarLeverancierOfferteKopieerder.Kopieer(KlantBestelling)
+	#dim TijdelijkeLeverancierOfferte As APPS.VKP.Offerte = ..KlantBestellingNaarLeverancierOfferteKopieerder.Kopieer(KlantBestelling)
 	
-	#dim ExterneId As %String = ..WinkelkarRepository.Bewaar(..WinkelkarExportConverter.ConvertUnishopOfferte(..OfferteConverter.ConverteerNaarECommerce(KlantBestelling)))
+	#dim ExterneId As %String = ..WinkelkarRepository.Bewaar(..WinkelkarExportConverter.ConvertUnishopOfferte(..OfferteConverter.ConverteerNaarECommerce(TijdelijkeLeverancierOfferte)))
+
+	Do ..OfferteService.VerwijderOfferte(TijdelijkeLeverancierOfferte)
 	
+	#dim LeverancierOfferte As APPS.VKP.Offerte = ..WinkelkarRepository.GeefOfferteViaID(ExterneId)
+	
 	Do ..OfferteService.KoppelAanOfferteVanHandel(LeverancierOfferte,KlantBestelling)
 		
 	Quit LeverancierOfferte