Index: DOM/VKP/Order.cls.xml
===================================================================
diff -u -r53113 -r54024
--- DOM/VKP/Order.cls.xml	(.../Order.cls.xml)	(revision 53113)
+++ DOM/VKP/Order.cls.xml	(.../Order.cls.xml)	(revision 54024)
@@ -273,6 +273,16 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="GeefBeloofdeLeverdatum">
+<Abstract>1</Abstract>
+<ReturnType>%Date</ReturnType>
+</Method>
+
+<Method name="ZetBeloofdeLeverdatum">
+<Abstract>1</Abstract>
+<FormalSpec>Value:%Date</FormalSpec>
+</Method>
+
 <Method name="IsGelinktAanToelevering">
 <Abstract>1</Abstract>
 <ReturnType>%Boolean</ReturnType>
Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml
===================================================================
diff -u -r53594 -r54024
--- DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 53594)
+++ DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 54024)
@@ -518,6 +518,20 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefBeloofdeLeverdatum">
+<ReturnType>%Date</ReturnType>
+<Implementation><![CDATA[	Quit ..HoofdingData.GeefPiece(16)
+]]></Implementation>
+</Method>
+
+<Method name="ZetBeloofdeLeverdatum">
+<FormalSpec>Value:%Date</FormalSpec>
+<Implementation><![CDATA[
+	Do ..HoofdingData.ZetPiece(16,Value)
+	Do ..%SetModified(1)
+]]></Implementation>
+</Method>
+
 <Method name="GeefOrderLijnIterator">
 <ReturnType>TECH.Iterator</ReturnType>
 <Implementation><![CDATA[
Index: vhTest/Mock/DOM/VKP/Order.cls.xml
===================================================================
diff -u -r53113 -r54024
--- vhTest/Mock/DOM/VKP/Order.cls.xml	(.../Order.cls.xml)	(revision 53113)
+++ vhTest/Mock/DOM/VKP/Order.cls.xml	(.../Order.cls.xml)	(revision 54024)
@@ -76,6 +76,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefBeloofdeLeverdatum">
+<ReturnType>%Date</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefBeloofdeLeverdatum")
+]]></Implementation>
+</Method>
+
 <Method name="GeefBijhorendeBackorderLijnCodes">
 <FormalSpec>LijnCode:%String</FormalSpec>
 <ReturnType>%ListOfDataTypes</ReturnType>
@@ -443,6 +449,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetBeloofdeLeverdatum">
+<FormalSpec>Value:%Date</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetBeloofdeLeverdatum",Value)
+]]></Implementation>
+</Method>
+
 <Method name="ZetCommissieReferentie">
 <FormalSpec>value:%String</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("ZetCommissieReferentie",value)