Index: DOM/VKP/impl/DataM/DataMProductOrderlijn.cls.xml
===================================================================
diff -u -r47142 -r47988
--- DOM/VKP/impl/DataM/DataMProductOrderlijn.cls.xml	(.../DataMProductOrderlijn.cls.xml)	(revision 47142)
+++ DOM/VKP/impl/DataM/DataMProductOrderlijn.cls.xml	(.../DataMProductOrderlijn.cls.xml)	(revision 47988)
@@ -27,6 +27,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefToeleveringID">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..GeefPiece(27)
+]]></Implementation>
+</Method>
+
 <Method name="ZetProductID">
 <FormalSpec>ProductID:%String</FormalSpec>
 <Implementation><![CDATA[
Index: DOM/VKP/impl/DataM/DataMOrderlijn.cls.xml
===================================================================
diff -u -r42710 -r47988
--- DOM/VKP/impl/DataM/DataMOrderlijn.cls.xml	(.../DataMOrderlijn.cls.xml)	(revision 42710)
+++ DOM/VKP/impl/DataM/DataMOrderlijn.cls.xml	(.../DataMOrderlijn.cls.xml)	(revision 47988)
@@ -185,6 +185,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefPersistentRecord">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ^KOD(..GeefKlantNr(), "F", ..Order.GeefID(), ..LijnNr)
+]]></Implementation>
+</Method>
+
 <Method name="GeefAxInventTransId">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Quit ..GeefPiece(55)