Index: vhUnitTest/End2End/GebruikteHalffabItemsVoorPrijsberekening/TestBase.cls.xml
===================================================================
diff -u -r33455 -r55063
--- vhUnitTest/End2End/GebruikteHalffabItemsVoorPrijsberekening/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 33455)
+++ vhUnitTest/End2End/GebruikteHalffabItemsVoorPrijsberekening/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 55063)
@@ -5,11 +5,10 @@
 <Super>vhUnitTest.TestCase</Super>
 
 <Method name="AssertGebruikteHalffabItems">
-<FormalSpec>Kenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,GebruikteHalffabItems:%ListOfDataTypes,Filter:%String</FormalSpec>
+<FormalSpec>Kenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,GebruikteHalffabItems:%ListOfDataTypes,Filter:%String,KlantID:%String=##class(DOM.VKP.enu.Klant).VanHoecke()</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim PersonalityID As DOM.common.enu.Personality = ##class(DOM.common.enu.Personality).VanHoecke()
-	#dim KlantID As DOM.VKP.enu.Klant = ##class(DOM.VKP.enu.Klant).VanHoecke()
 	
 	#dim HalffabKostItemBuilderSpy As DOM.PM.Maatwerk.Calc.Kost.HalffabKostItemBuilder = ##class(vhTest.Spy.DOM.PM.Maatwerk.Calc.Kost.HalffabKostItemBuilder).%New(,Filter)
 	Do ##class(DOM.PM.Maatwerk.Calc.IoCContainer).Instance().Register("HalffabKostItemBuilder", HalffabKostItemBuilderSpy)
Index: DOM/PM/impl/VerkoopPrijsBepaler.cls.xml
===================================================================
diff -u -r52492 -r55063
--- DOM/PM/impl/VerkoopPrijsBepaler.cls.xml	(.../VerkoopPrijsBepaler.cls.xml)	(revision 52492)
+++ DOM/PM/impl/VerkoopPrijsBepaler.cls.xml	(.../VerkoopPrijsBepaler.cls.xml)	(revision 55063)
@@ -28,8 +28,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="NietMeerekenenBepaler">
+<Type>DOM.PM.impl.VerkoopPrijsBepaler.NietMeerekenenBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>MaatwerkCalcAPI:DOM.PM.MaatwerkCalcAPI,VerkoopPrijsAPI:DOM.VKP.VerkoopPrijsAPI</FormalSpec>
+<FormalSpec>MaatwerkCalcAPI:DOM.PM.MaatwerkCalcAPI,VerkoopPrijsAPI:DOM.VKP.VerkoopPrijsAPI,NietMeerekenenBepaler:DOM.PM.impl.VerkoopPrijsBepaler.NietMeerekenenBepaler</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -38,6 +43,8 @@
 	Set ..MaatwerkCalcAPI = $$$Inject(MaatwerkCalcAPI,##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI())
 	Set ..VerkoopPrijsAPI = $$$Inject(VerkoopPrijsAPI,##class(DOM.DomeinContext).Instance().GeefVerkoopPrijsAPI())
 	Set ..GenerischProductBepaler = ##class(DOM.PM.Maatwerk.GenerischProductBepaler).%New()
+	Set ..NietMeerekenenBepaler = $$$Inject(NietMeerekenenBepaler,##class(DOM.PM.impl.VerkoopPrijsBepaler.NietMeerekenenBepaler).%New())
+	
 	Set ..TbxHelper = ##class(DOM.PM.impl.VerkoopPrijsBepaler.TbxHelper).%New()
 	Set ..IngegevenKenmerkenTypeAPI = ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New()
 	Quit $$$OK
@@ -51,7 +58,8 @@
 	#dim VerkoopPrijsInfo As DOM.VKP.info.VerkoopPrijsInfo
 	#dim KlantIDVoorPrijsBerekening As %String = ..GeefKlantIDVoorPrijsBerekening(PersonalityID, KlantID)
 	If $$$Not(..IngegevenKenmerkenTypeAPI.IsTandemboxLade(IngegevenKenmerken)) {
-		#dim KostItemsBoom As DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem = ..MaatwerkCalcAPI.GeefKostItemsBoom(IngegevenKenmerken, Aantal, KlantIDVoorPrijsBerekening, ##class(DOM.common.VanHoeckePersonality).Instance())
+		#dim IngegevenKenmerkenVoorPrijsBerekening as DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ..GeefAangepasteIngegevenKenmerkenVoorPrijsBepaling(IngegevenKenmerken,KlantIDVoorPrijsBerekening)
+		#dim KostItemsBoom As DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem = ..MaatwerkCalcAPI.GeefKostItemsBoom(IngegevenKenmerkenVoorPrijsBerekening, Aantal, KlantIDVoorPrijsBerekening, ##class(DOM.common.VanHoeckePersonality).Instance())
 		Set VerkoopPrijsInfo = ..KostNaarVerkoopPrijs(KostItemsBoom.GeefKost(), IngegevenKenmerken, Aantal, KlantIDVoorPrijsBerekening)
 	} Else {
 		#dim VerkoopPrijs As %String = ..TbxHelper.BepaalVerkoopPrijs(IngegevenKenmerken.LegacyKenmerken, Aantal, KlantIDVoorPrijsBerekening)
@@ -77,6 +85,19 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAangepasteIngegevenKenmerkenVoorPrijsBepaling">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,KlantID:DOM.common.PartijID</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</ReturnType>
+<Implementation><![CDATA[
+	#dim IKMetNietMeerekenen as DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = IngegevenKenmerken.%ConstructClone()
+	Do ##class(Tools.Wlip).%New(207).String("voor " _ IngegevenKenmerken.NietMeeleveren.Count())	
+	Set IKMetNietMeerekenen.NietMeeleveren = ##class(TECH.ListUtils).Unie(IngegevenKenmerken.NietMeeleveren,..NietMeerekenenBepaler.GeefNietMeerekenen(KlantID,IngegevenKenmerken.GeefVariant()))				
+	Do ##class(Tools.Wlip).%New(207).String("na " _ IKMetNietMeerekenen.NietMeeleveren.Count())
+	Quit IKMetNietMeerekenen
+]]></Implementation>
+</Method>
+
 <Method name="GeefBerekeningSpecificatie">
 <FormalSpec>Aantal:%String,KlantID:DOM.VKP.VanHoeckeKlantID</FormalSpec>
 <Private>1</Private>
Index: vhUnitTest/End2End/TAOR/GebruikteHalffabItemsVoorPrijsberekening/Test.cls.xml
===================================================================
diff -u -r44340 -r55063
--- vhUnitTest/End2End/TAOR/GebruikteHalffabItemsVoorPrijsberekening/Test.cls.xml	(.../Test.cls.xml)	(revision 44340)
+++ vhUnitTest/End2End/TAOR/GebruikteHalffabItemsVoorPrijsberekening/Test.cls.xml	(.../Test.cls.xml)	(revision 55063)
@@ -20,6 +20,23 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: geen geleider voor Galimberti">
+<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 ..AssertGebruikteHalffabItems(##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade(), GebruikteHalffabItems, "TA'OR BOX",KlantID)
+]]></Implementation>
+</Method>
+
 <Method name="StandaardLadeItems">
 <Private>1</Private>
 <ReturnType>%ListOfDataTypes</ReturnType>