Index: DOM/PM/enu/LBXLadeKleur/Verwerker.cls.xml
===================================================================
diff -u -r39913 -r68144
--- DOM/PM/enu/LBXLadeKleur/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 39913)
+++ DOM/PM/enu/LBXLadeKleur/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 68144)
@@ -12,7 +12,9 @@
 <Final>1</Final>
 <FormalSpec>LBXLadeKleur:DOM.PM.enu.LBXLadeKleur</FormalSpec>
 <Implementation><![CDATA[
-	If LBXLadeKleur = "INGL" {
+	If LBXLadeKleur = "CS-M" {
+		Do ..VerwerkCarbonzwart()
+	} ElseIf LBXLadeKleur = "INGL" {
 		Do ..VerwerkInox()
 	} ElseIf LBXLadeKleur = "OG-M" {
 		Do ..VerwerkOriongrijs()
@@ -29,6 +31,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkCarbonzwart">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkInox">
 <Abstract>1</Abstract>
 <Private>1</Private>
Index: DOM/PM/enu/LBXLadeKleur/AutoComplete.cls.xml
===================================================================
diff -u -r43554 -r68144
--- DOM/PM/enu/LBXLadeKleur/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 43554)
+++ DOM/PM/enu/LBXLadeKleur/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 68144)
@@ -9,6 +9,13 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%SerialObject</Super>
 
+<Property name="Carbonzwart">
+<Type>%String</Type>
+<InitialExpression>"CS-M"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="Inox">
 <Type>%String</Type>
 <InitialExpression>"INGL"</InitialExpression>
@@ -43,11 +50,6 @@
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
-
-<Storage name="Default">
-<Type>%Library.CacheSerialState</Type>
-<StreamLocation>^DOM.PM.enu.LBEAFF.AutoCompleteS</StreamLocation>
-</Storage>
 </Class>
 
 
Index: DOM/PM/enu/LBXLadeKleur.cls.xml
===================================================================
diff -u -r39913 -r68144
--- DOM/PM/enu/LBXLadeKleur.cls.xml	(.../LBXLadeKleur.cls.xml)	(revision 39913)
+++ DOM/PM/enu/LBXLadeKleur.cls.xml	(.../LBXLadeKleur.cls.xml)	(revision 68144)
@@ -8,11 +8,11 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
-<Default>;SW-M;OG-M;INGL;TS-M;PS-M</Default>
+<Default>;SW-M;OG-M;INGL;TS-M;PS-M;CS-M</Default>
 </Parameter>
 
 <Parameter name="DISPLAYLIST">
-<Default>;Zijdewit;Oriongrijs;Inox;Terrazwart;Polarzilver</Default>
+<Default>;Zijdewit;Oriongrijs;Inox;Terrazwart;Polarzilver;Carbonzwart</Default>
 </Parameter>
 
 <Method name="Zijdewit">
@@ -49,6 +49,13 @@
 <Implementation><![CDATA[	Quit "PS-M"
 ]]></Implementation>
 </Method>
+
+<Method name="Carbonzwart">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.LBXLadeKleur</ReturnType>
+<Implementation><![CDATA[	Quit "CS-M"
+]]></Implementation>
+</Method>
 </Class>