Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml
===================================================================
diff -u -r41721 -r41740
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml	(.../MaakOrderVanOfferte.cls.xml)	(revision 41721)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml	(.../MaakOrderVanOfferte.cls.xml)	(revision 41740)
@@ -28,8 +28,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="Logger">
+<Type>vhLib.Logger</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>WinkelkarRepository:WSimpl.Vhisie4.Winkelkar.WinkelkarRepository,VanHoeckeGebruikerBeheerder:DOM.common.impl.VanHoeckeGebruikerBeheerder,TerminalNavigatieService:APPS.CHUI.TerminalNavigatieService,OrderIngaveService:APPS.VKP.OrderIngaveService,SystemInformation:TECH.SystemInformation</FormalSpec>
+<FormalSpec>WinkelkarRepository:WSimpl.Vhisie4.Winkelkar.WinkelkarRepository,VanHoeckeGebruikerBeheerder:DOM.common.impl.VanHoeckeGebruikerBeheerder,TerminalNavigatieService:APPS.CHUI.TerminalNavigatieService,OrderIngaveService:APPS.VKP.OrderIngaveService,SystemInformation:TECH.SystemInformation,Logger:vhLib.Logger</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -40,6 +45,7 @@
 	Set ..TerminalNavigatieService = $$$Inject(TerminalNavigatieService, ##class(APPS.CHUI.TerminalNavigatieService).%New())
 	Set ..OrderIngaveService = $$$Inject(OrderIngaveService,##class(APPS.VKP.OrderIngaveService).%New())
 	Set ..SystemInformation = $$$Inject(SystemInformation,##class(TECH.SystemInformation).%New())
+	Set ..Logger = $$$Inject(Logger, ##class(vhLib.Logger).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -52,7 +58,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, ..MaakGegevenBevestigingen(MaakOrderVanOfferteRequest.Bevestigingen)).GeefID()
+	#dim OrderId As %String = ..OrderIngaveService.MaakOrderVanOfferte(InterneOfferteId, ..MaakGegevenBevestigingen(MaakOrderVanOfferteRequest.BevestigdeSleutels)).GeefID()
 	
 	try {
 		Do ..TerminalNavigatieService.RaadpleegOrder(VanHoeckeGebruiker.GeefID(),ComputerNaam, OrderId)
@@ -63,20 +69,20 @@
 		Set Melding = Melding _"Gefaald voor ComputerNaam : " _ComputerNaam _$$$CRLF
 		Set Melding = Melding _"Gefaald voor IP : " _MaakOrderVanOfferteRequest.Header.GebruikerIp _$$$CRLF
 		Set Melding = Melding _"Foutmelding :" _NavigationException.GeefOmschrijving() _$$$CRLF
-		Do ##class(vhLib.Logger).%New().Warning("OrderNavigatie",Melding)
+		Do ..Logger.Warning("OrderNavigatie",Melding)
 		Do ##class(TECH.Exceptions.InvalidUserInputException).Throw("Het order " _OrderId _" is gemaakt, maar het is niet gelukt om de terminalnavigatie te starten!")
 	}
 ]]></Implementation>
 </Method>
 
 <Method name="MaakGegevenBevestigingen">
-<FormalSpec>Bevestigingen:WS.Vhisie4.Winkelkar.dto.GegevenBevestigingen=""</FormalSpec>
+<FormalSpec>BevestigdeSleutels:%ListOfDataTypes=""</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.common.Bevestigen.dto.GegevenBevestigingen</ReturnType>
 <Implementation><![CDATA[
-	If $$$Not(Bevestigingen = "") {
+	If $$$Not(BevestigdeSleutels.Count() = 0) {
 		Set GegevenBevestigingen = ##class(APPS.common.Bevestigen.dto.GegevenBevestigingen).%New()
-		Do GegevenBevestigingen.BevestigdeSleutels.InsertList(Bevestigingen.BevestigdeSleutels)
+		Do ##class(TECH.ListUtils).AppendList(GegevenBevestigingen.BevestigdeSleutels, BevestigdeSleutels)
 		Quit GegevenBevestigingen
 	}
 	Quit ""
FishEye: Tag 41740 refers to a dead (removed) revision in file `WS/Vhisie4/Winkelkar/dto/GegevenBevestigingen.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml
===================================================================
diff -u -r41721 -r41740
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml	(.../Test.cls.xml)	(revision 41721)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml	(.../Test.cls.xml)	(revision 41740)
@@ -35,6 +35,40 @@
 ]]></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 GegevenBevestigingenMatcher = ##class(Tools.Mock.ArgumentMatchers.ObjectMatcher).%New(..GeefGegevenBevestigingen())	
+	
+	Set OrderIngaveServiceMock = ##class(vhTest.Mock.APPS.VKP.OrderIngaveService).%New()
+	Do OrderIngaveServiceMock.VerwachtMethodCall("MaakOrderVanOfferte", "310250", GegevenBevestigingenMatcher).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 foutmelding gegenereerd als er reeds een order gemaakt is van deze offerte">
 <Implementation><![CDATA[
 	Set VanHoeckeGebruikerBeheerderStub = ##class(vhTest.Mock.DOM.common.VanHoeckeGebruikerBeheerder).%New()
@@ -99,6 +133,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefGegevenBevestigingen">
+<Private>1</Private>
+<ReturnType>APPS.common.Bevestigen.dto.GegevenBevestigingen</ReturnType>
+<Implementation><![CDATA[
+	Set Bevestigingen = ##class(APPS.common.Bevestigen.dto.GegevenBevestigingen).%New()
+	Set Bevestigingen.BevestigdeSleutels = ##class(%ListOfDataTypes).%New()
+	Do Bevestigingen.BevestigdeSleutels.Insert("PrijsVerschilSleutel")
+	Do Bevestigingen.BevestigdeSleutels.Insert("OrderReedsGemaaktSleutel")
+	Quit Bevestigingen
+]]></Implementation>
+</Method>
+
 <Method name="GeefVanHoeckeGebruiker">
 <Private>1</Private>
 <ReturnType>DOM.common.VanHoeckeGebruiker</ReturnType>
Index: WS/Vhisie4/Winkelkar/MaakOrderVanOfferteRequest.cls.xml
===================================================================
diff -u -r41682 -r41740
--- WS/Vhisie4/Winkelkar/MaakOrderVanOfferteRequest.cls.xml	(.../MaakOrderVanOfferteRequest.cls.xml)	(revision 41682)
+++ WS/Vhisie4/Winkelkar/MaakOrderVanOfferteRequest.cls.xml	(.../MaakOrderVanOfferteRequest.cls.xml)	(revision 41740)
@@ -26,9 +26,11 @@
 <Parameter name="XMLNAME" value="GebruikerEmail"/>
 </Property>
 
-<Property name="Bevestigingen">
-<Type>WS.Vhisie4.Winkelkar.dto.GegevenBevestigingen</Type>
-<Parameter name="XMLNAME" value="Bevestigingen"/>
+<Property name="BevestigdeSleutels">
+<Type>%String</Type>
+<Collection>list</Collection>
+<Parameter name="TRUNCATE" value="1"/>
+<Parameter name="XMLNAME" value="BevestigdeSleutels"/>
 </Property>
 
 <Storage name="Default">
@@ -48,6 +50,12 @@
 <Value name="4">
 <Value>Bevestigingen</Value>
 </Value>
+<Value name="5">
+<Value>BevestigingSleutels</Value>
+</Value>
+<Value name="6">
+<Value>BevestigdeSleutels</Value>
+</Value>
 </Data>
 </Storage>
 </Class>