Index: BL/Legacy/EWORDS6.cls.xml
===================================================================
diff -u -r29059 -r47790
--- BL/Legacy/EWORDS6.cls.xml	(.../EWORDS6.cls.xml)	(revision 29059)
+++ BL/Legacy/EWORDS6.cls.xml	(.../EWORDS6.cls.xml)	(revision 47790)
@@ -119,6 +119,14 @@
 <Implementation><![CDATA[	Quit (PersonalityID=CumulPersonalityID)   ; Geen combinatie mogelijk vanhoecke en noteborn orders.
 ]]></Implementation>
 </Method>
+
+<Method name="GeefKlantNummer">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>OrderNummer:%String,Delimiter:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[  	Quit $Piece(^KO1(OrderNummer, "F"), Delimiter)
+]]></Implementation>
+</Method>
 </Class>