Index: vhConsistency/Checks/NietStockTheoretischOnderNul.cls.xml
===================================================================
diff -u -r29059 -r36296
--- vhConsistency/Checks/NietStockTheoretischOnderNul.cls.xml	(.../NietStockTheoretischOnderNul.cls.xml)	(revision 29059)
+++ vhConsistency/Checks/NietStockTheoretischOnderNul.cls.xml	(.../NietStockTheoretischOnderNul.cls.xml)	(revision 36296)
@@ -1,6 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhConsistency.Checks.NietStockTheoretischOnderNul">
+<IncludeCode>Prod.Product</IncludeCode>
 <Super>vhConsistency.Check</Super>
 
 <Method name="VoerUit">
@@ -9,10 +10,11 @@
 	#dim Li, Ti As %Integer = 1
 	#dim Link, Text
 	
+	#dim Filter	As %String = "($$Get^PRODUKT(Item,"_$$$NONAktief_") '= 1)"
 	#dim Iterator As TECH.Iterator = ##class(DOM.DomeinContext).Instance().GeefProductBeheerAPI().GeefProductIDIterator()
-	While (Iterator.HasNext())
-	{
-		#dim ProductID As %String = Iterator.Next()
+	Set ActiefProductIterator = ##class(TECH.DynamicIterator).%New(Iterator,"",Filter)
+	While (ActiefProductIterator.HasNext()) {
+		#dim ProductID As %String = ActiefProductIterator.Next()
 		#dim Product As DOM.PM.Product = ##class(DOM.DomeinContext).Instance().GeefProductAPI().GeefProduct(ProductID)
 		
 		If (Product.GeefStockType() = ##class(DOM.PM.enu.StockType).NietStock())