Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk.cls.xml
===================================================================
diff -u -r39779 -r40391
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk.cls.xml	(.../HerberekenMaatwerk.cls.xml)	(revision 39779)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk.cls.xml	(.../HerberekenMaatwerk.cls.xml)	(revision 40391)
@@ -76,11 +76,11 @@
 	set ..InterneWinkelkarId = ..WinkelkarRepository.GeefWinkelkarIDViaID(HerberekenMaatwerkRequest.Winkelkar.Id)
 	set ..InterneOfferteId = ..WinkelkarRepository.GeefOfferteIDViaID(HerberekenMaatwerkRequest.Winkelkar.Id)
 	
-	#dim NietgepersisteerdeMaatwerklijnen As APPS.EC.Winkelkar.dto.MaatwerkLijnList = ..ValideerLijnenAlvorensTeHerberekenen(HerberekenMaatwerkRequest)
+	#dim WinkelkarLijnCache As %ArrayOfObjects = ..ValideerLijnenAlvorensTeHerberekenen(HerberekenMaatwerkRequest)
 	
 	#dim Offerte As APPS.EC.dto.Offerte = ..ExterneVerkoopService.GeefOfferteEnHerberekenIndienNodig(..InterneOfferteId)
 	
-	Quit ..GenereerResponse(Offerte,..Matcher.GeefVerschillen(NietgepersisteerdeMaatwerklijnen, ..WinkelkarUtils.GeefMaatwerkLijnen(Offerte.Winkelkar)))
+	Quit ..GenereerResponse(Offerte,..Matcher.GeefVerschillen(WinkelkarLijnCache))
 ]]></Implementation>
 </Method>
 
@@ -117,7 +117,7 @@
 <Method name="ValideerLijnenAlvorensTeHerberekenen">
 <FormalSpec>HerberekenMaatwerkRequest:WS.Vhisie4.Winkelkar.HerberekenMaatwerkRequest</FormalSpec>
 <Private>1</Private>
-<ReturnType>APPS.EC.Winkelkar.dto.MaatwerkLijnList</ReturnType>
+<ReturnType>%ArrayOfObjects</ReturnType>
 <Implementation><![CDATA[
 	#dim GepersisteerdeMaatwerklijnen As APPS.EC.Winkelkar.dto.MaatwerkLijnList = ..GeefGepersisteerdeMaatwerkLijnen(HerberekenMaatwerkRequest)
 	#dim NietgepersisteerdeMaatwerklijnen As APPS.EC.Winkelkar.dto.MaatwerkLijnList = ..GeefNietGepersisteerdeMaatwerkLijnen(HerberekenMaatwerkRequest)
@@ -126,7 +126,7 @@
 	
 	Do ..Validator.ValidateCache(HerberekenMaatwerkRequest.Winkelkar.Id, WinkelkarLijnCache)
 	
-	Quit NietgepersisteerdeMaatwerklijnen
+	Quit WinkelkarLijnCache
 ]]></Implementation>
 </Method>
 
Index: vhTest/Fake/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml
===================================================================
diff -u -r39597 -r40391
--- vhTest/Fake/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml	(.../LijnCacheMatcher.cls.xml)	(revision 39597)
+++ vhTest/Fake/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml	(.../LijnCacheMatcher.cls.xml)	(revision 40391)
@@ -7,15 +7,8 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher</Super>
 
-<Method name="GeefHerberekendeLijnen">
-<FormalSpec>MaatwerkLijnLijst1:APPS.EC.Winkelkar.dto.MaatwerkLijnList,MaatwerkLijnLijst2:APPS.EC.Winkelkar.dto.MaatwerkLijnList</FormalSpec>
-<ReturnType>APPS.EC.Winkelkar.dto.MaatwerkLijnList</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
-</Method>
-
 <Method name="GeefVerschillen">
-<FormalSpec>OrigineleLijnen:APPS.EC.Winkelkar.dto.MaatwerkLijnList,HerberekendeLijnen:APPS.EC.Winkelkar.dto.MaatwerkLijnList</FormalSpec>
+<FormalSpec>WinkelkarLijnCache:%ArrayOfObjects</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.MaatwerkLijnList</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
Index: vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml
===================================================================
diff -u -r39597 -r40391
--- vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml	(.../LijnCacheMatcher.cls.xml)	(revision 39597)
+++ vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml	(.../LijnCacheMatcher.cls.xml)	(revision 40391)
@@ -10,9 +10,9 @@
 <Inheritance>right</Inheritance>
 
 <Method name="GeefVerschillen">
