Index: vhUnitTest/DOM/VKP/Maatwerk/impl/BestelService/ValideerBestelEenheid/TAX/Test.cls.xml
===================================================================
diff -u -r55875 -r55975
--- vhUnitTest/DOM/VKP/Maatwerk/impl/BestelService/ValideerBestelEenheid/TAX/Test.cls.xml	(.../Test.cls.xml)	(revision 55875)
+++ vhUnitTest/DOM/VKP/Maatwerk/impl/BestelService/ValideerBestelEenheid/TAX/Test.cls.xml	(.../Test.cls.xml)	(revision 55975)
@@ -18,6 +18,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="LadeInfoApi">
+<Type>DOM.PM.Maatwerk.LadeInfoAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="LosseComponentFactory">
 <Type>DOM.PM.Maatwerk.LadeInfo.impl.LosseComponentFactory</Type>
 <Private>1</Private>
@@ -59,7 +64,8 @@
 	Set ..MaatwerkCalcAPI = ##class(vhTest.Mock.DOM.PM.MaatwerkCalcAPI).%New()
 	Set ..LosseComponentFactory = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.impl.LosseComponentFactory).%New()
 	Set ..BestelEenheidBepaler = ##class(vhTest.Mock.DOM.VKP.Maatwerk.impl.BestelService.BestelEenheidBepaler).%New()
-	Set ..BestelService = ##class(DOM.VKP.Maatwerk.impl.BestelService).%New(..MaatwerkCalcAPI, ..LosseComponentFactory, ..BestelEenheidBepaler)
+	Set ..LadeInfoApi = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfoAPI).%New()
+	Set ..BestelService = ##class(DOM.VKP.Maatwerk.impl.BestelService).%New(..MaatwerkCalcAPI, ..LosseComponentFactory, ..BestelEenheidBepaler, ..LadeInfoApi)
 	Set ..IngegevenKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade()
 	Set ..HalffabItemsBoom = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
 ]]></Implementation>
@@ -76,11 +82,13 @@
 <Implementation><![CDATA[
 	Set ..Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Bodem()
 	Set ..IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.BulkPerOnderdeelGegroepeerd
-	Set ..IngegevenKenmerken.ProductieWijze = ##class(DOM.PM.enu.TAORProductieWijze).Bodem()
+	Set ..IngegevenKenmerken.ProductieWijze = ""
 	
-	#dim Lade As DOM.PM.Maatwerk.LadeInfo.Lade = ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.Lade).%New(..GeefHalffabItem(), ..IngegevenKenmerken)
-	#dim LadeOnderdeel As DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel = ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.Bodem).%New(Lade, ..GeefHalffabItem(), ..IngegevenKenmerken)
+	#dim Lade As DOM.PM.Maatwerk.LadeInfo.Lade = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Lade).%New()
+	#dim LadeOnderdeel As DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel = ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.Zijkant).%New(Lade, ..GeefHalffabItem(), ..IngegevenKenmerken)
+	Do Lade.IndienMethodCall("GeefZijkant", $$$ElkeWaarde).DanReturn(LadeOnderdeel)
 	
+	Do ..LadeInfoApi.IndienMethodCall("GeefLade", ..GeefHalffabItemsBoom(), ..IngegevenKenmerken).DanReturn(Lade)
 	Do ..MaatwerkCalcAPI.IndienMethodCall("GeefHalffabItemsBoom", ..IngegevenKenmerken).DanReturn(..GeefHalffabItemsBoom())
 	Do ..LosseComponentFactory.IndienMethodCall("MaakLosseComponent", ..GeefHalffabItemsBoom(), ..IngegevenKenmerken, $$$ElkeWaarde).DanReturn(LadeOnderdeel)
 	
@@ -97,11 +105,13 @@
 <Implementation><![CDATA[
 	Set ..Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Bodem()
 	Set ..IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.BulkPerOnderdeelGegroepeerd
-	Set ..IngegevenKenmerken.ProductieWijze = ##class(DOM.PM.enu.TAORProductieWijze).Bodem()
+	Set ..IngegevenKenmerken.ProductieWijze = ""
 	
-	#dim Lade As DOM.PM.Maatwerk.LadeInfo.Lade = ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.Lade).%New(..GeefHalffabItem(), ..IngegevenKenmerken)
-	#dim LadeOnderdeel As DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel = ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.Bodem).%New(Lade, ..GeefHalffabItem(), ..IngegevenKenmerken)
+	#dim Lade As DOM.PM.Maatwerk.LadeInfo.Lade = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Lade).%New()
+	#dim LadeOnderdeel As DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel = ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.Zijkant).%New(Lade, ..GeefHalffabItem(), ..IngegevenKenmerken)
+	Do Lade.IndienMethodCall("GeefZijkant", $$$ElkeWaarde).DanReturn(LadeOnderdeel)
 	
+	Do ..LadeInfoApi.IndienMethodCall("GeefLade", ..GeefHalffabItemsBoom(), ..IngegevenKenmerken).DanReturn(Lade)
 	Do ..MaatwerkCalcAPI.IndienMethodCall("GeefHalffabItemsBoom", ..IngegevenKenmerken).DanReturn(..GeefHalffabItemsBoom())
 	Do ..LosseComponentFactory.IndienMethodCall("MaakLosseComponent", ..GeefHalffabItemsBoom(), ..IngegevenKenmerken, $$$ElkeWaarde).DanReturn(LadeOnderdeel)