Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml
===================================================================
diff -u -r72028 -r72029
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml)	(revision 72028)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml)	(revision 72029)
@@ -68,30 +68,18 @@
 		#dim LengteDimensie As DOM.PM.enu.BewerkingDimensie = ##class(DOM.PM.enu.BewerkingDimensie).Lengte()
 		
 		If (..IngegevenKenmerkenTypeApi.IsSifonlade(Product.GeefIngegevenKenmerken())) {
-			#dim RugBreedteX As %Decimal = ""
-			#dim RugItemX As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = ..RugUtils.GeefRugX(HalffabItemsBoom)
-			
-			Set:(..IsBewerkingNodigVoorRug(RugItemX)) RugBreedteX = RugItemX.GeefBewerkteDimensie(LengteDimensie)
+			#dim RugBreedteX As %Decimal = ..GeefRugBreedte("X", HalffabItemsBoom)
 			Do LijstOptiesVoorRugBreedte.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugxbreedte", RugBreedteX))
 			
-			#dim RugBreedteY As %Decimal = ""
-			#dim RugItemY As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Rug()_"->"_ "Y")
-			
-			Set:(..IsBewerkingNodigVoorRug(RugItemY)) RugBreedteY = RugItemY.GeefBewerkteDimensie(LengteDimensie)
+			#dim RugBreedteY As %Decimal = ..GeefRugBreedte("Y", HalffabItemsBoom)
 			Do LijstOptiesVoorRugBreedte.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugybreedte", RugBreedteY))
 			
 			If $$$Not(IngegevenKenmerken.UitsparingData.AantalUitsparingen = ##class(DOM.PM.enu.AantalUitsparingen).Enkel()) {
-				#dim RugBreedteM As %Decimal = ""
-				#dim RugItemM As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Rug()_"->"_ "M")
-				
-				Set:(..IsBewerkingNodigVoorRug(RugItemM)) RugBreedteM = RugItemM.GeefBewerkteDimensie(LengteDimensie)
+				#dim RugBreedteM As %Decimal = ..GeefRugBreedte("M", HalffabItemsBoom)
 				Do LijstOptiesVoorRugBreedte.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugmbreedte", RugBreedteM))
 			}
 		} Else {
-			#dim RugBreedte As %String = ""
-			#dim RugItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = ..RugUtils.GeefRugX(HalffabItemsBoom)
-				
-			Set:(..IsBewerkingNodigVoorRug(RugItem)) RugBreedte = RugItem.GeefBewerkteDimensie(LengteDimensie)			
+			#dim RugBreedte As %Decimal = ..GeefRugBreedte("X", HalffabItemsBoom)
 			Do LijstOptiesVoorRugBreedte.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugbreedte", RugBreedte))
 		}
 	}
@@ -100,18 +88,20 @@
 ]]></Implementation>
 </Method>
 
-<UDLText name="T">
-<Content><![CDATA[
-/*Method GeefRugBreedte(SubRol As %String, HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom) As %Decimal {
+<Method name="GeefRugBreedte">
+<FormalSpec>SubRol:%String,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Decimal</ReturnType>
+<Implementation><![CDATA[
 	#dim RugBreedte As %Decimal = ""
+	#dim LengteDimensie As DOM.PM.enu.BewerkingDimensie = ##class(DOM.PM.enu.BewerkingDimensie).Lengte()
 	
 	#dim RugItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Rug()_"->"_ SubRol)
-	Set:(..IsBewerkingNodigVoorRug(RugItemX)) RugBreedteX = RugItemX.GeefBewerkteDimensie(LengteDimensie)
+	Set:(..IsBewerkingNodigVoorRug(RugItem)) RugBreedte = RugItem.GeefBewerkteDimensie(LengteDimensie)
 	
 	Quit RugBreedte
-}*/
-]]></Content>
-</UDLText>
+]]></Implementation>
+</Method>
 
 <Method name="GeefOptieVoorRugHoogteInMm">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Product:DOM.PM.MaatwerkProduct,SequentieNummerLade:%String</FormalSpec>