Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheBuilder.cls.xml
===================================================================
diff -u -r39415 -r39418
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheBuilder.cls.xml	(.../LijnCacheBuilder.cls.xml)	(revision 39415)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheBuilder.cls.xml	(.../LijnCacheBuilder.cls.xml)	(revision 39418)
@@ -3,16 +3,6 @@
 <Class name="WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheBuilder">
 <Super>TECH.Mockable</Super>
 
-<Parameter name="Vhisie3">
-<Type>%String</Type>
-<Default>Vhisie3</Default>
-</Parameter>
-
-<Parameter name="Vhisie4">
-<Type>%String</Type>
-<Default>Vhisie4</Default>
-</Parameter>
-
 <Property name="WinkelkarLijnenCache">
 <Type>%ArrayOfObjects</Type>
 <Collection>array</Collection>
@@ -49,6 +39,7 @@
 	Set ..Vhisie3WinkelkarUtils = $$$Inject(Vhisie3WinkelkarUtils, ##class(APPS.EC.Winkelkar.impl.WinkelkarUtils).%New())
 	Set ..Vhisie4WinkelkarUtils = $$$Inject(Vhisie4WinkelkarUtils,##class(WSimpl.Vhisie4.Winkelkar.WinkelkarUtils).%New())
 	Set ..LijnCacheValidator = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheValidator).%New()
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -60,8 +51,8 @@
 	#dim Vhisie4WinkelkarMaatwerkLijnen As %ListOfObjects = ..Vhisie4WinkelkarUtils.GeefMaatwerkLijnen(Vhisie4Winkelkar)
 	#dim Vhisie3WinkelkarMaatwerkLijnen As %ListOfObjects = ..Vhisie3WinkelkarUtils.GeefMaatwerkLijnen(Vhisie3Winkelkar)
 	
-	Do ..VoegToeLijnen(Vhisie4WinkelkarMaatwerkLijnen,..#Vhisie4)
-	Do ..VoegToeLijnen(Vhisie3WinkelkarMaatwerkLijnen,..#Vhisie3)
+	Do ..VoegToeLijnen(Vhisie4WinkelkarMaatwerkLijnen,##class(WS.Vhisie4.Winkelkar.enu.WinkelkarType).Vhisie4())
+	Do ..VoegToeLijnen(Vhisie3WinkelkarMaatwerkLijnen,##class(WS.Vhisie4.Winkelkar.enu.WinkelkarType).Vhisie3())
 	
 	If (Vhisie4Winkelkar.ID '= Vhisie3Winkelkar.ExterneId) {
 		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Winkelkar Vhisie4 " _Vhisie4Winkelkar.ID _" en winkelkar Vhisie3 " _Vhisie3Winkelkar.ExterneId _" zijn niet dezelfde winkelkar."))			
@@ -76,13 +67,13 @@
 </Method>
 
 <Method name="VoegToeLijnen">
-<FormalSpec>MaatwerkLijnen:TECH.ListOfObjects,Vhisie4OfVhisie3:%String</FormalSpec>
+<FormalSpec>MaatwerkLijnen:TECH.ListOfObjects,Vhisie4OfVhisie3:WS.Vhisie4.Winkelkar.enu.WinkelkarType</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Set Iterator = ##class(TECH.ListIterator).%New(MaatwerkLijnen)
 	While Iterator.HasNext() {
 		#dim MaatwerkLijn As %CacheString = Iterator.Next()
-		#dim ExterneId As %String = $$$If(Vhisie4OfVhisie3=..#Vhisie3,MaatwerkLijn.ExterneId,MaatwerkLijn.ID)
+		#dim ExterneId As %String = $$$If(Vhisie4OfVhisie3=##class(WS.Vhisie4.Winkelkar.enu.WinkelkarType).Vhisie3(), MaatwerkLijn.ExterneId, MaatwerkLijn.ID)
 		
 		If $$$Not(..WinkelkarLijnenCache.IsDefined(ExterneId)) {
 			Do ..WinkelkarLijnenCache.SetAt(##class(%ArrayOfObjects).%New(),ExterneId)
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/Synchroniseer.cls.xml
===================================================================
diff -u -r39368 -r39418
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/Synchroniseer.cls.xml	(.../Synchroniseer.cls.xml)	(revision 39368)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/Synchroniseer.cls.xml	(.../Synchroniseer.cls.xml)	(revision 39418)
@@ -18,6 +18,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="WinkelkarUtils">
+<Type>WSimpl.Vhisie4.Winkelkar.WinkelkarUtils</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</FormalSpec>
 <Private>1</Private>
@@ -28,6 +33,7 @@
 	Set ..VerkoopService = $$$Inject(VerkoopService, ##class(APPS.EC.Verkoop.impl.Externe.VerkoopService).%New())
 	Set ..WinkelkarRepository = $$$Inject(WinkelkarRepository,##class(WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New())
 	Set ..LijnCacheMatcher = $$$Inject(LijnCacheMatcher, ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher).%New())
+	Set ..WinkelkarUtils = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarUtils).%New()
 
 	Quit $$$OK
 ]]></Implementation>
@@ -63,6 +69,16 @@
 	Quit Response
 ]]></Implementation>
 </Method>
+
+<Method name="BewaarProductLijnen">
+<FormalSpec>Winkelkar:WS.Vhisie4.Winkelkar.dto.Winkelkar</FormalSpec>
+<Implementation><![CDATA[
+	#dim ProductLijnenIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(..WinkelkarUtils.GeefProductLijnen(Winkelkar))
+	While ProductLijnenIterator.HasNext() {
+		Do ProductLijnenIterator.Next()
+	}
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml
===================================================================
diff -u -r39264 -r39418
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml	(.../LijnCacheMatcher.cls.xml)	(revision 39264)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml	(.../LijnCacheMatcher.cls.xml)	(revision 39418)
@@ -3,16 +3,6 @@
 <Class name="WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher">
 <Super>TECH.Mockable</Super>
 
-<Parameter name="Vhisie3">
-<Type>%String</Type>
-<Default>Vhisie3</Default>
-</Parameter>
-
-<Parameter name="Vhisie4">
-<Type>%String</Type>
-<Default>Vhisie4</Default>
-</Parameter>
-
 <Property name="LijnCacheBuilder">
 <Type>WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheBuilder</Type>
 <Private>1</Private>
@@ -40,7 +30,7 @@
 	While WinkelkarLijnenCacheIterator.HasNext() {
 		#dim WinkelkarLijnen As %ArrayOfObjects = WinkelkarLijnenCacheIterator.Next()
 		If $$$Not(..ZijnHerberekend(WinkelkarLijnen)) {
-			Do HerberekendeLijnen.Insert(WinkelkarLijnen.GetAt(..#Vhisie3))
+			Do HerberekendeLijnen.Insert(WinkelkarLijnen.GetAt(##class(WS.Vhisie4.Winkelkar.enu.WinkelkarType).Vhisie3()))
 		}
 	}
 	
@@ -52,7 +42,11 @@
 <FormalSpec>WinkelkarLijnen:%ArrayOfObjects</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (WinkelkarLijnen.GetAt(..#Vhisie3).TotaalPrijs = WinkelkarLijnen.GetAt(..#Vhisie4).TotaalPrijs)
+<Implementation><![CDATA[
+	#dim Vhisie4TotaalPrijs As %Decimal = WinkelkarLijnen.GetAt(##class(WS.Vhisie4.Winkelkar.enu.WinkelkarType).Vhisie4()).TotaalPrijs
+	#dim Vhisie3TotaalPrijs As %Decimal = WinkelkarLijnen.GetAt(##class(WS.Vhisie4.Winkelkar.enu.WinkelkarType).Vhisie3()).TotaalPrijs
+	
+	Quit (Vhisie4TotaalPrijs = Vhisie3TotaalPrijs)
 ]]></Implementation>
 </Method>
 </Class>
Index: WS/Vhisie4/Winkelkar/enu/WinkelkarType.cls.xml
===================================================================
diff -u
--- WS/Vhisie4/Winkelkar/enu/WinkelkarType.cls.xml	(revision 0)
+++ WS/Vhisie4/Winkelkar/enu/WinkelkarType.cls.xml	(revision 39418)
@@ -0,0 +1,26 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WS.Vhisie4.Winkelkar.enu.WinkelkarType">
+<Super>%String</Super>
+
+<Parameter name="VALUELIST">
+<Default>;Vhisie3;Vhisie4</Default>
+</Parameter>
+
+<Method name="Vhisie3">
+<ClassMethod>1</ClassMethod>
+<ReturnType>WS.Vhisie4.Winkelkar.enu.WinkelkarType</ReturnType>
+<Implementation><![CDATA[	Quit "Vhisie3"
+]]></Implementation>
+</Method>
+
+<Method name="Vhisie4">
+<ClassMethod>1</ClassMethod>
+<ReturnType>WS.Vhisie4.Winkelkar.enu.WinkelkarType</ReturnType>
+<Implementation><![CDATA[	Quit "Vhisie4"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheValidator.cls.xml
===================================================================
diff -u -r39415 -r39418
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheValidator.cls.xml	(.../LijnCacheValidator.cls.xml)	(revision 39415)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheValidator.cls.xml	(.../LijnCacheValidator.cls.xml)	(revision 39418)
@@ -3,16 +3,6 @@
 <Class name="WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheValidator">
 <Super>TECH.RegisteredObject</Super>
 
-<Parameter name="Vhisie3">
-<Type>%String</Type>
-<Default>Vhisie3</Default>
-</Parameter>
-
-<Parameter name="Vhisie4">
-<Type>%String</Type>
-<Default>Vhisie4</Default>
-</Parameter>
-
 <Property name="WinkelkarId">
 <Type>%String</Type>
 <Private>1</Private>
@@ -23,17 +13,25 @@
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
 	Set ..WinkelkarId = WinkelkarId
-	
+	#dim Omschrijving As %String = ""
 	#dim ExceptionList As TECH.ExceptionList = ##class(TECH.ExceptionList).%New()
 	
 	#dim WinkelkarLijnenCacheIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(WinkelkarLijnenCache)
 	While WinkelkarLijnenCacheIterator.HasNext() {
 		#dim WinkelkarLijnen As %ArrayOfObjects = WinkelkarLijnenCacheIterator.Next()
-		If $$$Not($IsObject(WinkelkarLijnen.GetAt(..#Vhisie4))) {
-			Set InnerException = ##class(TECH.Exceptions.InvalidInputException).%New("Vhisie3 winkelkarlijn " _WinkelkarLijnen.GetAt(..#Vhisie3).ExterneId _" heeft geen overeenkomstige Vhisie4 winkelkarlijn.")
+		If $$$Not($IsObject(WinkelkarLijnen.GetAt(##class(WS.Vhisie4.Winkelkar.enu.WinkelkarType).Vhisie4()))) {
+			
+			#dim ExterneId As %String = WinkelkarLijnen.GetAt(##class(WS.Vhisie4.Winkelkar.enu.WinkelkarType).Vhisie3()).ExterneId
+			Set Omschrijving = "Vhisie3 winkelkarlijn " _ExterneId _" heeft geen overeenkomstige Vhisie4 winkelkarlijn."
+			Set InnerException = ##class(TECH.Exceptions.InvalidInputException).%New(Omschrijving)
+			
 			Do ExceptionList.Insert(InnerException)
-		} elseIf $$$Not($IsObject(WinkelkarLijnen.GetAt(..#Vhisie3))) {
-			Set InnerException = ##class(TECH.Exceptions.InvalidInputException).%New("Vhisie4 winkelkarlijn " _WinkelkarLijnen.GetAt(..#Vhisie4).ID _" heeft geen overeenkomstige Vhisie3 winkelkarlijn.")
+		} elseIf $$$Not($IsObject(WinkelkarLijnen.GetAt(##class(WS.Vhisie4.Winkelkar.enu.WinkelkarType).Vhisie3()))) {
+			
+			#dim ID As %String = WinkelkarLijnen.GetAt(##class(WS.Vhisie4.Winkelkar.enu.WinkelkarType).Vhisie4()).ID
+			Set Omschrijving = "Vhisie4 winkelkarlijn " _ID _" heeft geen overeenkomstige Vhisie3 winkelkarlijn."
+			Set InnerException = ##class(TECH.Exceptions.InvalidInputException).%New(Omschrijving)
+			
 			Do ExceptionList.Insert(InnerException)
 		}
 	}