Index: DOM/PM/enu/LBXKenmerkNaam/AutoComplete.cls.xml
===================================================================
diff -u -r29793 -r41142
--- DOM/PM/enu/LBXKenmerkNaam/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 29793)
+++ DOM/PM/enu/LBXKenmerkNaam/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 41142)
@@ -10,224 +10,231 @@
 <Super>%SerialObject</Super>
 
 <Property name="AantalDwarsverdelingen">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"AantalDwarsverdelingen"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="BodemKleur">
+<Type>%String</Type>
+<InitialExpression>"BodemKleur"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="Draagkracht">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"Draagkracht"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="FrontBevestiging">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"FrontBevestiging"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="GeleiderTechnologie">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"GeleiderTechnologie"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="HeeftDiepteVerstelling">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"HeeftDiepteVerstelling"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="HeeftDwarsverdeling">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"HeeftDwarsverdeling"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="HeeftZijstabilisering">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"HeeftZijstabilisering"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="IsBinnenlade">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"IsBinnenlade"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="Klasse">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"Klasse"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="LadeDiepte">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"LadeDiepte"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="LadeHoogte">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"LadeHoogte"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="LadeKleur">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"LadeKleur"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="NietMeeleveren">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"NietMeeleveren"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="OpvullijstKleur">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"OpvullijstKleur"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="ProductieWijze">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"ProductieWijze"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="RugHoogte">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"RugHoogte"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="RugWandMateriaal">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"RugWandMateriaal"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="UitsparingDataAantalUitsparingen">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"UitsparingDataAantalUitsparingen"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="UitsparingDataBreedteM">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"UitsparingDataBreedteM"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="UitsparingDataBreedteX">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"UitsparingDataBreedteX"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="UitsparingDataBreedteY">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"UitsparingDataBreedteY"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="UitsparingDataBreedteZ1">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"UitsparingDataBreedteZ1"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="UitsparingDataBreedteZ2">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"UitsparingDataBreedteZ2"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="UitsparingDataCodeZ1">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"UitsparingDataCodeZ1"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="UitsparingDataCodeZ2">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"UitsparingDataCodeZ2"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="VerpakkingType">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"VerpakkingType"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="VoorWandType">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"VoorWandType"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="VoorWandTypeVanCBinnenlade">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"VoorWandTypeVanCBinnenlade"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="VoorWandTypeVanMBinnenlade">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"VoorWandTypeVanMBinnenlade"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="VoorWandVerhogingHoogte">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"VoorWandVerhogingHoogte"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="VoorWandVerhogingMateriaal">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"VoorWandVerhogingMateriaal"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="ZijWandType">
-<Type>DOM.PM.enu.LBXKenmerkNaam</Type>
+<Type>%String</Type>
 <InitialExpression>"ZijWandType"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
Index: DOM/PM/enu/LBXKenmerkNaam.cls.xml
===================================================================
diff -u -r29793 -r41142
--- DOM/PM/enu/LBXKenmerkNaam.cls.xml	(.../LBXKenmerkNaam.cls.xml)	(revision 29793)
+++ DOM/PM/enu/LBXKenmerkNaam.cls.xml	(.../LBXKenmerkNaam.cls.xml)	(revision 41142)
@@ -4,7 +4,7 @@
 <Super>DOM.PM.enu.KenmerkNaam</Super>
 
 <Parameter name="VALUELIST">
-<Default>;AantalDwarsverdelingen;Draagkracht;FrontBevestiging;GeleiderTechnologie;HeeftDiepteVerstelling;HeeftDwarsverdeling;HeeftZijstabilisering;IsBinnenlade;Klasse;LadeDiepte;LadeHoogte;LadeKleur;NietMeeleveren;OpvullijstKleur;ProductieWijze;RugHoogte;RugWandMateriaal;UitsparingDataAantalUitsparingen;UitsparingDataBreedteX;UitsparingDataBreedteZ1;UitsparingDataBreedteM;UitsparingDataBreedteZ2;UitsparingDataBreedteY;UitsparingDataCodeZ1;UitsparingDataCodeZ2;VerpakkingType;VoorWandVerhogingHoogte;VoorWandVerhogingMateriaal;VoorWandType;VoorWandTypeVanCBinnenlade;VoorWandTypeVanMBinnenlade;ZijWandType</Default>
+<Default>;AantalDwarsverdelingen;BodemKleur;Draagkracht;FrontBevestiging;GeleiderTechnologie;HeeftDiepteVerstelling;HeeftDwarsverdeling;HeeftZijstabilisering;IsBinnenlade;Klasse;LadeDiepte;LadeHoogte;LadeKleur;NietMeeleveren;OpvullijstKleur;ProductieWijze;RugHoogte;RugWandMateriaal;UitsparingDataAantalUitsparingen;UitsparingDataBreedteX;UitsparingDataBreedteZ1;UitsparingDataBreedteM;UitsparingDataBreedteZ2;UitsparingDataBreedteY;UitsparingDataCodeZ1;UitsparingDataCodeZ2;VerpakkingType;VoorWandVerhogingHoogte;VoorWandVerhogingMateriaal;VoorWandType;VoorWandTypeVanCBinnenlade;VoorWandTypeVanMBinnenlade;ZijWandType</Default>
 </Parameter>
 
 <Method name="AantalDwarsverdelingen">
@@ -14,6 +14,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="BodemKleur">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.LBXKenmerkNaam</ReturnType>
+<Implementation><![CDATA[	Quit "BodemKleur"
+]]></Implementation>
+</Method>
+
 <Method name="Draagkracht">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.PM.enu.LBXKenmerkNaam</ReturnType>
Index: DOM/PM/enu/LBXKenmerkNaam/Verwerker.cls.xml
===================================================================
diff -u -r29793 -r41142
--- DOM/PM/enu/LBXKenmerkNaam/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 29793)
+++ DOM/PM/enu/LBXKenmerkNaam/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 41142)
@@ -14,6 +14,8 @@
 <Implementation><![CDATA[
 	If LBXKenmerkNaam = "AantalDwarsverdelingen" {
 		Do ..VerwerkAantalDwarsverdelingen()
+	} ElseIf LBXKenmerkNaam = "BodemKleur" {
+		Do ..VerwerkBodemKleur()
 	} ElseIf LBXKenmerkNaam = "Draagkracht" {
 		Do ..VerwerkDraagkracht()
 	} ElseIf LBXKenmerkNaam = "FrontBevestiging" {
@@ -77,7 +79,7 @@
 	} ElseIf LBXKenmerkNaam = "ZijWandType" {
 		Do ..VerwerkZijWandType()
 	} Else {
-		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(LBXKenmerkNaam,"DOM.PM.enu.LBXKenmerkNaam")
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(LBXKenmerkNaam,"DOM.PM.enu.LBXKenmerkNaam",$classname())
 		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
 	}
 ]]></Implementation>
@@ -89,6 +91,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkBodemKleur">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkDraagkracht">
 <Abstract>1</Abstract>
 <Private>1</Private>