Index: DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r29059 -r31097
--- DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 29059)
+++ DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 31097)
@@ -241,6 +241,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefTelbaar">
+<ReturnType>%Decimal</ReturnType>
+<Implementation><![CDATA[	quit $Piece(..Data1, "\", 7)
+]]></Implementation>
+</Method>
+
 <Method name="GeefKostBouwsteenLijst">
 <FormalSpec>Type:%String,IsSchaduw:%Boolean</FormalSpec>
 <Private>1</Private>