Index: WS/Vhisie4/WinkelkarExport/ExportService.cls.xml
===================================================================
diff -u -r39736 -r39764
--- WS/Vhisie4/WinkelkarExport/ExportService.cls.xml	(.../ExportService.cls.xml)	(revision 39736)
+++ WS/Vhisie4/WinkelkarExport/ExportService.cls.xml	(.../ExportService.cls.xml)	(revision 39764)
@@ -9,14 +9,27 @@
 <Type>WSimpl.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusService</Type>
 </Property>
 
+<Property name="WinkelkarRepository">
+<Type>WSimpl.Vhisie4.Winkelkar.WinkelkarRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="VerkoopService">
+<Type>APPS.EC.Verkoop.impl.Externe.VerkoopService</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>ExportStatusService:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusService</FormalSpec>
+<FormalSpec>ExportStatusService:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusService,WinkelkarRepository:WSimpl.Vhisie4.Winkelkar.WinkelkarRepository,VerkoopService:APPS.EC.Verkoop.ExterneVerkoopService</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..ExportStatusService = $$$Inject(ExportStatusService,##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusService).%New())
+	Set ..WinkelkarRepository = $$$Inject(WinkelkarRepository,##class(WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New())
+	Set ..VerkoopService = $$$Inject(VerkoopService,##class(APPS.EC.Verkoop.impl.Externe.VerkoopService).%New())
+
 	Quit $$$OK
 ]]></Implementation>
 </Method>
Index: vhUnitTest/WS/Vhisie4/WinkelkarExport/ExportService/Test.cls.xml
===================================================================
diff -u -r39736 -r39764
--- vhUnitTest/WS/Vhisie4/WinkelkarExport/ExportService/Test.cls.xml	(.../Test.cls.xml)	(revision 39736)
+++ vhUnitTest/WS/Vhisie4/WinkelkarExport/ExportService/Test.cls.xml	(.../Test.cls.xml)	(revision 39764)
@@ -17,6 +17,38 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test UpdateWinkelkar">
+<Implementation><![CDATA[
+	Set WinkelkarRepositoryMock  = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Set VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
+	
+	Set ExportService = ##class(WS.Vhisie4.WinkelkarExport.ExportService).%New(,WinkelkarRepositoryMock,VerkoopServiceMock)
+
+	#Dim UpdateWinkelkarRequest as WS.Vhisie4.WinkelkarExport.UpdateWinkelkarRequest = ..GeefUpdateWinkelkarRequest()
+	
+	;Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", ).DanReturn(654321)
+
+    Set Offerte = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
+	;Do VerkoopServiceMock.VerwachtMethodCall("GeefOfferte",654321).DanReturn(Offerte)
+	;Do Offerte.VerwachtMethodCall("ZetBestelStatus",UpdateWinkelkarRequest.Winkelkar.Status ,UpdateWinkelkarRequest.Winkelkar.BestelDatum).DanDoeNiks()
+	
+	Do ExportService.UpdateWinkelkar(UpdateWinkelkarRequest)
+	
+	;Do WinkelkarRepositoryMock.Verifieer()
+	;Do VerkoopServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="GeefUpdateWinkelkarRequest">
+<Private>1</Private>
+<ReturnType>WS.Vhisie4.WinkelkarExport.UpdateWinkelkarRequest</ReturnType>
+<Implementation><![CDATA[
+	Set UpdateWinkelkarRequest = ##class(WS.Vhisie4.WinkelkarExport.UpdateWinkelkarRequest).%New()
+	Set UpdateWinkelkarRequest.Winkelkar = ##class(vhTest.Utils.WS.Vhisie4.WinkelkarExport.dto.Winkelkar).StandaardProduct()
+	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="GeefRegistreerWinkelkarMigratieRequest">
 <Private>1</Private>
 <ReturnType>WS.Vhisie4.WinkelkarExport.RegistreerWinkelkarMigratieRequest</ReturnType>