Index: DOM/VKP/enu/Klant.cls.xml
===================================================================
diff -u -r36177 -r36637
--- DOM/VKP/enu/Klant.cls.xml	(.../Klant.cls.xml)	(revision 36177)
+++ DOM/VKP/enu/Klant.cls.xml	(.../Klant.cls.xml)	(revision 36637)
@@ -358,6 +358,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="LenssenProduktie">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.VKP.enu.Klant</ReturnType>
+<Implementation><![CDATA[	Quit ..MaakPartijID(9798)
+]]></Implementation>
+</Method>
+
 <Method name="MiBois">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.VKP.enu.Klant</ReturnType>
Index: DOM/VKP/enu/Klant/Verwerker.cls.xml
===================================================================
diff -u -r36177 -r36637
--- DOM/VKP/enu/Klant/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 36177)
+++ DOM/VKP/enu/Klant/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 36637)
@@ -62,6 +62,8 @@
 		Do ..VerwerkKvikBE()
 	} ElseIf Klant = "K||24315" {
 		Do ..VerwerkKvikNL()
+	} ElseIf Klant = "K||9798" {
+		Do ..VerwerkLenssenProduktie()
 	} ElseIf Klant = "K||6819" {
 		Do ..VerwerkLijstPrijsKlant()
 	} ElseIf Klant = "K||2999" {
@@ -271,6 +273,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkLenssenProduktie">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkLijstPrijsKlant">
 <Abstract>1</Abstract>
 <Private>1</Private>
Index: DOM/VKP/enu/Klant/AutoComplete.cls.xml
===================================================================
diff -u -r36177 -r36637
--- DOM/VKP/enu/Klant/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 36177)
+++ DOM/VKP/enu/Klant/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 36637)
@@ -184,6 +184,13 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="LenssenProduktie">
+<Type>%String</Type>
+<InitialExpression>"K||9798"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="LijstPrijsKlant">
 <Type>%String</Type>
 <InitialExpression>"K||6819"</InitialExpression>