Index: DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidLosseComponentenInBulkBepaler.cls.xml
===================================================================
diff -u -r55561 -r55566
--- DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidLosseComponentenInBulkBepaler.cls.xml	(.../BestelEenheidLosseComponentenInBulkBepaler.cls.xml)	(revision 55561)
+++ DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidLosseComponentenInBulkBepaler.cls.xml	(.../BestelEenheidLosseComponentenInBulkBepaler.cls.xml)	(revision 55566)
@@ -74,7 +74,7 @@
 <Private>1</Private>
 <ReturnType>TECH.Integer</ReturnType>
 <Implementation><![CDATA[
-	#dim BestelEenheid As TECH.Integer
+	#dim BestelEenheid As TECH.Integer = 0
 	
 	If (Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).N()) {
 		Set BestelEenheid = 24
@@ -84,8 +84,6 @@
 		(Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).C()) || 
 		(Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).F())) {
 		Set BestelEenheid = 8
-	} Else {
-		Do ##class(TECH.Exceptions.InvalidInputException).Throw("LadeHoogte " _ Kenmerken.LadeHoogte _ " voor berekening BestelEenheidVoorZijkant niet gevonden. ")
 	}
 	
 	Quit BestelEenheid
@@ -97,7 +95,7 @@
 <Private>1</Private>
 <ReturnType>TECH.Integer</ReturnType>
 <Implementation><![CDATA[
-	#dim BestelEenheid As TECH.Integer
+	#dim BestelEenheid As TECH.Integer = 0
 	
 	If (Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).N()) {
 		Set BestelEenheid = 24
@@ -107,8 +105,6 @@
 	} ElseIf ((Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).C()) || 
 		(Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).F())) {
 		Set BestelEenheid = 8
-	} Else {
-		Do ##class(TECH.Exceptions.InvalidInputException).Throw("LadeHoogte " _ Kenmerken.LadeHoogte _ " voor berekening BestelEenheidVoorRug niet gevonden. ")
 	}
 	
 	Quit BestelEenheid
@@ -120,16 +116,14 @@
 <Private>1</Private>
 <ReturnType>TECH.Integer</ReturnType>
 <Implementation><![CDATA[
-	#dim BestelEenheid As TECH.Integer
+	#dim BestelEenheid As TECH.Integer = 0
 	
 	If ((Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).N()) || 
 		(Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).M())) {
 		Set BestelEenheid = 20
 	} ElseIf ((Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).K()) || 
 		(Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).C())) {
 		Set BestelEenheid = 10
-	} Else {
-		Do ##class(TECH.Exceptions.InvalidInputException).Throw("LadeHoogte " _ Kenmerken.LadeHoogte _ " voor berekening BestelEenheidVoorZijkant niet gevonden. ")
 	}
 	
 	Quit BestelEenheid
Index: vhUnitTest/DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidLosseComponentenInBulkBepaler/Test.cls.xml
===================================================================
diff -u -r55552 -r55566
--- vhUnitTest/DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidLosseComponentenInBulkBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 55552)
+++ vhUnitTest/DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidLosseComponentenInBulkBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 55566)
@@ -59,6 +59,34 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: BestelEenheid is default 0 als LadeHoogte leeg is">
+<Implementation><![CDATA[
+	Set ..Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).ZijkantLinks()
+	
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).%New()
+	Set IngegevenKenmerken.LadeHoogte = ""
+	
+	#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.Zijkant).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
+		
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 0)
+]]></Implementation>
+</Method>
+
+<Method name="Test: BestelEenheid is default 0 als LadeHoogte onbekend is">
+<Implementation><![CDATA[
+	Set ..Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).ZijkantLinks()
+	
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).%New()
+	Set IngegevenKenmerken.LadeHoogte = "Onbekende LadeHoogte"
+	
+	#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.Zijkant).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
+		
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 0)
+]]></Implementation>
+</Method>
+
 <Method name="Test: Voor de Zijkant bij LadeHoogte N is de BestelEenheid 24">
 <Implementation><![CDATA[
 	Set ..Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).ZijkantLinks()
@@ -69,7 +97,7 @@
 	#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.Zijkant).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 		
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "24")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 24)
 ]]></Implementation>
 </Method>
 
@@ -83,7 +111,7 @@
 	#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.Zijkant).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "16")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 16)
 ]]></Implementation>
 </Method>
 
@@ -97,7 +125,7 @@
 	#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.Zijkant).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "8")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 8)
 ]]></Implementation>
 </Method>
 
@@ -111,7 +139,7 @@
 	#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.Zijkant).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "8")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 8)
 ]]></Implementation>
 </Method>
 
@@ -125,7 +153,7 @@
 	#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.Zijkant).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "8")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 8)
 ]]></Implementation>
 </Method>
 
@@ -139,7 +167,7 @@
 	#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.Rug).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "24")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 24)
 ]]></Implementation>
 </Method>
 
@@ -153,7 +181,7 @@
 	#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.Rug).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "16")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 16)
 ]]></Implementation>
 </Method>
 
@@ -167,7 +195,7 @@
 	#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.Rug).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "16")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 16)
 ]]></Implementation>
 </Method>
 
@@ -181,7 +209,7 @@
 	#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.Rug).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "8")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 8)
 ]]></Implementation>
 </Method>
 
@@ -195,7 +223,7 @@
 	#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.Rug).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "8")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 8)
 ]]></Implementation>
 </Method>
 
@@ -209,7 +237,7 @@
 	#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.Front).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "20")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 20)
 ]]></Implementation>
 </Method>
 
@@ -223,7 +251,7 @@
 	#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.Front).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "20")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 20)
 ]]></Implementation>
 </Method>
 
@@ -237,7 +265,7 @@
 	#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.Front).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "10")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 10)
 ]]></Implementation>
 </Method>
 
@@ -251,7 +279,7 @@
 	#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.Front).%New(Lade, ..GeefHalffabItem(), IngegevenKenmerken)
 	
-	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, "10")
+	Do ..AssertBestelEenheid(IngegevenKenmerken, LadeOnderdeel, 10)
 ]]></Implementation>
 </Method>