Index: vhUnitTest/End2End/TAOR/GebruikteHalffabItemsVoorPrijsberekening/Test.cls.xml
===================================================================
diff -u -r57426 -r69446
--- vhUnitTest/End2End/TAOR/GebruikteHalffabItemsVoorPrijsberekening/Test.cls.xml	(.../Test.cls.xml)	(revision 57426)
+++ vhUnitTest/End2End/TAOR/GebruikteHalffabItemsVoorPrijsberekening/Test.cls.xml	(.../Test.cls.xml)	(revision 69446)
@@ -22,11 +22,10 @@
 ]]></Implementation>
 </Method>
 
-<Method name="aTest: Standaardlade">
+<Method name="Test: Standaardlade">
 <Implementation><![CDATA[
 	#Dim GebruikteHalffabItems As %ListOfDataTypes = ..StandaardLadeItems()
 	do GebruikteHalffabItems.Insert("SetSchroeven")
-	do GebruikteHalffabItems.Insert("KoppelingSchroef")
 	do ..AssertGebruikteHalffabItems(##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade(), GebruikteHalffabItems, "TA'OR BOX")
 ]]></Implementation>
 </Method>
@@ -39,25 +38,23 @@
 ]]></Implementation>
 </Method>
 
-<Method name="aTest: geen geleider, koppeling, koppelingschroef, frontbevestiging voor Galimberti en aanverwanten">
+<Method name="Test: geen geleider, koppeling, frontbevestiging voor Galimberti en aanverwanten">
 <Implementation><![CDATA[
 	#dim KlantID As DOM.VKP.enu.Klant = ##class(DOM.VKP.enu.Klant).Galimberti()
 
 	#dim GebruikteHalffabItems As %ListOfDataTypes = ..StandaardLadeItems()
 	Do GebruikteHalffabItems.Insert("SetSchroeven")
-	Do GebruikteHalffabItems.Insert("KoppelingSchroef")
 	
 	Do GebruikteHalffabItems.RemoveAt(GebruikteHalffabItems.Find("Glijder"))
 	Do GebruikteHalffabItems.RemoveAt(GebruikteHalffabItems.Find("FrontBevestiging"))
 	Do GebruikteHalffabItems.RemoveAt(GebruikteHalffabItems.Find("Koppeling.Links"))
 	Do GebruikteHalffabItems.RemoveAt(GebruikteHalffabItems.Find("Koppeling.Rechts"))
- 	Do GebruikteHalffabItems.RemoveAt(GebruikteHalffabItems.Find("KoppelingSchroef"))
 	
 	Do ..AssertGebruikteHalffabItems(##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade(), GebruikteHalffabItems, "TA'OR BOX",KlantID)
 ]]></Implementation>
 </Method>
 
-<Method name="aTest: geen geleider, frontbevestiging voor Galimberti en aanverwanten binnenlade">
+<Method name="Test: geen geleider, frontbevestiging voor Galimberti en aanverwanten binnenlade">
 <Implementation><![CDATA[
 	#dim KlantID As DOM.VKP.enu.Klant = ##class(DOM.VKP.enu.Klant).Galimberti()
 
@@ -71,33 +68,30 @@
 ]]></Implementation>
 </Method>
 
-<Method name="aTest: geen geleider, koppeling, koppelingschroef, frontbevestiging voor Daro met projectsetting enabled">
+<Method name="Test: geen geleider, koppeling, koppelingschroef, frontbevestiging voor Daro met projectsetting enabled">
 <Implementation><![CDATA[
 	Do ##class(TECH.Config.ConfigMgr).Instance().SetBoolean("DOM.common.ProjectSettingsAPI_DaroExcludeFromDeliveryEnabled",$$$True)
 	#dim KlantID As DOM.VKP.enu.Klant = ##class(DOM.VKP.enu.Klant).DaroFactors()
 
 	#dim GebruikteHalffabItems As %ListOfDataTypes = ..StandaardLadeItems()
 	Do GebruikteHalffabItems.Insert("SetSchroeven")
-	Do GebruikteHalffabItems.Insert("KoppelingSchroef")
 	
 	Do GebruikteHalffabItems.RemoveAt(GebruikteHalffabItems.Find("Glijder"))
 	Do GebruikteHalffabItems.RemoveAt(GebruikteHalffabItems.Find("FrontBevestiging"))
 	Do GebruikteHalffabItems.RemoveAt(GebruikteHalffabItems.Find("Koppeling.Links"))
 	Do GebruikteHalffabItems.RemoveAt(GebruikteHalffabItems.Find("Koppeling.Rechts"))
- 	Do GebruikteHalffabItems.RemoveAt(GebruikteHalffabItems.Find("KoppelingSchroef"))
 	
 	Do ..AssertGebruikteHalffabItems(##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade(), GebruikteHalffabItems, "TA'OR BOX",KlantID)
 ]]></Implementation>
 </Method>
 
-<Method name="aTest: geen geleider, koppeling koppelingschroef frontbevestiging voor Daro met projectsetting disabled">
+<Method name="Test: geen geleider, koppeling koppelingschroef frontbevestiging voor Daro met projectsetting disabled">
 <Implementation><![CDATA[
 	Do ##class(TECH.Config.ConfigMgr).Instance().SetBoolean("DOM.common.ProjectSettingsAPI_DaroExcludeFromDeliveryEnabled",$$$False)
 	#dim KlantID As DOM.VKP.enu.Klant = ##class(DOM.VKP.enu.Klant).DaroFactors()
 
 	#dim GebruikteHalffabItems As %ListOfDataTypes = ..StandaardLadeItems()
 	Do GebruikteHalffabItems.Insert("SetSchroeven")
-	Do GebruikteHalffabItems.Insert("KoppelingSchroef")
 		
 	Do ..AssertGebruikteHalffabItems(##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade(), GebruikteHalffabItems, "TA'OR BOX",KlantID)
 ]]></Implementation>
@@ -128,10 +122,13 @@
 	for Kant = "Links","Rechts" {
 		do GebruikteHalffabItems.Insert("Zijkant"_Kant_".KantenBand")
 		do GebruikteHalffabItems.Insert("Zijkant"_Kant_".KantenBand")
-		do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantBestukkingVooraan.Haakstuk_2")
-	    do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantBestukkingVooraan.Slotstuk_3")
+		do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantBestukkingVooraan.Haakstuk_7")
 	    do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantBestukkingVooraan.Slotstuk_4")
+	    do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantBestukkingVooraan.Slotstuk_5")
 	    do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantBestukkingVooraan.Veer_1")
+	    do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantBestukkingVooraan._2")
+	    do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantBestukkingVooraan._3")
+	    do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantBestukkingVooraan._6")
 	    do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantBevestigingVeer")
 	    do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantPlaat")
 	    do GebruikteHalffabItems.Insert("Zijkant"_Kant_".ZijkantPlaat")