-<FormalSpec>OrigineleLijnen:APPS.EC.Winkelkar.dto.MaatwerkLijnList,HerberekendeLijnen:APPS.EC.Winkelkar.dto.MaatwerkLijnList</FormalSpec>
+<FormalSpec>WinkelkarLijnCache:%ArrayOfObjects</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.MaatwerkLijnList</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVerschillen",OrigineleLijnen,HerberekendeLijnen)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVerschillen",WinkelkarLijnCache)
 ]]></Implementation>
 </Method>
 </Class>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml
===================================================================
diff -u -r39597 -r40391
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml	(.../LijnCacheMatcher.cls.xml)	(revision 39597)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher.cls.xml	(.../LijnCacheMatcher.cls.xml)	(revision 40391)
@@ -4,19 +4,28 @@
 <Super>TECH.Mockable</Super>
 
 <Method name="GeefVerschillen">
-<FormalSpec>OrigineleLijnen:APPS.EC.Winkelkar.dto.MaatwerkLijnList,HerberekendeLijnen:APPS.EC.Winkelkar.dto.MaatwerkLijnList</FormalSpec>
+<FormalSpec>WinkelkarLijnCache:%ArrayOfObjects</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.MaatwerkLijnList</ReturnType>
 <Implementation><![CDATA[
 	Set Verschillen = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijnList).%New()
-	#dim LijnenTeller As %Integer
 	
-	For LijnenTeller=1:1:OrigineleLijnen.Count() {
-		Do:$$$Not(OrigineleLijnen.GetAt(LijnenTeller).EenheidPrijs = HerberekendeLijnen.GetAt(LijnenTeller).EenheidPrijs) Verschillen.Insert(HerberekendeLijnen.GetAt(LijnenTeller))
-	}
+	#dim WinkelkarLijnCacheIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(WinkelkarLijnCache)
+	While WinkelkarLijnCacheIterator.HasNext() {
+		#dim WinkelkarLijnen As %ArrayOfObjects = WinkelkarLijnCacheIterator.Next()
+		Do:..ZijnVerschillend(WinkelkarLijnen) Verschillen.Insert(WinkelkarLijnen.GetAt("OnDisk"))
+	}	
 	
 	Quit Verschillen
 ]]></Implementation>
 </Method>
+
+<Method name="ZijnVerschillend">
+<FormalSpec>WinkelkarLijnen:%ArrayOfObjects</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $$$Not(WinkelkarLijnen.GetAt("InMem").EenheidPrijs = WinkelkarLijnen.GetAt("OnDisk").EenheidPrijs)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher/Test.cls.xml
===================================================================
diff -u -r39597 -r40391
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher/Test.cls.xml	(.../Test.cls.xml)	(revision 39597)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/LijnCacheMatcher/Test.cls.xml	(.../Test.cls.xml)	(revision 40391)
@@ -3,103 +3,115 @@
 <Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test: beide lijsten zijn leeg">
+<Method name="Test: LijnCacheMatcher heeft geen verschillen gevonden en geeft geen herberekende lijnen weer">
 <Implementation><![CDATA[
+	#dim LijnCacheMatcher As WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher
 	Set LijnCacheMatcher = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher).%New()
 	
-	Set MaatwerkLijnLijst1 = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijnList).%New()
-	Set MaatwerkLijnLijst2 = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijnList).%New()
+	#dim Vhisie4Winkelkar As WS.Vhisie4.Winkelkar.dto.Winkelkar = ..GeefVhisie4Winkelkar(0,2)
+	#dim Vhisie3Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ..GeefVhisie3Winkelkar(0,2)
 	
-	#dim HerberekendeLijnen As APPS.EC.Winkelkar.dto.MaatwerkLijnList = LijnCacheMatcher.GeefVerschillen(MaatwerkLijnLijst1, MaatwerkLijnLijst2)
+	#dim WinkelkarLijnCache As %ArrayOfObjects = ..MaakWinkelkarLijnCache(Vhisie4Winkelkar, Vhisie3Winkelkar)
 	
