Index: APPS/common/impl/KlantInstellingenService.cls.xml
===================================================================
diff -u -r65150 -r65383
--- APPS/common/impl/KlantInstellingenService.cls.xml	(.../KlantInstellingenService.cls.xml)	(revision 65150)
+++ APPS/common/impl/KlantInstellingenService.cls.xml	(.../KlantInstellingenService.cls.xml)	(revision 65383)
@@ -225,6 +225,13 @@
 <Implementation><![CDATA[	Quit $$$False
 ]]></Implementation>
 </Method>
+
+<Method name="MagKlantTAORLadeKleurOudZwartBestellen">
+<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KlantID = ##class(DOM.VKP.enu.Klant).OlBeslag())
+]]></Implementation>
+</Method>
 </Class>