Index: DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r937 -r939
--- DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 937)
+++ DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 939)
@@ -1,10 +1,10 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408U)" ts="2011-03-14 12:31:37">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-03-14 14:48:51">
 <Class name="DOM.PM.impl.DataM.DataMProduct">
 <IncludeCode>BL.Kenm.Common</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
-<TimeChanged>62164,45096.985816</TimeChanged>
+<TimeChanged>62164,53409.503372</TimeChanged>
 <TimeCreated>62159,61822.534455</TimeCreated>
 <ClassDefinitionError>0</ClassDefinitionError>
 
@@ -185,6 +185,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsStockOverKinderen">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit $data(^PRBS("BS",..ProductNummer))>0
+]]></Implementation>
+</Method>
+
 <Method name="GeefMultipleGroepen">
 <ReturnType>TECH.Iterator</ReturnType>
 <Implementation><![CDATA[
@@ -204,5 +210,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="463500986"/>
+<Checksum value="2979579850"/>
 </Export>