Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml
===================================================================
diff -u -r73341 -r73373
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml)	(revision 73341)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml)	(revision 73373)
@@ -137,13 +137,9 @@
 <Implementation><![CDATA[
 	Set LijstOptieslaatmateriaalKleuren = ##class(%ListOfObjects).%New()
 	
-	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = Product.GeefHalffabItemsBoom()
-	#dim PlaatmateriaalBodemKleur As %String = ..GeefPlaatmateriaalBodemKleur(IngegevenKenmerken, Product.GeefHalffabItemsBoom())
-	Do LijstOptieslaatmateriaalKleuren.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Plaatmateriaalbodemkleuren", PlaatmateriaalBodemKleur))
-	
 	If (IngegevenKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout()) {
 		#dim PlaatmateriaalRugKleur As %String = ..GeefPlaatmateriaalRugKleur(IngegevenKenmerken, Product.GeefHalffabItemsBoom())
-		Do LijstOptieslaatmateriaalKleuren.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Plaatmateriaalrugkleuren", PlaatmateriaalRugKleur))
+		Do LijstOptieslaatmateriaalKleuren.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugkleur", PlaatmateriaalRugKleur))
 	}
 	
 	Quit LijstOptieslaatmateriaalKleuren
Index: APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml
===================================================================
diff -u -r73341 -r73373
--- APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml)	(revision 73341)
+++ APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml)	(revision 73373)
@@ -133,13 +133,9 @@
 <Implementation><![CDATA[
 	Set LijstOptieslaatmateriaalKleuren = ##class(%ListOfObjects).%New()
 	
-	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = Product.GeefHalffabItemsBoom()
-	#dim PlaatmateriaalBodemKleur As %String = ..GeefPlaatmateriaalBodemKleur(IngegevenKenmerken, Product.GeefHalffabItemsBoom())
-	Do LijstOptieslaatmateriaalKleuren.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Plaatmateriaalbodemkleuren", PlaatmateriaalBodemKleur))
-	
 	If (IngegevenKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout()) {
 		#dim PlaatmateriaalRugKleur As %String = ..GeefPlaatmateriaalRugKleur(IngegevenKenmerken, Product.GeefHalffabItemsBoom())
-		Do LijstOptieslaatmateriaalKleuren.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Plaatmateriaalrugkleuren", PlaatmateriaalRugKleur))
+		Do LijstOptieslaatmateriaalKleuren.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugkleur", PlaatmateriaalRugKleur))
 	}
 	
 	Quit LijstOptieslaatmateriaalKleuren
Index: APPS/Halux/PPS/Document/impl/TBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorTbx.cls.xml
===================================================================
diff -u -r73341 -r73373
--- APPS/Halux/PPS/Document/impl/TBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorTbx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorTbx.cls.xml)	(revision 73341)
+++ APPS/Halux/PPS/Document/impl/TBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorTbx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorTbx.cls.xml)	(revision 73373)
@@ -114,10 +114,9 @@
 <Implementation><![CDATA[
 	Set LijstOptieslaatmateriaalKleuren = ##class(%ListOfObjects).%New()	
 	#dim PlaatmateriaalBodemKleur As %String = ..GeefPlaatmateriaalBodemKleur(Product)
-	Do LijstOptieslaatmateriaalKleuren.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Plaatmateriaalbodemkleuren", PlaatmateriaalBodemKleur))
 	
 	If (IngegevenKenmerken.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()) {
-		Do LijstOptieslaatmateriaalKleuren.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Plaatmateriaalrugkleuren", PlaatmateriaalBodemKleur))
+		Do LijstOptieslaatmateriaalKleuren.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugkleur", PlaatmateriaalBodemKleur))
 	}
 	
 	Quit LijstOptieslaatmateriaalKleuren