Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml
===================================================================
diff -u -r39174 -r39594
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 39174)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 39594)
@@ -3,124 +3,52 @@
 <Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test: BereidVoorBestelling zet offerte hoofding met de juiste waarden">
+<Method name="Test: BereidVoorBestelling plaatst de hoofding op de offerte en bepaalt de mogelijke leverdatums - standaard zijn er geen herberekende lijnen en meldingen aan de gebruiker">
 <Implementation><![CDATA[
-	#dim WinkelkarRepositoryStub As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryStub.IndienMethodCall("BestaatViaID", "WinkelkarId").DanReturn($$$True)
-	Do WinkelkarRepositoryStub.IndienMethodCall("GeefOfferteIDViaID", "WinkelkarId").DanReturn("DummyID")
+	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", 1).DanReturn("InterneId")
 	
-	#dim VerkoopServiceMock As vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
-	Do VerkoopServiceMock.IndienMethodCall("GeefMogelijkeLeverdatums",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New())
+	set Hoofding = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(..GeefHoofding())
 	
-	set HoofdingMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(..GeefHoofding())
+	Set VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
+	Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", Hoofding ).DanDoeNiks()
+	Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","InterneId").DanReturn(..GeefMogelijkeLeverdatums())
 	
-	Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","DummyID", HoofdingMatcher).DanDoeNiks()
-
-	#dim BereidVoorBestelling As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceMock, WinkelkarRepositoryStub)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceMock, WinkelkarRepositoryMock)
 	
-	#dim BereidVoorBestellingRequest As WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest = ..GeefBereidVoorBestellingRequest()
-	Set BereidVoorBestellingRequest.LeverAdres.Aanspreking = "Dhr"
-	Set BereidVoorBestellingRequest.LeverAdres.Naam = "Kapoen"
-	Set BereidVoorBestellingRequest.LeverAdres.Toenaam = "Jo"
-	Set BereidVoorBestellingRequest.LeverAdres.Land = "BE" 
-	Set BereidVoorBestellingRequest.LeverAdres.Woonplaats = "Sint Niklaas" 
-	Set BereidVoorBestellingRequest.LeverAdres.PostCode = "9100"  
-	Set BereidVoorBestellingRequest.LeverAdres.StraatNrBus = "ANKERSTRAAT 91"
-	Set BereidVoorBestellingRequest.LeverAdres.Taal = "N"
-
-	Do BereidVoorBestelling.BereidVoorBestelling(BereidVoorBestellingRequest)
-
-	Do VerkoopServiceMock.Verifieer()
-]]></Implementation>
-</Method>
-
-<Method name="Test: BereidVoorBestelling geeft opgehaalde leverdatums in het resultaat">
-<Implementation><![CDATA[
-	#dim WinkelkarRepositoryStub As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryStub.IndienMethodCall("BestaatViaID", "WinkelkarId").DanReturn($$$True)
-	Do WinkelkarRepositoryStub.IndienMethodCall("GeefOfferteIDViaID", "WinkelkarId").DanReturn("DummyID")
+	#dim Reponse As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse = Service.BereidVoorBestelling(##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).StandaardRequest())
 	
-	#dim VerkoopServiceStub As vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
-	Do VerkoopServiceStub.IndienMethodCall("GeefMogelijkeLeverdatums","DummyID").DanReturn(..GeefMogelijkeLeverdatums())
-	Do VerkoopServiceStub.IndienMethodCall("ZetOfferteHoofding",$$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-
-	#dim BereidVoorBestelling As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceStub, WinkelkarRepositoryStub)
-	
-	#dim Resultaat As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse
-	Set Resultaat = BereidVoorBestelling.BereidVoorBestelling(..GeefBereidVoorBestellingRequest())
-	
-	If $$$AssertEquals(Resultaat.MogelijkeLeverdatums.Count(), 2 ) {
-		Do $$$AssertEqualsList(Resultaat.MogelijkeLeverdatums, ..GeefMogelijkeLeverdatums())
+	If $$$AssertEquals(Reponse.MogelijkeLeverdatums.Count(), 2 ) {
+		Do $$$AssertEqualsList(Reponse.MogelijkeLeverdatums, ..GeefMogelijkeLeverdatums())
+		Do $$$AssertEmptyList(Reponse.HerberekendeMaatwerklijnen)
+		Do $$$AssertEmptyList(Reponse.MeldingenAanGebruiker)
 	}
-]]></Implementation>
-</Method>
 
-<Method name="Test: BereidVoorBestelling haalt leverdatums op met de juiste parameters">
-<Implementation><![CDATA[
-	#dim WinkelkarRepositoryStub As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryStub.IndienMethodCall("BestaatViaID", "WinkelkarId").DanReturn($$$True)
-	Do WinkelkarRepositoryStub.IndienMethodCall("GeefOfferteIDViaID", "WinkelkarId").DanReturn("DummyID")
-	
-	#dim VerkoopServiceMock As vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
-	Do VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding",$$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","DummyID").DanReturn(##class(%ListOfDataTypes).%New())
-
-	#dim BereidVoorBestelling As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceMock, WinkelkarRepositoryStub)
-	
-	Do BereidVoorBestelling.BereidVoorBestelling(..GeefBereidVoorBestellingRequest())
-
 	Do VerkoopServiceMock.Verifieer()
-]]></Implementation>
-</Method>
-
-<Method name="Test: BereidVoorBestelling haalt de interne id op adhv ExterneId">
-<Implementation><![CDATA[
-	#dim WinkelkarRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", "WinkelkarId").DanReturn("DummyID")
-	
-	#dim VerkoopServiceStub As vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
-	Do VerkoopServiceStub.IndienMethodCall("ZetOfferteHoofding",$$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do VerkoopServiceStub.IndienMethodCall("GeefMogelijkeLeverdatums","DummyID").DanReturn(##class(%ListOfDataTypes).%New())
-
-	#dim BereidVoorBestelling As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceStub, WinkelkarRepositoryMock)
-	
-	Do BereidVoorBestelling.BereidVoorBestelling(..GeefBereidVoorBestellingRequest())
-
 	Do WinkelkarRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test: BereidVoorBestelling geeft foutmelding indien ExterneId niet bestaat">
+<Method name="Test: BereidVoorBestelling geeft foutmelding indien de winkelkar niet bestaat">
 <Implementation><![CDATA[
-	#dim OfferteDummy As vhTest.Fake.APPS.VKP.Offerte = ##class(vhTest.Fake.APPS.VKP.Offerte).%New()
-	
-	#dim BereidVoorBestelling As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New()
-
-	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Winkelkar met ID WinkelkarId bestaat niet.")
+	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Winkelkar met id 'Onbestaande_WinkelkarId' bestaat niet.")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException", Substrings))
 	
-	Do BereidVoorBestelling.BereidVoorBestelling(..GeefBereidVoorBestellingRequest())
+	Set BereidVoorBestellingRequest = ##class(WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).%New()
+	Set BereidVoorBestellingRequest.Winkelkar.Id = "Onbestaande_WinkelkarId"
+	
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New()
+	Do Service.BereidVoorBestelling(BereidVoorBestellingRequest)
 ]]></Implementation>
 </Method>
 
-<Method name="GeefBereidVoorBestellingRequest">
-<Private>1</Private>
-<ReturnType>WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest</ReturnType>
-<Implementation><![CDATA[
-	#dim BereidVoorBestellingRequest As WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest 
-	Set BereidVoorBestellingRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).BereidVoorBestellingRequest()
-	Set BereidVoorBestellingRequest.Header.WinkelkarId = "WinkelkarId"
-	Quit BereidVoorBestellingRequest
-]]></Implementation>
-</Method>
-
 <Method name="GeefMogelijkeLeverdatums">
 <Private>1</Private>
 <ReturnType>%ListOfDataTypes</ReturnType>
 <Implementation><![CDATA[
-	#dim MogelijkeLeverdatums As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
-	Do MogelijkeLeverdatums.Insert( ##class(TECH.DateTime.impl.DateTimeAPI).%New().CurrentDate() + 1 )
-	Do MogelijkeLeverdatums.Insert( ##class(TECH.DateTime.impl.DateTimeAPI).%New().CurrentDate() + 2 )
+	Set MogelijkeLeverdatums = ##class(%ListOfDataTypes).%New()
+	Do MogelijkeLeverdatums.Insert( $$$CurrentDate + 1 )
+	Do MogelijkeLeverdatums.Insert( $$$CurrentDate + 2 )
 
 	Quit MogelijkeLeverdatums
 ]]></Implementation>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn.cls.xml
===================================================================
diff -u -r39526 -r39594
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn.cls.xml	(.../BewaarProductLijn.cls.xml)	(revision 39526)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn.cls.xml	(.../BewaarProductLijn.cls.xml)	(revision 39594)
@@ -43,7 +43,7 @@
 		Do ..WinkelkarService.VerwijderLijn(WinkelkarID, LijnID)
 	}
 	
-	Do ..WinkelkarService.VoegToeProduct(WinkelkarID, BewaarProductLijnRequest.ProductId, BewaarProductLijnRequest.Aantal, BewaarProductLijnRequest.PakketReferentie, BewaarProductLijnRequest.ProjectReferentie, BewaarProductLijnRequest.LijnId)
+	Do ..WinkelkarService.VoegToeProduct(WinkelkarID, "EenGroep", BewaarProductLijnRequest.ProductId, BewaarProductLijnRequest.Aantal, BewaarProductLijnRequest.PakketReferentie, BewaarProductLijnRequest.ProjectReferentie, BewaarProductLijnRequest.LijnId)
 ]]></Implementation>
 </Method>
 </Class>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarConverter.cls.xml
===================================================================
diff -u -r39546 -r39594
--- WSimpl/Vhisie4/Winkelkar/WinkelkarConverter.cls.xml	(.../WinkelkarConverter.cls.xml)	(revision 39546)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarConverter.cls.xml	(.../WinkelkarConverter.cls.xml)	(revision 39594)
@@ -14,7 +14,9 @@
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
-<Implementation><![CDATA[	set ..WinkelkarLijnConverter = $$$Inject(WinkelkarLijnConverter,##class(WSimpl.Vhisie4.Winkelkar.WinkelkarLijnConverter).%New())
+<Implementation><![CDATA[
+	set ..WinkelkarLijnConverter = $$$Inject(WinkelkarLijnConverter,##class(WSimpl.Vhisie4.Winkelkar.WinkelkarLijnConverter).%New())
+	Quit $$$OK
 ]]></Implementation>
 </Method>
 
@@ -27,8 +29,11 @@
 	set Iterator = ##class(TECH.ListIterator).%New(Winkelkar.Lijnen)
 	while Iterator.HasNext() {
 		#dim WinkelkarLijn As WS.Vhisie4.Winkelkar.dto.WinkelkarLijn = Iterator.Next()
-		do Offerte.Winkelkar.Lijnen.Insert(..WinkelkarLijnConverter.Convert(WinkelkarLijn))	
+		set Offerte.Winkelkar = ##class(APPS.EC.Winkelkar.dto.Winkelkar).%New()
+		do Offerte.Winkelkar.Lijnen.Insert(..WinkelkarLijnConverter.NaarApps(WinkelkarLijn))	
 	}
+	
+	Quit Offerte
 ]]></Implementation>
 </Method>
 </Class>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml
===================================================================
diff -u -r39553 -r39594
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml	(.../BereidVoorBestelling.cls.xml)	(revision 39553)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml	(.../BereidVoorBestelling.cls.xml)	(revision 39594)
@@ -31,7 +31,7 @@
 <FormalSpec>BereidVoorBestellingRequest:WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest</FormalSpec>
 <ReturnType>WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse</ReturnType>
 <Implementation><![CDATA[
-	#dim OfferteID As %String = ..WinkelkarRepository.GeefOfferteIDViaID(BereidVoorBestellingRequest.WinkelkarId)
+	#dim OfferteID As %String = ..WinkelkarRepository.GeefOfferteIDViaID(BereidVoorBestellingRequest.Winkelkar.Id)
 
 	Do ..VerkoopService.ZetOfferteHoofding(OfferteID, ..MaakHoofding(BereidVoorBestellingRequest))
 
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml
===================================================================
diff -u -r39553 -r39594
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml	(.../BestelWinkelkar.cls.xml)	(revision 39553)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml	(.../BestelWinkelkar.cls.xml)	(revision 39594)
@@ -37,7 +37,7 @@
 <FormalSpec>BestelWinkelkarRequest:WS.Vhisie4.Winkelkar.BestelWinkelkarRequest</FormalSpec>
 <ReturnType>WS.Vhisie4.Winkelkar.BestelWinkelkarResponse</ReturnType>
 <Implementation><![CDATA[
-	#dim OfferteID As %String = ..WinkelkarRepository.GeefOfferteIDViaID(BestelWinkelkarRequest.WinkelkarId)
+	#dim OfferteID As %String = ..WinkelkarRepository.GeefOfferteIDViaID(BestelWinkelkarRequest.Winkelkar.Id)
 
 	Do ..VerkoopService.ZetOfferteHoofding(OfferteID, ..MaakHoofding(BestelWinkelkarRequest))
 	Do ..VerkoopService.BestelOfferte(OfferteID, ..GeefKlantPartijID(BestelWinkelkarRequest.Header.KlantId), ##class(DOM.common.enu.Personality).VanHoecke())
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml
===================================================================
diff -u -r39175 -r39594
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml	(.../Test.cls.xml)	(revision 39175)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml	(.../Test.cls.xml)	(revision 39594)
@@ -14,15 +14,15 @@
 	#dim VerkoopServiceMock As vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
 	Do VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding",$$$ElkeWaarde, $$$ElkeWaarde).DanException($$$DummyException)
 
-	#dim BestelWinkelkar As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceMock, WinkelkarRepositoryStub, LegacyPartijAPIStub)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceMock, WinkelkarRepositoryStub, LegacyPartijAPIStub)
 
 	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ..GeefBestelWinkelkarRequest()
 	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
 	
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("DummyException")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException", Substrings))
 
-	Do BestelWinkelkar.BestelWinkelkar(BestelWinkelkarRequest)
+	Do Service.BestelWinkelkar(BestelWinkelkarRequest)
 ]]></Implementation>
 </Method>
 
@@ -39,12 +39,12 @@
 
 	Do VerkoopServiceMock.VerwachtMethodCall("BestelOfferte","DummyID","KlantId",##class(DOM.common.enu.Personality).VanHoecke()).DanDoeNiks()
 
-	#dim BestelWinkelkar As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceMock, WinkelkarRepositoryStub, LegacyPartijAPIStub)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceMock, WinkelkarRepositoryStub, LegacyPartijAPIStub)
 
 	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ..GeefBestelWinkelkarRequest()
 	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
 	
-	Do BestelWinkelkar.BestelWinkelkar(BestelWinkelkarRequest)
+	Do Service.BestelWinkelkar(BestelWinkelkarRequest)
 
 	Do VerkoopServiceMock.Verifieer()
 ]]></Implementation>
@@ -65,11 +65,11 @@
 	
 	Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","DummyID", HoofdingMatcher).DanDoeNiks()
 
-	#dim BestelWinkelkar As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceMock, WinkelkarRepositoryStub, LegacyPartijAPIStub)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceMock, WinkelkarRepositoryStub, LegacyPartijAPIStub)
 	
 	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ..GeefBestelWinkelkarRequest()
 	Set BestelWinkelkarRequest.BestelOpmerking = "BestelOpmerking"
-	Set BestelWinkelkarRequest.Leverdatum = ..GeefHuidigeDatum()
+	Set BestelWinkelkarRequest.Leverdatum = $$$CurrentDate
 	Set BestelWinkelkarRequest.LeverAdres.Aanspreking = "Dhr"
 	Set BestelWinkelkarRequest.LeverAdres.Naam = "Kapoen"
 	Set BestelWinkelkarRequest.LeverAdres.Toenaam = "Jo"
@@ -79,9 +79,9 @@
 	Set BestelWinkelkarRequest.LeverAdres.StraatNrBus = "ANKERSTRAAT 91"
 	Set BestelWinkelkarRequest.LeverAdres.Taal = "N"
 	Set BestelWinkelkarRequest.Referentie = "OrderReferentie"
+	
+	Do Service.BestelWinkelkar(BestelWinkelkarRequest)
 
-	Do BestelWinkelkar.BestelWinkelkar(BestelWinkelkarRequest)
-
 	Do VerkoopServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
@@ -98,35 +98,35 @@
 	#dim LegacyPartijAPIStub As vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI = ##class(vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI).%New()
 	Do LegacyPartijAPIStub.IndienMethodCall("IsKlantPartijID",$$$ElkeWaarde).DanReturn($$$True)
 
-	#dim BestelWinkelkar As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceStub, WinkelkarRepositoryMock, LegacyPartijAPIStub)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(VerkoopServiceStub, WinkelkarRepositoryMock, LegacyPartijAPIStub)
 
-	Do BestelWinkelkar.BestelWinkelkar(..GeefBestelWinkelkarRequest())
+	Do Service.BestelWinkelkar(..GeefBestelWinkelkarRequest())
 
 	Do WinkelkarRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: BestelWinkelkar geeft foutmelding indien ExterneId niet bestaat">
 <Implementation><![CDATA[
-	#dim OfferteDummy As vhTest.Fake.APPS.VKP.Offerte = ##class(vhTest.Fake.APPS.VKP.Offerte).%New()
-
-	#dim BestelWinkelkar As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New()
-
-	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Winkelkar met ID WinkelkarId bestaat niet.")
+	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Winkelkar met id 'Onbestaande_WinkelkarId' bestaat niet.")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException", Substrings))
 	
-	Do BestelWinkelkar.BestelWinkelkar(..GeefBestelWinkelkarRequest())
+	#dim Request As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).BestelWinkelkarRequest()
+	Set Request.Winkelkar.Id = "Onbestaande_WinkelkarId"
+	
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New()
+	
+	Do Service.BestelWinkelkar(Request)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefBestelWinkelkarRequest">
 <Private>1</Private>
 <ReturnType>WS.Vhisie4.Winkelkar.BestelWinkelkarRequest</ReturnType>
 <Implementation><![CDATA[
-	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest 
-	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).BestelWinkelkarRequest()
-	Set BestelWinkelkarRequest.Header.WinkelkarId = "WinkelkarId"
-	Quit BestelWinkelkarRequest
+	#dim Request As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).BestelWinkelkarRequest()
+	Set Request.Winkelkar.Id = "WinkelkarId"
+	Quit Request
 ]]></Implementation>
 </Method>
 
@@ -140,7 +140,7 @@
 	
 	Set Hoofding.LeveringDetail = ##class(APPS.EC.dto.LeveringDetail).%New()
 	Set Hoofding.LeveringDetail.Datum = ""
-	Set Hoofding.LeveringDetail.WensDatum = ..GeefHuidigeDatum()
+	Set Hoofding.LeveringDetail.WensDatum = $$$CurrentDate
 	
 	Set Hoofding.LeveringDetail.Adres = ##class(vhTest.Utils.APPS.common.dto.Adres).BelgischAdres()
 	
@@ -151,13 +151,6 @@
 	Quit Hoofding
 ]]></Implementation>
 </Method>
-
-<Method name="GeefHuidigeDatum">
-<Private>1</Private>
-<ReturnType>%Date</ReturnType>
-<Implementation><![CDATA[	Quit ##class(TECH.DateTime.impl.DateTimeAPI).%New().CurrentDate()
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarLijnConverter.cls.xml
===================================================================
diff -u -r39549 -r39594
--- WSimpl/Vhisie4/Winkelkar/WinkelkarLijnConverter.cls.xml	(.../WinkelkarLijnConverter.cls.xml)	(revision 39549)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarLijnConverter.cls.xml	(.../WinkelkarLijnConverter.cls.xml)	(revision 39594)
@@ -36,6 +36,7 @@
 	#dim APPSMaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..EconConfiguratieConverter.Convert(WSMaatwerkLijn.EconConfiguratie)
 	set APPSMaatwerkLijn.TotaalPrijs = WSMaatwerkLijn.TotaalPrijs
 	set APPSMaatwerkLijn.EenheidPrijs = WSMaatwerkLijn.EenheidPrijs
+	set APPSMaatwerkLijn.ExterneId = WSMaatwerkLijn.Id
 	quit APPSMaatwerkLijn
 ]]></Implementation>
 </Method>
@@ -49,6 +50,7 @@
 	Set APPSProductLijn.Aantal = WSProductLijn.Aantal
 	Set APPSProductLijn.TotaalPrijs = WSProductLijn.TotaalPrijs
 	Set APPSProductLijn.ProductId = WSProductLijn.ProductId
+	Set APPSProductLijn.ExterneId = WSProductLijn.Id
 	
 	Quit APPSProductLijn
 ]]></Implementation>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk.cls.xml
===================================================================
diff -u -r39486 -r39594
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk.cls.xml	(.../HerberekenMaatwerk.cls.xml)	(revision 39486)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk.cls.xml	(.../HerberekenMaatwerk.cls.xml)	(revision 39594)
@@ -18,16 +18,11 @@
 <Private>1</Private>
 </Property>
 
-<Property name="Vhisie3WinkelkarUtils">
+<Property name="WinkelkarUtils">
 <Type>APPS.EC.Winkelkar.impl.WinkelkarUtils</Type>
 <Private>1</Private>
 </Property>
 
-<Property name="Vhisie4WinkelkarUtils">
-<Type>WSimpl.Vhisie4.Winkelkar.WinkelkarUtils</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="LijnCacheBuilder">
 <Type>WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheBuilder</Type>
 <Private>1</Private>
@@ -38,20 +33,26 @@
 <Private>1</Private>
 </Property>
 
+<Property name="WinkelkarConverter">
+<Type>WSimpl.Vhisie4.Winkelkar.WinkelkarConverter</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>VerkoopService:APPS.EC.Verkoop.impl.Externe.VerkoopService,WinkelkarRepository:WSimpl.Vhisie4.Winkelkar.WinkelkarRepository,LijnCacheMatcher:WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher,Vhisie3WinkelkarUtils:APPS.EC.Winkelkar.impl.WinkelkarUtils,Vhisie4WinkelkarUtils:WSimpl.Vhisie4.Winkelkar.WinkelkarUtils,LijnCacheBuilder:WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheBuilder</FormalSpec>
+<FormalSpec>VerkoopService:APPS.EC.Verkoop.impl.Externe.VerkoopService,WinkelkarRepository:WSimpl.Vhisie4.Winkelkar.WinkelkarRepository,LijnCacheMatcher:WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher,WinkelkarUtils:APPS.EC.Winkelkar.impl.WinkelkarUtils,LijnCacheBuilder:WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheBuilder</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..VerkoopService = $$$Inject(VerkoopService, ##class(APPS.EC.Verkoop.impl.Externe.VerkoopService).%New())
 	Set ..WinkelkarRepository = $$$Inject(WinkelkarRepository,##class(WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New())
+	Set ..WinkelkarUtils = $$$Inject(WinkelkarUtils,##class(APPS.EC.Winkelkar.impl.WinkelkarUtils).%New())
 	Set ..LijnCacheMatcher = $$$Inject(LijnCacheMatcher, ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher).%New())
-	Set ..Vhisie3WinkelkarUtils = $$$Inject(Vhisie3WinkelkarUtils, ##class(APPS.EC.Winkelkar.impl.WinkelkarUtils).%New())
-	Set ..Vhisie4WinkelkarUtils = $$$Inject(Vhisie4WinkelkarUtils,##class(WSimpl.Vhisie4.Winkelkar.WinkelkarUtils).%New())
 	Set ..LijnCacheBuilder = $$$Inject(LijnCacheBuilder,##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheBuilder).%New())
 	Set ..LijnCacheValidator = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheValidator).%New()
+	
+	Set ..WinkelkarConverter = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarConverter).%New()
 
 	Quit $$$OK
 ]]></Implementation>
@@ -63,19 +64,10 @@
 <Implementation><![CDATA[
 	Set Response = ##class(WS.Vhisie4.Winkelkar.HerberekenMaatwerkResponse).%New()
 
-	#dim OfferteId As %String = ..WinkelkarRepository.GeefOfferteIDViaID(HerberekenMaatwerkRequest.Winkelkar.ID)
-	
-	#dim Offerte As APPS.EC.dto.Offerte = ..VerkoopService.GeefOfferte(OfferteId)
-	
-	#dim Vhisie4WinkelkarLijnen As %ListOfObjects = ..Vhisie4WinkelkarUtils.GeefMaatwerkLijnen(HerberekenMaatwerkRequest.Winkelkar)
-	#dim Vhisie3WinkelkarLijnen As %ListOfObjects = ..Vhisie3WinkelkarUtils.GeefMaatwerkLijnen(Offerte.Winkelkar)
-	
-	#dim WinkelkarLijnCache As %ArrayOfObjects = ..LijnCacheBuilder.BuildCache(Vhisie4WinkelkarLijnen, Vhisie3WinkelkarLijnen)
-	
-	Do ..LijnCacheValidator.ValidateCache(Offerte.Winkelkar.WinkelkarID, WinkelkarLijnCache)
-	
-	#dim HerberekendeLijnen As TECH.ListOfObjects = ..LijnCacheMatcher.GeefHerberekendeLijnen(WinkelkarLijnCache)
+	Do ..ValideerLijnenAlvorensTeHerberekenen(HerberekenMaatwerkRequest)
 
+	#dim HerberekendeLijnen As TECH.ListOfObjects = ..LijnCacheMatcher.GeefHerberekendeLijnen("")
+
 	#dim LijnIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(HerberekendeLijnen)
 	While LijnIterator.HasNext() {
 		#dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = LijnIterator.Next()
@@ -85,20 +77,52 @@
 		Set HerberekendeLijn.LijnID = MaatwerkLijn.ExterneId
 		Set HerberekendeLijn.EenheidPrijs = MaatwerkLijn.EenheidPrijs
 		Set HerberekendeLijn.TotaalPrijs = MaatwerkLijn.TotaalPrijs
-		Set HerberekendeLijn.PrijzenGeldigTotEnMet = Offerte.PrijzenGeldigTotEnMetDatum
+		Set HerberekendeLijn.PrijzenGeldigTotEnMet = MaatwerkLijn.PrijzenGeldigTotEnMetDatum
 		
 		Do Response.HerberekendeLijnen.Insert(HerberekendeLijn)
 	}
 	
 	Set Response.WasNogGeldig = (HerberekendeLijnen.Count() = 0)
 	
-	If $$$Not(Response.WasNogGeldig) && (Offerte.Melding '= "") {
+	/*If $$$Not(Response.WasNogGeldig) && (Offerte.Melding '= "") {
 		Do Response.MeldingenAanGebruiker.Insert(Offerte.Melding)
-	}
+	}*/
 	
 	Quit Response
 ]]></Implementation>
 </Method>
+
+<Method name="ValideerLijnenAlvorensTeHerberekenen">
+<FormalSpec>HerberekenMaatwerkRequest:WS.Vhisie4.Winkelkar.HerberekenMaatwerkRequest</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim GepersisteerdeMaatwerklijnen As list of APPS.EC.Winkelkar.dto.MaatwerkLijn = ..GeefGepersisteerdeMaatwerkLijnen(HerberekenMaatwerkRequest)
+	#dim NietgepersisteerdeMaatwerklijnen As list of APPS.EC.Winkelkar.dto.MaatwerkLijn = ..GeefNietGepersisteerdeMaatwerkLijnen(HerberekenMaatwerkRequest)
+	
+	#dim WinkelkarLijnCache As %ArrayOfObjects = ..LijnCacheBuilder.BuildCache(NietgepersisteerdeMaatwerklijnen,GepersisteerdeMaatwerklijnen)
+	
+	Do ..LijnCacheValidator.ValidateCache(HerberekenMaatwerkRequest.Winkelkar.Id, WinkelkarLijnCache)
+]]></Implementation>
+</Method>
+
+<Method name="GeefGepersisteerdeMaatwerkLijnen">
+<FormalSpec>HerberekenMaatwerkRequest:WS.Vhisie4.Winkelkar.HerberekenMaatwerkRequest</FormalSpec>
+<Private>1</Private>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[
+	#dim OfferteId As %String = ..WinkelkarRepository.GeefOfferteIDViaID(HerberekenMaatwerkRequest.Winkelkar.Id)
+	#dim Offerte As APPS.EC.dto.Offerte = ..VerkoopService.GeefOfferte(OfferteId)
+	Quit ..WinkelkarUtils.GeefMaatwerkLijnen(Offerte.Winkelkar)
+]]></Implementation>
+</Method>
+
+<Method name="GeefNietGepersisteerdeMaatwerkLijnen">
+<FormalSpec>HerberekenMaatwerkRequest:WS.Vhisie4.Winkelkar.HerberekenMaatwerkRequest</FormalSpec>
+<Private>1</Private>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ..WinkelkarConverter.NaarApps(HerberekenMaatwerkRequest.Winkelkar).Winkelkar.Lijnen
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml
===================================================================
diff -u -r39558 -r39594
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml	(.../Test.cls.xml)	(revision 39558)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml	(.../Test.cls.xml)	(revision 39594)
@@ -11,7 +11,7 @@
 	Do EconConfiguratieConverterMock.VerwachtMethodCall("Convert",BewaarMaatwerkLijnRequest.EconConfiguratie).DanReturn(EconMaatwerkLijn)
 	
 	#dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..GeefMaatwerkLijn()
-	Set WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
+	Set WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
 	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeMaatwerk", "OfferteId", "MijnGroep", EconMaatwerkLijn.IngegevenKenmerken, "", "", "LijnID").DanReturn(MaatwerkLijn)
 
 	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
@@ -37,7 +37,7 @@
 
 <Method name="Test: Bewaarmaatwerklijn verwijdert lijn als deze bestaat en bewaart dan maatwerklijn met de juiste parameters">
 <Implementation><![CDATA[
-	Set WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
+	Set WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
 	Do WinkelkarServiceMock.IndienMethodCall("VoegToeMaatwerk", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(..GeefMaatwerkLijn())
 
 	Set WinkelkarRepositoryStub = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()