Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml
===================================================================
diff -u -r45539 -r45589
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml	(.../MaakOrderVanOfferte.cls.xml)	(revision 45539)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml	(.../MaakOrderVanOfferte.cls.xml)	(revision 45589)
@@ -61,7 +61,7 @@
 		#dim InterneOfferteId As %String = ..WinkelkarRepository.GeefOfferteIDViaID(MaakOrderVanOfferteRequest.WinkelkarId)
 		#dim ComputerNaam As %String = ..SystemInformation.GeefComputerNaamViaIP(MaakOrderVanOfferteRequest.Header.GebruikerIp)
 		
-		#dim OrderId As %String = ..OrderIngaveService.MaakOrderVanOfferte(InterneOfferteId, "").GeefID()
+		#dim OrderId As %String = ..OrderIngaveService.MaakOrderVanOfferte(InterneOfferteId, ..MaakGegevenBevestigingen(MaakOrderVanOfferteRequest.BevestigdeSleutels)).GeefID()
 	} Catch {
 		Lock -^Vhisie4.Winkelkar(MaakOrderVanOfferteRequest.WinkelkarId)
 		Do ##class(TECH.ExceptionHandler).Rethrow()
@@ -73,6 +73,9 @@
 		Do ..TerminalNavigatieService.RaadpleegOrder(VanHoeckeGebruiker.GeefID(),ComputerNaam, OrderId)
 	} catch {
 		#dim NavigationException As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+	
+		Lock -^Vhisie4.Winkelkar(MaakOrderVanOfferteRequest.WinkelkarId)
+
 		#dim Melding As %String = "Gefaald voor WinkelkarId : " _MaakOrderVanOfferteRequest.WinkelkarId _$$$CRLF
 		Set Melding = Melding _"Gefaald voor OrderId : " _OrderId _$$$CRLF
 		Set Melding = Melding _"Gefaald voor ComputerNaam : " _ComputerNaam _$$$CRLF
@@ -83,6 +86,20 @@
 	}
 ]]></Implementation>
 </Method>
+
+<Method name="MaakGegevenBevestigingen">
+<FormalSpec>BevestigdeSleutels:%ListOfDataTypes=""</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.common.Bevestigen.dto.GegevenBevestigingen</ReturnType>
+<Implementation><![CDATA[
+	If $$$Not(BevestigdeSleutels.Count() = 0) {
+		Set GegevenBevestigingen = ##class(APPS.common.Bevestigen.dto.GegevenBevestigingen).%New()
+		Do ##class(TECH.ListUtils).AppendList(GegevenBevestigingen.BevestigdeSleutels, BevestigdeSleutels)
+		Quit GegevenBevestigingen
+	}
+	Quit ""
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml
===================================================================
diff -u -r45539 -r45589
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml	(.../Test.cls.xml)	(revision 45539)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml	(.../Test.cls.xml)	(revision 45589)
@@ -35,6 +35,38 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Bevestigingen worden meegegeven bij het aanmaken van het order">
+<Implementation><![CDATA[
+	Set VanHoeckeGebruikerBeheerderStub = ##class(vhTest.Mock.DOM.common.VanHoeckeGebruikerBeheerder).%New()
+	Do VanHoeckeGebruikerBeheerderStub.IndienMethodCall("GeefGebruikerViaEmail", $$$ElkeWaarde).DanReturn(..GeefVanHoeckeGebruiker())
+	
+	Set WinkelkarRepositoryStub = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Do WinkelkarRepositoryStub.IndienMethodCall("GeefOfferteIDViaID", $$$ElkeWaarde).DanReturn("310250")
+	
+	Set SystemInformationStub = ##class(vhTest.Mock.TECH.SystemInformation).%New()
+	Do SystemInformationStub.IndienMethodCall("GeefComputerNaamViaIP", $$$ElkeWaarde).DanReturn("ComputerNaam.VanHoecke.be")
+
+	Set TerminalNavigatieServiceStub = ##class(vhTest.Mock.APPS.CHUI.TerminalNavigatieService).%New()
+	Do TerminalNavigatieServiceStub.IndienMethodCall("RaadpleegOrder",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanDoeNiks()
+	
+	Set OrderStub = ##class(vhTest.Mock.DOM.VKP.Order).%New()
+	Do OrderStub.IndienMethodCall("GeefID").DanReturn("123456")
+
+	Set OrderIngaveServiceMock = ##class(vhTest.Mock.APPS.VKP.OrderIngaveService).%New()
+	Do OrderIngaveServiceMock.VerwachtMethodCall("MaakOrderVanOfferte", "310250", ..Matches.Object(..GeefGegevenBevestigingen()) ).DanReturn(OrderStub)
+
+	#dim MaakOrderVanOfferteRequest As WS.Vhisie4.Winkelkar.MaakOrderVanOfferteRequest = ..GeefMaakOrderVanOfferteRequest()
+	Set MaakOrderVanOfferteRequest.BevestigdeSleutels = ##class(%ListOfDataTypes).%New()
+	Do MaakOrderVanOfferteRequest.BevestigdeSleutels.Insert("PrijsVerschilSleutel")
+	Do MaakOrderVanOfferteRequest.BevestigdeSleutels.Insert("OrderReedsGemaaktSleutel")
+
+	Set MaakOrderVanOfferte = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.MaakOrderVanOfferte).%New(WinkelkarRepositoryStub, VanHoeckeGebruikerBeheerderStub, TerminalNavigatieServiceStub , OrderIngaveServiceMock, SystemInformationStub)
+	Do MaakOrderVanOfferte.MaakOrderVanOfferte(MaakOrderVanOfferteRequest)
+
+	Do OrderIngaveServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test: Er wordt een melding aan de gebruiker gegenereerd als er reeds een order gemaakt is van deze offerte">
 <Implementation><![CDATA[
 	Set VanHoeckeGebruikerBeheerderStub = ##class(vhTest.Mock.DOM.common.VanHoeckeGebruikerBeheerder).%New()