Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFAfdekkapBovenv000.cls.xml
===================================================================
diff -u -r57380 -r58723
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFAfdekkapBovenv000.cls.xml	(.../HFAfdekkapBovenv000.cls.xml)	(revision 57380)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFAfdekkapBovenv000.cls.xml	(.../HFAfdekkapBovenv000.cls.xml)	(revision 58723)
@@ -8,16 +8,21 @@
 <Private>1</Private>
 </Property>
 
+<Property name="IngegevenKenmerkenTypeApi">
+<Type>DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder</FormalSpec>
+<FormalSpec>SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder,IngegevenKenmerkenTypeApi:DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	Do ##super(SamengesteldHalffabItemBuilder)
-	
+	Set ..IngegevenKenmerkenTypeApi = $$$Inject(IngegevenKenmerkenTypeApi, ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New())
 	Set ..ConceptBepaler = ##class(DOM.PM.Maatwerk.TAX.impl.ConceptBepaler).%New()
-	Quit $$$OK
+	
+	Quit ##super(SamengesteldHalffabItemBuilder)
 ]]></Implementation>
 </Method>
 
@@ -51,7 +56,7 @@
 		Set HalffabItem.Aantal = HalffabItem.Aantal + 1
 	}
 	
-	If (..API.IngegevenKenmerkenTypeAPI.IsGemonteerdeLade(IngegevenKenmerken)) {		
+	If (..IngegevenKenmerkenTypeApi.IsGemonteerdeLade(IngegevenKenmerken)) {		
 		Set HalffabItem.ProductieRoute = ..Enum.ProductieRoute.TeMonteren
 	} Else {		
 		Set HalffabItem.ProductieRoute = ..Enum.ProductieRoute.OnderdelenPicking
@@ -63,7 +68,7 @@
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..API.IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken)   ; We gaan ervan uit dat UitsparingZijkant altijd Valinge is.
+<Implementation><![CDATA[	Quit ..IngegevenKenmerkenTypeApi.IsSifonlade(IngegevenKenmerken)   ; We gaan ervan uit dat UitsparingZijkant altijd Valinge is.
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/ProductieRoute/AfdekkapBoven/Test.cls.xml
===================================================================
diff -u -r57462 -r58723
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/ProductieRoute/AfdekkapBoven/Test.cls.xml	(.../Test.cls.xml)	(revision 57462)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/ProductieRoute/AfdekkapBoven/Test.cls.xml	(.../Test.cls.xml)	(revision 58723)
@@ -4,26 +4,33 @@
 <Super>vhUnitTest.DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.ProductieRoute.Base</Super>
 
 <Method name="Test: Gemonteerde lades hebben ProductieRoute &apos;TeMonteren&apos;">
-<Implementation><![CDATA[	Do ..AssertProductieRouteVoorVerpakkingTypes(..Enum.ProductieRoute.TeMonteren, ..GeefVerpakkingTypesVoorGemonteerdeLadesVolgensIngegevenKenmerken(..IngegevenKenmerken))
+<Implementation><![CDATA[
+	#dim IngegevenKenmerkenTypeApiStub As DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI = ##class(vhTest.Mock.DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI).%New()
+	Do IngegevenKenmerkenTypeApiStub.IndienMethodCall("IsSifonlade", $$$ElkeWaarde).DanReturn($$$False)
+	Do IngegevenKenmerkenTypeApiStub.IndienMethodCall("IsGemonteerdeLade", $$$ElkeWaarde).DanReturn($$$True)
+	
+	Set ..IngegevenKenmerkenTypeAPI = IngegevenKenmerkenTypeApiStub
+	
+	Do ..AssertProductieRoute(..IngegevenKenmerken, ..Enum.ProductieRoute.TeMonteren)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Niet-gemonteerde lades met VerpakkingType FlatpackV1 hebben ProductieRoute &apos;OnderdelenPicking&apos;">
-<Implementation><![CDATA[	Do ..AssertProductieRouteVoorVerpakkingType(..Enum.ProductieRoute.OnderdelenPicking, ..Enum.VerpakkingType.FlatpackV1)
-]]></Implementation>
-</Method>
-
-<Method name="Test: Niet-gemonteerde lades met VerpakkingType BulkPerOnderdeelGegroepeerd en LosseComponentenInBulk hebben geen ProductieRoute">
+<Method name="Test: Niet-gemonteerde lades hebben ProductieRoute &apos;OnderdelenPicking&apos;">
 <Implementation><![CDATA[
-	Do ..AssertProductieRouteVoorVerpakkingType("", ..Enum.VerpakkingType.BulkPerOnderdeelGegroepeerd)
-	Do ..AssertProductieRouteVoorVerpakkingType("", ..Enum.VerpakkingType.LosseComponentenInBulk)
+	#dim IngegevenKenmerkenTypeApiStub As DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI = ##class(vhTest.Mock.DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI).%New()
+	Do IngegevenKenmerkenTypeApiStub.IndienMethodCall("IsSifonlade", $$$ElkeWaarde).DanReturn($$$False)
+	Do IngegevenKenmerkenTypeApiStub.IndienMethodCall("IsGemonteerdeLade", $$$ElkeWaarde).DanReturn($$$False)
+	
+	Set ..IngegevenKenmerkenTypeAPI = IngegevenKenmerkenTypeApiStub
+	
+	Do ..AssertProductieRoute(..IngegevenKenmerken, ..Enum.ProductieRoute.OnderdelenPicking)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefBuilder">
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilder</ReturnType>
-<Implementation><![CDATA[	Quit ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFAfdekkapBovenv000).%New("")
+<Implementation><![CDATA[	Quit ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFAfdekkapBovenv000).%New("", ..IngegevenKenmerkenTypeAPI)
 ]]></Implementation>
 </Method>
 </Class>