Index: APPS/Halux/Machine/Kantenband/enu/LijmProgramma/AutoComplete.cls.xml
===================================================================
diff -u -r34372 -r34430
--- APPS/Halux/Machine/Kantenband/enu/LijmProgramma/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 34372)
+++ APPS/Halux/Machine/Kantenband/enu/LijmProgramma/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 34430)
@@ -23,6 +23,20 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="C">
+<Type>%String</Type>
+<InitialExpression>"C"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="D">
+<Type>%String</Type>
+<InitialExpression>"D"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="L">
 <Type>%String</Type>
 <InitialExpression>"L"</InitialExpression>
Index: APPS/Halux/Machine/Kantenband/enu/LijmProgramma.cls.xml
===================================================================
diff -u -r29059 -r34430
--- APPS/Halux/Machine/Kantenband/enu/LijmProgramma.cls.xml	(.../LijmProgramma.cls.xml)	(revision 29059)
+++ APPS/Halux/Machine/Kantenband/enu/LijmProgramma.cls.xml	(.../LijmProgramma.cls.xml)	(revision 34430)
@@ -6,46 +6,60 @@
 
 <Parameter name="DISPLAYLIST">
 <Type>%String</Type>
-<Default>,A,B,L,R,X</Default>
+<Default>;A;B;C;D;L;R;X</Default>
 </Parameter>
 
 <Parameter name="VALUELIST">
 <Type>%String</Type>
-<Default>,A,B,L,R,X</Default>
+<Default>;A;B;C;D;L;R;X</Default>
 </Parameter>
 
 <Method name="A">
 <ClassMethod>1</ClassMethod>
 <ReturnType>APPS.Halux.Machine.Kantenband.enu.LijmProgramma</ReturnType>
-<Implementation><![CDATA[	quit "A"
+<Implementation><![CDATA[	Quit "A"
 ]]></Implementation>
 </Method>
 
 <Method name="B">
 <ClassMethod>1</ClassMethod>
 <ReturnType>APPS.Halux.Machine.Kantenband.enu.LijmProgramma</ReturnType>
-<Implementation><![CDATA[	quit "B"
+<Implementation><![CDATA[	Quit "B"
 ]]></Implementation>
 </Method>
 
+<Method name="C">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.Machine.Kantenband.enu.LijmProgramma</ReturnType>
+<Implementation><![CDATA[	Quit "C"
+]]></Implementation>
+</Method>
+
+<Method name="D">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.Machine.Kantenband.enu.LijmProgramma</ReturnType>
+<Implementation><![CDATA[	Quit "D"
+]]></Implementation>
+</Method>
+
 <Method name="L">
 <ClassMethod>1</ClassMethod>
 <ReturnType>APPS.Halux.Machine.Kantenband.enu.LijmProgramma</ReturnType>
-<Implementation><![CDATA[	quit "L"
+<Implementation><![CDATA[	Quit "L"
 ]]></Implementation>
 </Method>
 
 <Method name="R">
 <ClassMethod>1</ClassMethod>
 <ReturnType>APPS.Halux.Machine.Kantenband.enu.LijmProgramma</ReturnType>
-<Implementation><![CDATA[	quit "R"
+<Implementation><![CDATA[	Quit "R"
 ]]></Implementation>
 </Method>
 
 <Method name="X">
 <ClassMethod>1</ClassMethod>
 <ReturnType>APPS.Halux.Machine.Kantenband.enu.LijmProgramma</ReturnType>
-<Implementation><![CDATA[	quit "X"
+<Implementation><![CDATA[	Quit "X"
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/Halux/Machine/Kantenband/enu/LijmProgramma/Verwerker.cls.xml
===================================================================
diff -u -r34372 -r34430
--- APPS/Halux/Machine/Kantenband/enu/LijmProgramma/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 34372)
+++ APPS/Halux/Machine/Kantenband/enu/LijmProgramma/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 34430)
@@ -16,6 +16,10 @@
 		Do ..VerwerkA()
 	} ElseIf LijmProgramma = "B" {
 		Do ..VerwerkB()
+	} ElseIf LijmProgramma = "C" {
+		Do ..VerwerkC()
+	} ElseIf LijmProgramma = "D" {
+		Do ..VerwerkD()
 	} ElseIf LijmProgramma = "L" {
 		Do ..VerwerkL()
 	} ElseIf LijmProgramma = "R" {
@@ -41,6 +45,18 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkC">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkD">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkL">
 <Abstract>1</Abstract>
 <Private>1</Private>