Index: vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r47498 -r47538
--- vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 47498)
+++ vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 47538)
@@ -14,6 +14,12 @@
 <Type>%Integer</Type>
 </Property>
 
+<Method name="IsBasisProduct">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="GeefKlasId">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Quit ""
@@ -22,8 +28,7 @@
 
 <Method name="ZetKlasId">
 <FormalSpec>KlasId:%String</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="GeefWerkvloerGrootteNetto">
Index: DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r47498 -r47538
--- DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 47498)
+++ DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 47538)
@@ -438,6 +438,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsBasisProduct">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..Data0.GeefPiece(3)'?4.N
+]]></Implementation>
+</Method>
+
 <Method name="GeefStockType">
 <ReturnType>DOM.PM.enu.StockType</ReturnType>
 <Implementation><![CDATA[
Index: vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r47498 -r47538
--- vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 47498)
+++ vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 47538)
@@ -382,6 +382,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsBasisProduct">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("IsBasisProduct")
+]]></Implementation>
+</Method>
+
 <Method name="IsInUitverkoop">
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("IsInUitverkoop")