+	#dim HerberekendeLijnen As APPS.EC.Winkelkar.dto.MaatwerkLijnList = LijnCacheMatcher.GeefVerschillen(WinkelkarLijnCache)
+	
 	Do $$$AssertEquals(HerberekendeLijnen.Count(), 0)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Geen prijsverschillen">
+<Method name="Test: LijnCacheMatcher één verschil gevonden en geeft herberekende lijn 1 weer van vhisie3">
 <Implementation><![CDATA[
+	#dim LijnCacheMatcher As WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher
 	Set LijnCacheMatcher = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher).%New()
 	
-	Set MaatwerkLijnLijst1 = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijnList).%New()
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
+	#dim Vhisie4Winkelkar As WS.Vhisie4.Winkelkar.dto.Winkelkar = ..GeefVhisie4Winkelkar(0,2)
 	
-	Set MaatwerkLijnLijst2 = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijnList).%New()
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
+	#dim Vhisie3Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ..GeefVhisie3Winkelkar(0,2)
+	Set Vhisie3Winkelkar.Lijnen.GetAt(1).EenheidPrijs = 19
 	
-	#dim HerberekendeLijnen As APPS.EC.Winkelkar.dto.MaatwerkLijnList = LijnCacheMatcher.GeefVerschillen(MaatwerkLijnLijst1, MaatwerkLijnLijst2)
+	#dim WinkelkarLijnCache As %ArrayOfObjects = ..MaakWinkelkarLijnCache(Vhisie4Winkelkar, Vhisie3Winkelkar)
+
+	#dim HerberekendeLijnen As APPS.EC.Winkelkar.dto.MaatwerkLijnList = LijnCacheMatcher.GeefVerschillen(WinkelkarLijnCache)
 	
-	Do $$$AssertEquals(HerberekendeLijnen.Count(), 0)
+	If $$$AssertEquals(HerberekendeLijnen.Count(), 1) {
+		Do $$$AssertEquals(HerberekendeLijnen.GetAt(1).EenheidPrijs, 19)
+	}
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Prijsverschil in eerste en laatste lijn">
+<Method name="Test: LijnCacheMatcher twee verschillen gevonden en geeft herberekende lijn 1 en 2 weer van vhisie3">
 <Implementation><![CDATA[
+	#dim LijnCacheMatcher As WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher
 	Set LijnCacheMatcher = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher).%New()
 	
-	Set MaatwerkLijnLijst1 = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijnList).%New()
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
+	#dim Vhisie4Winkelkar As WS.Vhisie4.Winkelkar.dto.Winkelkar = ..GeefVhisie4Winkelkar(0,2)
 	
-	Set MaatwerkLijnLijst2 = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijnList).%New()
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(20))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(30))
+	#dim Vhisie3Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ..GeefVhisie3Winkelkar(0,2)
+	Set Vhisie3Winkelkar.Lijnen.GetAt(1).EenheidPrijs = 19
+	Set Vhisie3Winkelkar.Lijnen.GetAt(2).EenheidPrijs = 21
 	
