Index: APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml
===================================================================
diff -u -r71927 -r71937
--- APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml)	(revision 71927)
+++ APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml)	(revision 71937)
@@ -3,6 +3,16 @@
 <Class name="APPS.Halux.PPS.Document.impl.MVX.BatchNaarObjective.OptieGenerator.AlgemeneKenmerkenOptiesGeneratorMvx">
 <Super>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.AlgemeneKenmerkenOptiesGenerator</Super>
 
+<Property name="BodemUtils">
+<Type>DOM.PM.Maatwerk.MVX.BodemUtils</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="RugUtils">
+<Type>DOM.PM.Maatwerk.Lade.RugUtils.impl.MVXRugUtils</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>ProductApi:DOM.PM.ProductAPI="",AfbeeldingService:APPS.PM.Maatwerk.impl.AfbeeldingService="",IngegevenKenmerkenTypeApi:DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI=""</FormalSpec>
 <Private>1</Private>
@@ -11,6 +21,8 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Do ##super(ProductApi, AfbeeldingService, IngegevenKenmerkenTypeApi)
+	Set ..BodemUtils = ##class(DOM.PM.Maatwerk.MVX.BodemUtils).%New()
+	Set ..RugUtils = ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI().GeefLadeRugUtils(##class(DOM.PM.enu.LadeVariant).MVX())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -22,6 +34,8 @@
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
 <Implementation><![CDATA[
 	#dim BodemHoogte As %Integer = ""
+	#dim AftrekVoorBodemDiepte As %Decimal = ..BodemUtils.GeefAftrekVoorBodemDiepte(IngegevenKenmerken.RugWandMateriaal)
+	Set BodemHoogte = IngegevenKenmerken.LadeDiepte - AftrekVoorBodemDiepte
 	
 	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Bodemhoogte", BodemHoogte)
 ]]></Implementation>
@@ -33,6 +47,12 @@
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
 <Implementation><![CDATA[
 	#dim BodemBreedte As %Decimal = ""
+	
+	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = Product.GeefHalffabItemsBoom()
+	#dim BodemItem As DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Bodem())
+	
+	#dim LengteDimensie As DOM.PM.enu.BewerkingDimensie = ##class(DOM.PM.enu.BewerkingDimensie).Lengte()
+	Set:(..IsBewerkingNodigVoorBodem(BodemItem)) BodemBreedte = BodemItem.GeefBewerkteDimensie(LengteDimensie)
 		
 	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Bodembreedte", BodemBreedte)
 ]]></Implementation>
@@ -44,7 +64,15 @@
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
 <Implementation><![CDATA[
 	#dim RugBreedte As %String = ""
+	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = Product.GeefHalffabItemsBoom()
 	
+	If (IngegevenKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.MVXRugWandMateriaal).Hout()) {
+		#dim LengteDimensie As DOM.PM.enu.BewerkingDimensie = ##class(DOM.PM.enu.BewerkingDimensie).Lengte()
+		#dim RugItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = ..RugUtils.GeefRugX(HalffabItemsBoom)
+		
+		Set:(..IsBewerkingNodigVoorRug(RugItem)) RugBreedte = RugItem.GeefBewerkteDimensie(LengteDimensie)
+	}
+	
 	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugbreedte", RugBreedte)
 ]]></Implementation>
 </Method>
@@ -55,6 +83,10 @@
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
 <Implementation><![CDATA[
 	#dim RugHoogteInMm As %String = ""
+
+	If (IngegevenKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.MVXRugWandMateriaal).Hout()) {		
+		Set RugHoogteInMm = ..RugUtils.GeefRugHoogteInMm(IngegevenKenmerken.RugHoogte)
+	}
 	
 	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rughoogteinmm", RugHoogteInMm)
 ]]></Implementation>
@@ -67,6 +99,12 @@
 <Implementation><![CDATA[
 	#dim StalenRugBreedte As %String = ""
 	
+	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = Product.GeefHalffabItemsBoom()
+	#dim RugItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = ..RugUtils.GeefRugX(HalffabItemsBoom)
+	If (IngegevenKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.MVXRugWandMateriaal).Staal()) {
+		Set StalenRugBreedte = ..RugUtils.GeefStalenRugBreedte(RugItem.GeefHalffab().ProductID)
+	}
+	
 	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Stalenrugbreedte", StalenRugBreedte)
 ]]></Implementation>
 </Method>
@@ -78,9 +116,42 @@
 <Implementation><![CDATA[
 	#dim PlaatmateriaalKleuren As %String = ""
 	
+	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = Product.GeefHalffabItemsBoom()
+	#dim BodemItem As DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Bodem())
+	
+	#dim BodemKleurZichtbaar As %string = IngegevenKenmerken.BodemKleur
+	#dim BodemKleur2de As %String = BodemKleurZichtbaar
+	Set:(..IsBewerkingNodigVoorBodem(BodemItem)) BodemKleur2de =  ..BodemUtils.GeefTweedeKleur(BodemItem.GeefHalffab().ProductID, BodemKleurZichtbaar)	
+	
+	If (BodemKleurZichtbaar = BodemKleur2de) {
+		Set PlaatmateriaalKleuren = BodemKleurZichtbaar
+	} Else {
+		Set PlaatmateriaalKleuren = BodemKleurZichtbaar _ "/" _ BodemKleur2de
+	}
+	
 	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Plaatmateriaalkleuren", PlaatmateriaalKleuren)
 ]]></Implementation>
 </Method>
+
+<Method name="IsBewerkingNodigVoorBodem">
+<FormalSpec>BodemItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	
+	Quit ##class(DOM.PM.Maatwerk.Calc.HF.HalffabItemUtils).IsBewerkingNodig(BodemItem, ##class(DOM.PM.enu.BewerkingDimensie).Lengte())
+]]></Implementation>
+</Method>
+
+<Method name="IsBewerkingNodigVoorRug">
+<FormalSpec>RugItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	
+	Quit ##class(DOM.PM.Maatwerk.Calc.HF.HalffabItemUtils).IsBewerkingNodig(RugItem, ##class(DOM.PM.enu.BewerkingDimensie).Lengte())
+]]></Implementation>
+</Method>
 </Class>