Index: DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r1775 -r1921
--- DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 1775)
+++ DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 1921)
@@ -359,5 +359,11 @@
 <Implementation><![CDATA[	Quit $Piece(..DataJ,"\",3)
 ]]></Implementation>
 </Method>
+
+<Method name="GeefLeverancier">
+<ReturnType>DOM.LEV.Leverancier</ReturnType>
+<Implementation><![CDATA[	Quit ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefLeverancier($Piece(..DataJ,"\",1))
+]]></Implementation>
+</Method>
 </Class>
 </Export>