-	#dim HerberekendeLijnen As APPS.EC.Winkelkar.dto.MaatwerkLijnList = LijnCacheMatcher.GeefVerschillen(MaatwerkLijnLijst1, MaatwerkLijnLijst2)
+	#dim WinkelkarLijnCache As %ArrayOfObjects = ..MaakWinkelkarLijnCache(Vhisie4Winkelkar, Vhisie3Winkelkar)
+
+	#dim HerberekendeLijnen As APPS.EC.Winkelkar.dto.MaatwerkLijnList = LijnCacheMatcher.GeefVerschillen(WinkelkarLijnCache)
 	
 	If $$$AssertEquals(HerberekendeLijnen.Count(), 2) {
-		Do $$$AssertEquals(HerberekendeLijnen.GetAt(1).EenheidPrijs,20)
-		Do $$$AssertEquals(HerberekendeLijnen.GetAt(2).EenheidPrijs,30)
+		Do $$$AssertEquals(HerberekendeLijnen.GetAt(1).EenheidPrijs, 19)
+		Do $$$AssertEquals(HerberekendeLijnen.GetAt(2).EenheidPrijs, 21)
 	}
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Prijsverschil ergens halverwege">
+<Method name="MaakWinkelkarLijnCache">
+<FormalSpec>Vhisie4Winkelkar:WS.Vhisie4.Winkelkar.dto.Winkelkar,Vhisie3Winkelkar:APPS.EC.Winkelkar.dto.Winkelkar</FormalSpec>
+<Private>1</Private>
+<ReturnType>%ArrayOfObjects</ReturnType>
 <Implementation><![CDATA[
-	Set LijnCacheMatcher = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheMatcher).%New()
-	
-	Set MaatwerkLijnLijst1 = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijnList).%New()
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst1.Insert(..MaakMaatwerkLijn(10))
-	
-	Set MaatwerkLijnLijst2 = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijnList).%New()
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(42))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	Do MaatwerkLijnLijst2.Insert(..MaakMaatwerkLijn(10))
-	
-	#dim HerberekendeLijnen As APPS.EC.Winkelkar.dto.MaatwerkLijnList = LijnCacheMatcher.GeefVerschillen(MaatwerkLijnLijst1, MaatwerkLijnLijst2)
-	
-	If $$$AssertEquals(HerberekendeLijnen.Count(), 1) {
-		Do $$$AssertEquals(HerberekendeLijnen.GetAt(1).EenheidPrijs,42)
+	#dim WinkelkarLijnCache As %ArrayOfObjects = ##class(%ArrayOfObjects).%New()
+	Do WinkelkarLijnCache.SetAt(##class(%ArrayOfObjects).%New(),1)
+	Do WinkelkarLijnCache.GetAt(1).SetAt(Vhisie4Winkelkar.Lijnen.GetAt(1), "InMem")
+	Do WinkelkarLijnCache.GetAt(1).SetAt(Vhisie3Winkelkar.Lijnen.GetAt(1), "OnDisk")
+	Do WinkelkarLijnCache.SetAt(##class(%ArrayOfObjects).%New(),2)
+	Do WinkelkarLijnCache.GetAt(2).SetAt(Vhisie4Winkelkar.Lijnen.GetAt(2), "InMem")
+	Do WinkelkarLijnCache.GetAt(2).SetAt(Vhisie3Winkelkar.Lijnen.GetAt(2), "OnDisk")
+	Quit WinkelkarLijnCache
+]]></Implementation>
+</Method>
+
+<Method name="GeefVhisie4Winkelkar">
+<FormalSpec>Offset:%Integer=0,AantalLijnen:%Integer,WinkelkarId:%String="DummyID"</FormalSpec>
+<Private>1</Private>
+<ReturnType>WS.Vhisie4.Winkelkar.dto.Winkelkar</ReturnType>
+<Implementation><![CDATA[
+	#dim Winkelkar As WS.Vhisie4.Winkelkar.dto.Winkelkar = ##class(WS.Vhisie4.Winkelkar.dto.Winkelkar).%New()
+	Set Winkelkar.Id = WinkelkarId
+
+	#dim LijnNummer As %Integer = 0
+	for LijnNummer=1:1:AantalLijnen {
+		#dim MaatwerkLijn As WS.Vhisie4.Winkelkar.dto.MaatwerkLijn = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+		Set MaatwerkLijn.Id = LijnNummer+Offset
+		Set MaatwerkLijn.TotaalPrijs = 20
+		Do Winkelkar.Lijnen.Insert(MaatwerkLijn)
 	}
+	Quit Winkelkar
 ]]></Implementation>
 </Method>
 
-<Method name="MaakMaatwerkLijn">
-<FormalSpec>EenheidsPrijs:%Numeric</FormalSpec>
+<Method name="GeefVhisie3Winkelkar">
+<FormalSpec>Offset:%Integer=0,AantalLijnen:%Integer,WinkelkarId:%String="DummyID"</FormalSpec>
 <Private>1</Private>
+<ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
 <Implementation><![CDATA[
-	Set MaatwerkLijn = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijn).%New()
-	Set MaatwerkLijn.EenheidPrijs = EenheidsPrijs
-	Quit MaatwerkLijn
+	#dim Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ##class(APPS.EC.Winkelkar.dto.Winkelkar).%New()
+	Set Winkelkar.ExterneId = WinkelkarId
+	
+	#dim LijnNummer As %Integer = 0
+	for LijnNummer=1:1:AantalLijnen {
+		#dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijn).%New()
+		Set MaatwerkLijn.ExterneId = LijnNummer+Offset
+		Set MaatwerkLijn.TotaalPrijs = 20
+		Do Winkelkar.Lijnen.Insert(MaatwerkLijn)
+	}
+	Quit Winkelkar
 ]]></Implementation>
 </Method>
 </Class>