Index: DOM/PM/impl/DataM/DataMTAORLadeCreator.cls.xml
===================================================================
diff -u -r31097 -r31112
--- DOM/PM/impl/DataM/DataMTAORLadeCreator.cls.xml	(.../DataMTAORLadeCreator.cls.xml)	(revision 31097)
+++ DOM/PM/impl/DataM/DataMTAORLadeCreator.cls.xml	(.../DataMTAORLadeCreator.cls.xml)	(revision 31112)
@@ -42,23 +42,36 @@
 <Implementation><![CDATA[
 	do ##super()
 	
-	#dim IsZijkantLinks As %Boolean = (..ProductSpecificatie.GeefIngegevenKenmerken().ProductieWijze = ..Enum.ProductieWijze.ZijkantLinks)
-	#dim IsZijkantRechts As %Boolean = (..ProductSpecificatie.GeefIngegevenKenmerken().ProductieWijze = ..Enum.ProductieWijze.ZijkantRechts)
-	#dim IsBodem As %Boolean = (..ProductSpecificatie.GeefIngegevenKenmerken().ProductieWijze = ..Enum.ProductieWijze.Bodem)
-	#dim IsFront As %Boolean = (..ProductSpecificatie.GeefIngegevenKenmerken().ProductieWijze = ..Enum.ProductieWijze.Front)
-	#dim IsRug As %Boolean = (..ProductSpecificatie.GeefIngegevenKenmerken().ProductieWijze = ..Enum.ProductieWijze.Rug)
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ..ProductSpecificatie.GeefIngegevenKenmerken()
 
-	if (IsZijkantLinks || IsZijkantRechts) {
-		do ..ZetWaarde(1, 7, 0.5)
+	if (IngegevenKenmerken.ProductieWijze '= ..Enum.ProductieWijze.Volledig) {
+		do ..ZetWaarde(1, 7, ..GeefWaardeTelbaar(IngegevenKenmerken))
 	}
+	
+	if (IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.LosseComponentenInBulk) {
+		do ..ZetWaarde("J", 6, ..BestelService.GeefBestelEenheid(IngegevenKenmerken))
+	}
+]]></Implementation>
+</Method>
 
-	if (IsBodem || IsFront || IsRug) {
-		do ..ZetWaarde(1, 7, "V")
+<Method name="GeefWaardeTelbaar">
+<Description>
+Alleen voor LadeOnderdeel, dus niet indien ProductieWijze=Volledig </Description>
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim Telbaar As %String = ""
+	#dim LadeOnderdeel As DOM.PM.Maatwerk.LadeInfo.enu.LadeOnderdeel = ..API.IngegevenKenmerkenTypeAPI.GeefLadeOnderdeel(IngegevenKenmerken)
+	if (LadeOnderdeel = ..Enum.LadeOnderdeel.Zijkant) {
+		set Telbaar = 0.5
 	}
-	
-	if (..ProductSpecificatie.GeefIngegevenKenmerken().VerpakkingType = ..Enum.VerpakkingType.LosseComponentenInBulk) {
-		do ..ZetWaarde("J", 6, ..BestelService.GeefBestelEenheid(..ProductSpecificatie.GeefIngegevenKenmerken()))
+	elseif ##class(TECH.StringUtils).Equals(LadeOnderdeel, ..Enum.LadeOnderdeel.Bodem, ..Enum.LadeOnderdeel.Front, ..Enum.LadeOnderdeel.Rug) {
+		set Telbaar = "V"
 	}
+	else {
+		do ##class(TECH.Exceptions.InvalidInputException).Throw("DataMTAORLadeCreator Error: GeefWaardeTelbaar is niet ondersteund voor LadeOnderdeel '"_LadeOnderdeel_"'." )
+	}
+	quit Telbaar
 ]]></Implementation>
 </Method>
 </Class>