Index: vhTest/Utils/APPS/EC/Winkelkar/dto/Winkelkar.cls.xml
===================================================================
diff -u
--- vhTest/Utils/APPS/EC/Winkelkar/dto/Winkelkar.cls.xml	(revision 0)
+++ vhTest/Utils/APPS/EC/Winkelkar/dto/Winkelkar.cls.xml	(revision 40475)
@@ -0,0 +1,34 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Utils.APPS.EC.Winkelkar.dto.Winkelkar">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="WinkelkarMetLBXStandaardLade">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
+<Implementation><![CDATA[
+	Set Winkelkar = ##class(APPS.EC.Winkelkar.dto.Winkelkar).%New()
+	#dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ##class(vhTest.Utils.APPS.EC.Winkelkar.dto.MaatwerkLijn).StandaardLBXMaatwerkLijn()
+	Set GroepLijn = ##class(APPS.EC.Winkelkar.dto.GroepLijn).%New() 
+	Do GroepLijn.Lijnen.Insert(MaatwerkLijn)
+	Do Winkelkar.Lijnen.Insert(GroepLijn)
+	Quit Winkelkar
+]]></Implementation>
+</Method>
+
+<Method name="WinkelkarMetLBXStandaardLadeMetNietMeeleveren">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
+<Implementation><![CDATA[
+	Set Winkelkar = ##class(APPS.EC.Winkelkar.dto.Winkelkar).%New()
+	#dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ##class(vhTest.Utils.APPS.EC.Winkelkar.dto.MaatwerkLijn).StandaardLBXMaatwerkLijnMetNietMeeleveren()
+	Set GroepLijn = ##class(APPS.EC.Winkelkar.dto.GroepLijn).%New() 
+	Do GroepLijn.Lijnen.Insert(MaatwerkLijn)
+	Do Winkelkar.Lijnen.Insert(GroepLijn)
+	Quit Winkelkar
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Utils/APPS/EC/Winkelkar/dto/MaatwerkLijn.cls.xml
===================================================================
diff -u
--- vhTest/Utils/APPS/EC/Winkelkar/dto/MaatwerkLijn.cls.xml	(revision 0)
+++ vhTest/Utils/APPS/EC/Winkelkar/dto/MaatwerkLijn.cls.xml	(revision 40475)
@@ -0,0 +1,28 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Utils.APPS.EC.Winkelkar.dto.MaatwerkLijn">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="StandaardLBXMaatwerkLijn">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.EC.Winkelkar.dto.MaatwerkLijn</ReturnType>
+<Implementation><![CDATA[
+	Set LBXMaatwerkLijn = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijn).%New()
+	Set LBXMaatwerkLijn.IngegevenKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken).StandaardLade()
+	Quit LBXMaatwerkLijn
+]]></Implementation>
+</Method>
+
+<Method name="StandaardLBXMaatwerkLijnMetNietMeeleveren">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.EC.Winkelkar.dto.MaatwerkLijn</ReturnType>
+<Implementation><![CDATA[
+	Set LBXMaatwerkLijn = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijn).%New()
+	Set LBXMaatwerkLijn.IngegevenKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken).StandaardLadeMetNietMeeleveren()
+	Quit LBXMaatwerkLijn
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/EC/Winkelkar/impl/ExterneWinkelkarService/KenmerkenAanpasser/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/EC/Winkelkar/impl/ExterneWinkelkarService/KenmerkenAanpasser/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/ExterneWinkelkarService/KenmerkenAanpasser/Test.cls.xml	(revision 40475)
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.EC.Winkelkar.impl.ExterneWinkelkarService.KenmerkenAanpasser.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Property name="LBXEnum">
+<Type>DOM.PM.Maatwerk.LBX.impl.BaseEnums</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeAllTests">
+<Implementation><![CDATA[
+	Do ##super()
+	Set ..LBXEnum = ##class(DOM.PM.Maatwerk.LBX.impl.BaseEnums).%New()
+]]></Implementation>
+</Method>
+
+<Method name="Test: LBX AfdekkapRugWandHouder in nietmeeleveren wordt niet getoond op webshop">
+<Implementation><![CDATA[
+	#dim WinkelkarMetLBXStandaardLade As APPS.EC.Winkelkar.dto.Winkelkar = ##class(vhTest.Utils.APPS.EC.Winkelkar.dto.Winkelkar).WinkelkarMetLBXStandaardLadeMetNietMeeleveren()
+	#dim LBXKenmerken As APPS.PM.Maatwerk.dto.LBXKenmerken = WinkelkarMetLBXStandaardLade.Lijnen.GetAt(1).Lijnen.GetAt(1).IngegevenKenmerken
+	
+	Do $$$AssertTrue(LBXKenmerken.NietMeeleveren.Find(..LBXEnum.Rol.AfdekkapRugWandHouder)) 	
+	
+	Set Aanpasser = ##class(APPS.EC.Winkelkar.impl.ExterneWinkelkarService.KenmerkenAanpasser).%New()
+	Do Aanpasser.PasAanWinkelkar(WinkelkarMetLBXStandaardLade)
+	
+	Do $$$AssertFalse(LBXKenmerken.NietMeeleveren.Find(..LBXEnum.Rol.AfdekkapRugWandHouder))
+	
+	Do $$$AssertEqualsList(LBXKenmerken.NietMeeleveren, ..GeefStandaardLadeZonderAfdekkapRugWandHouder().NietMeeleveren)
+]]></Implementation>
+</Method>
+
+<Method name="GeefStandaardLadeZonderAfdekkapRugWandHouder">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim ZonderAfdekkapRugWandHouder As APPS.PM.Maatwerk.dto.LBXKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken).StandaardLadeMetNietMeeleveren()
+	Do ZonderAfdekkapRugWandHouder.NietMeeleveren.Remove(..LBXEnum.Rol.AfdekkapRugWandHouder)
+	
+	Quit ZonderAfdekkapRugWandHouder
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/EC/Winkelkar/impl/ExterneWinkelkarService/KenmerkenAanpasser/LBX/Test.cls.xml
===================================================================
diff -u -r40471 -r40475
--- vhUnitTest/APPS/EC/Winkelkar/impl/ExterneWinkelkarService/KenmerkenAanpasser/LBX/Test.cls.xml	(.../Test.cls.xml)	(revision 40471)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/ExterneWinkelkarService/KenmerkenAanpasser/LBX/Test.cls.xml	(.../Test.cls.xml)	(revision 40475)
@@ -19,6 +19,7 @@
 </Method>
 
 <Method name="GeefStandaardLadeZonderAfdekkapRugWandHouder">
+<Private>1</Private>
 <Implementation><![CDATA[
 	#dim ZonderAfdekkapRugWandHouder As APPS.PM.Maatwerk.dto.LBXKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken).StandaardLadeMetNietMeeleveren()
 	Set LBXEnum = ##class(DOM.PM.Maatwerk.LBX.impl.BaseEnums).%New()