Index: DOM/VKP/enu/Klant/Verwerker.cls.xml
===================================================================
diff -u -r32677 -r33035
--- DOM/VKP/enu/Klant/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 32677)
+++ DOM/VKP/enu/Klant/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 33035)
@@ -88,6 +88,8 @@
 		Do ..VerwerkSpilPrijsKlant()
 	} ElseIf Klant = "K||1000" {
 		Do ..VerwerkTestklantVanHoecke()
+	} ElseIf Klant = "K||6261" {
+		Do ..VerwerkTheyssensKeukens()
 	} ElseIf Klant = "K||8869" {
 		Do ..VerwerkThononKitchencenter()
 	} ElseIf Klant = "K||2523" {
@@ -339,6 +341,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkTheyssensKeukens">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkThononKitchencenter">
 <Abstract>1</Abstract>
 <Private>1</Private>
Index: DOM/VKP/impl/DataM/KlantOrderInstellingenImpl.cls.xml
===================================================================
diff -u -r31361 -r33035
--- DOM/VKP/impl/DataM/KlantOrderInstellingenImpl.cls.xml	(.../KlantOrderInstellingenImpl.cls.xml)	(revision 31361)
+++ DOM/VKP/impl/DataM/KlantOrderInstellingenImpl.cls.xml	(.../KlantOrderInstellingenImpl.cls.xml)	(revision 33035)
@@ -77,7 +77,7 @@
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
 	 ; 10 staat er bij om de IntegratieTesten
-	#dim KastKlanten As %String = "10;1000;5023;1213;3814;1390;1387;1966;4073;1949;4451;6780;3044;2523;4533;6261;11620;3670;6751;11211;15862;1879;2247;6260;9382;7606;18417;9197;8869,11171"
+	#dim KastKlanten As %String = "10;1000;5023;1213;3814;1390;1387;1966;4073;1949;4451;6780;3044;2523;4533;6261;11620;3670;6751;11211;15862;1879;2247;6260;9382;7606;18417;9197;8869,11171,6261"
 	#dim KlantNr As %String = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantNummerVoorPartijID(..KlantID)
 	Quit $Find(";"_KastKlanten_";" , ";"_KlantNr_";")>0
 ]]></Implementation>
Index: DOM/VKP/enu/Klant/AutoComplete.cls.xml
===================================================================
diff -u -r32677 -r33035
--- DOM/VKP/enu/Klant/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 32677)
+++ DOM/VKP/enu/Klant/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 33035)
@@ -275,6 +275,13 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="TheyssensKeukens">
+<Type>DOM.VKP.enu.Klant</Type>
+<InitialExpression>"K||6261"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="ThononKitchencenter">
 <Type>DOM.VKP.enu.Klant</Type>
 <InitialExpression>"K||8869"</InitialExpression>
Index: DOM/VKP/enu/Klant.cls.xml
===================================================================
diff -u -r32677 -r33035
--- DOM/VKP/enu/Klant.cls.xml	(.../Klant.cls.xml)	(revision 32677)
+++ DOM/VKP/enu/Klant.cls.xml	(.../Klant.cls.xml)	(revision 33035)
@@ -314,6 +314,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TheyssensKeukens">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.VKP.enu.Klant</ReturnType>
+<Implementation><![CDATA[	Quit ..MaakPartijID(6261)
+]]></Implementation>
+</Method>
+
 <Method name="Kvik">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.VKP.enu.Klant</ReturnType>
Index: APPS/EC/impl/KlantInstellingenServiceVanHoecke.cls.xml
===================================================================
diff -u -r30598 -r33035
--- APPS/EC/impl/KlantInstellingenServiceVanHoecke.cls.xml	(.../KlantInstellingenServiceVanHoecke.cls.xml)	(revision 30598)
+++ APPS/EC/impl/KlantInstellingenServiceVanHoecke.cls.xml	(.../KlantInstellingenServiceVanHoecke.cls.xml)	(revision 33035)
@@ -42,6 +42,7 @@
 	Do KlantIDs.Insert(##class(DOM.VKP.enu.Klant).Uytterhoeven())
 	Do KlantIDs.Insert(##class(DOM.VKP.enu.Klant).ThononKitchencenter())
 	Do KlantIDs.Insert(##class(DOM.VKP.enu.Klant).SeboKinteque())
+	Do KlantIDs.Insert(##class(DOM.VKP.enu.Klant).TheyssensKeukens())
 	// Nog enkele testklanten : 
 	Do KlantIDs.Insert(##class(DOM.VKP.enu.Klant).TestklantVanHoecke())
 	Do KlantIDs.Insert(##class(DOM.VKP.enu.Klant).Intracto())