Index: DOM/OV/impl/DataM/DataMOrder.cls.xml
===================================================================
diff -u -r1076 -r1585
--- DOM/OV/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 1076)
+++ DOM/OV/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 1585)
@@ -120,6 +120,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefKlantReferentie">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit $Piece(..HoofdingData,"\",3)
+]]></Implementation>
+</Method>
+
 <Method name="GeefKlantNr">
 <ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[	Quit ..KlantNr