Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml
===================================================================
diff -u -r58744 -r58776
--- DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 58744)
+++ DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 58776)
@@ -1258,6 +1258,46 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefIngegevenDoorUserNaam">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..HoofdingData.GeefPiece(61)
+]]></Implementation>
+</Method>
+
+<Method name="ZetIngegevenDoorUserNaam">
+<FormalSpec>IngegevenDoorUserNaam:%String</FormalSpec>
+<Implementation><![CDATA[	Do ..HoofdingData.ZetPiece(61,IngegevenDoorUserNaam)
+]]></Implementation>
+</Method>
+
+<Method name="ZetIngegevenDoorUserNaamEnSave">
+<FormalSpec>IngegevenDoorUserNaam:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ..ZetIngegevenDoorUserNaam(IngegevenDoorUserNaam)
+	Do ..HoofdingData.Save()
+]]></Implementation>
+</Method>
+
+<Method name="GeefKlantDisplayNaam">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..HoofdingData.GeefPiece(62)
+]]></Implementation>
+</Method>
+
+<Method name="ZetKlantDisplayNaam">
+<FormalSpec>KlantDisplayNaam:%String</FormalSpec>
+<Implementation><![CDATA[	Do ..HoofdingData.ZetPiece(62,KlantDisplayNaam)
+]]></Implementation>
+</Method>
+
+<Method name="ZetKlantDisplayNaamEnSave">
+<FormalSpec>KlantDisplayNaam:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ..ZetKlantDisplayNaam(KlantDisplayNaam)
+	Do ..HoofdingData.Save()
+]]></Implementation>
+</Method>
+
 <Method name="GeefEindPersonality">
 <ReturnType>DOM.common.Personality</ReturnType>
 <Implementation><![CDATA[	Quit ..EindPersonalityBepaler.GeefEindPersonality(..GeefOorsprongKetting(), ..GeefKlantID())