Index: APPS/common/impl/KlantInstellingenService.cls.xml
===================================================================
diff -u -r32831 -r34729
--- APPS/common/impl/KlantInstellingenService.cls.xml	(.../KlantInstellingenService.cls.xml)	(revision 32831)
+++ APPS/common/impl/KlantInstellingenService.cls.xml	(.../KlantInstellingenService.cls.xml)	(revision 34729)
@@ -41,7 +41,7 @@
 <Method name="GebruiktKlantOrderNummer">
 <FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (KlantID = ##class(DOM.VKP.enu.Klant).SFS())
+<Implementation><![CDATA[	Quit ##class(TECH.StringUtils).Equals(KlantID, ##class(DOM.VKP.enu.Klant).SFS(), ##class(DOM.VKP.enu.Klant).HaefeleBelgie())
 ]]></Implementation>
 </Method>
 
@@ -55,7 +55,7 @@
 <Method name="WilOrderTotaalZienOpOrderBevestiging">
 <FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (KlantID = ##class(DOM.VKP.enu.Klant).HaefeleBE())
+<Implementation><![CDATA[	Quit (KlantID = ##class(DOM.VKP.enu.Klant).HaefeleBelgie())
 ]]></Implementation>
 </Method>