Index: WSimpl/Vhisie4/Winkelkar/WinkelkarUtils.cls.xml
===================================================================
diff -u -r39410 -r57537
--- WSimpl/Vhisie4/Winkelkar/WinkelkarUtils.cls.xml	(.../WinkelkarUtils.cls.xml)	(revision 39410)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarUtils.cls.xml	(.../WinkelkarUtils.cls.xml)	(revision 57537)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="WSimpl.Vhisie4.Winkelkar.WinkelkarUtils">
-<Super>TECH.RegisteredObject</Super>
+<Super>TECH.Mockable</Super>
 
 <Method name="GeefMaatwerkLijnen">
 <FormalSpec>Winkelkar:WS.Vhisie4.Winkelkar.dto.Winkelkar</FormalSpec>
@@ -38,6 +38,26 @@
 	Quit MaatwerkLijnen
 ]]></Implementation>
 </Method>
+
+<Method name="VerwijderOngeldigeMaatwerkLijnen">
+<FormalSpec>Winkelkar:WS.Vhisie4.Winkelkar.dto.Winkelkar</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[
+	Set ReturnList = ##class(%ListOfObjects).%New()
+	Set LijnIterator = ##class(TECH.ListIterator).%New(Winkelkar.Lijnen)
+	While (LijnIterator.HasNext()){
+		#dim Lijn as WS.Vhisie4.Winkelkar.dto.WinkelkarLijn = LijnIterator.Next()
+		If Lijn.%Extends("WS.Vhisie4.Winkelkar.dto.MaatwerkLijn") {
+			if $$$Not((Lijn.Ongeldig = $$$true)){
+				Do ReturnList.Insert(Lijn)
+			}
+		} else {
+			Do ReturnList.Insert(Lijn)
+		}
+	}
+	Quit ReturnList
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarUtils.cls.xml
===================================================================
diff -u
--- vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarUtils.cls.xml	(revision 0)
+++ vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarUtils.cls.xml	(revision 57537)
@@ -0,0 +1,34 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarUtils">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>WSimpl.Vhisie4.Winkelkar.WinkelkarUtils,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="GeefMaatwerkLijnen">
+<FormalSpec>Winkelkar:WS.Vhisie4.Winkelkar.dto.Winkelkar</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefMaatwerkLijnen",Winkelkar)
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductLijnen">
+<FormalSpec>Winkelkar:WS.Vhisie4.Winkelkar.dto.Winkelkar</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefProductLijnen",Winkelkar)
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderOngeldigeMaatwerkLijnen">
+<FormalSpec>Winkelkar:WS.Vhisie4.Winkelkar.dto.Winkelkar</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("VerwijderOngeldigeMaatwerkLijnen",Winkelkar)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/WSimpl/Vhisie4/Winkelkar/WinkelkarUtils.cls.xml
===================================================================
diff -u
--- vhTest/Fake/WSimpl/Vhisie4/Winkelkar/WinkelkarUtils.cls.xml	(revision 0)
+++ vhTest/Fake/WSimpl/Vhisie4/Winkelkar/WinkelkarUtils.cls.xml	(revision 57537)
@@ -0,0 +1,33 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.WSimpl.Vhisie4.Winkelkar.WinkelkarUtils">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>WSimpl.Vhisie4.Winkelkar.WinkelkarUtils</Super>
+
+<Method name="GeefMaatwerkLijnen">
+<FormalSpec>Winkelkar:WS.Vhisie4.Winkelkar.dto.Winkelkar</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductLijnen">
+<FormalSpec>Winkelkar:WS.Vhisie4.Winkelkar.dto.Winkelkar</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderOngeldigeMaatwerkLijnen">
+<FormalSpec>Winkelkar:WS.Vhisie4.Winkelkar.dto.Winkelkar</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarUtils/VerwijderOngeldigeLijnen/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarUtils/VerwijderOngeldigeLijnen/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarUtils/VerwijderOngeldigeLijnen/Test.cls.xml	(revision 57537)
@@ -0,0 +1,100 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.WinkelkarUtils.VerwijderOngeldigeLijnen.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: winkelkar zonder productlijnen geeft geen productlijnen weer">
+<Implementation><![CDATA[
+	Set Winkelkar = ##class(WS.Vhisie4.Winkelkar.dto.Winkelkar).%New()
+	Set WinkelkarUtils = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarUtils).%New()
+	#dim Lijnen As %ListOfObjects = WinkelkarUtils.VerwijderOngeldigeMaatwerkLijnen(Winkelkar)
+	
+	Do $$$AssertEquals(Lijnen.Count(),0)
+]]></Implementation>
+</Method>
+
+<Method name="Test: winkelkar met 2 productlijnen geeft 2 productlijnen weer">
+<Implementation><![CDATA[
+	Set Winkelkar = ##class(WS.Vhisie4.Winkelkar.dto.Winkelkar).%New()
+	Set ProductLijn1 = ##class(WS.Vhisie4.Winkelkar.dto.ProductLijn).%New()
+	Set ProductLijn2 = ##class(WS.Vhisie4.Winkelkar.dto.ProductLijn).%New()
+	Do Winkelkar.Lijnen.Insert(ProductLijn1)
+	Do Winkelkar.Lijnen.Insert(ProductLijn2)
+	Set WinkelkarUtils = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarUtils).%New()
+	#dim Lijnen As %ListOfObjects = WinkelkarUtils.VerwijderOngeldigeMaatwerkLijnen(Winkelkar)
+	
+	Do $$$AssertEquals(Lijnen.Count(),2)
+]]></Implementation>
+</Method>
+
+<Method name="Test: winkelkar met 2 geldige maatwerklijnen geeft 2 lijnen terug">
+<Implementation><![CDATA[
+	Set Winkelkar = ##class(WS.Vhisie4.Winkelkar.dto.Winkelkar).%New()
+	Set MaatwerkLijn1 = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+	Set MaatwerkLijn2 = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+	Do Winkelkar.Lijnen.Insert(MaatwerkLijn1)
+	Do Winkelkar.Lijnen.Insert(MaatwerkLijn2)
+
+	Set WinkelkarUtils = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarUtils).%New()
+	#dim Lijnen As %ListOfObjects = WinkelkarUtils.VerwijderOngeldigeMaatwerkLijnen(Winkelkar)
+	
+	Do $$$AssertEquals(Lijnen.Count(),2)
+]]></Implementation>
+</Method>
+
+<Method name="Test: winkelkar met 2 maatwerklijnen 1 ongeldig geeft 1 lijn terug">
+<Implementation><![CDATA[
+	Set Winkelkar = ##class(WS.Vhisie4.Winkelkar.dto.Winkelkar).%New()
+	Set MaatwerkLijn1 = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+	Set MaatwerkLijn2 = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+	Set MaatwerkLijn1.Ongeldig = $$$true
+	Do Winkelkar.Lijnen.Insert(MaatwerkLijn1)
+	Do Winkelkar.Lijnen.Insert(MaatwerkLijn2)
+
+	Set WinkelkarUtils = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarUtils).%New()
+	#dim Lijnen As %ListOfObjects = WinkelkarUtils.VerwijderOngeldigeMaatwerkLijnen(Winkelkar)
+	
+	Do $$$AssertEquals(Lijnen.Count(),1)
+]]></Implementation>
+</Method>
+
+<Method name="Test: winkelkar met 2 ongeldige maatwerklijnen geeft 0 lijnen terug">
+<Implementation><![CDATA[
+	Set Winkelkar = ##class(WS.Vhisie4.Winkelkar.dto.Winkelkar).%New()
+	Set MaatwerkLijn1 = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+	Set MaatwerkLijn2 = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+	Set MaatwerkLijn1.Ongeldig = $$$true
+	Set MaatwerkLijn2.Ongeldig = $$$true
+	Do Winkelkar.Lijnen.Insert(MaatwerkLijn1)
+	Do Winkelkar.Lijnen.Insert(MaatwerkLijn2)
+
+	Set WinkelkarUtils = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarUtils).%New()
+	#dim Lijnen As %ListOfObjects = WinkelkarUtils.VerwijderOngeldigeMaatwerkLijnen(Winkelkar)
+	
+	Do $$$AssertEquals(Lijnen.Count(),0)
+]]></Implementation>
+</Method>
+
+<Method name="Test: winkelkar met 2 maatwerklijnen 1 ongeldig en 2 productlijnen geeft 3 lijnen weer">
+<Implementation><![CDATA[
+	Set Winkelkar = ##class(WS.Vhisie4.Winkelkar.dto.Winkelkar).%New()
+	Set MaatwerkLijn1 = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+	Set MaatwerkLijn1.Ongeldig= $$$true
+	Set MaatwerkLijn2 = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+	Set ProductLijn1 = ##class(WS.Vhisie4.Winkelkar.dto.ProductLijn).%New()
+	Set ProductLijn2 = ##class(WS.Vhisie4.Winkelkar.dto.ProductLijn).%New()
+	Do Winkelkar.Lijnen.Insert(MaatwerkLijn1)
+	Do Winkelkar.Lijnen.Insert(MaatwerkLijn2)
+	Do Winkelkar.Lijnen.Insert(ProductLijn1)
+	Do Winkelkar.Lijnen.Insert(ProductLijn2)
+
+	Set WinkelkarUtils = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarUtils).%New()
+	#dim Lijnen As %ListOfObjects = WinkelkarUtils.VerwijderOngeldigeMaatwerkLijnen(Winkelkar)
+	
+	Do $$$AssertEquals(Lijnen.Count(),3)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>