Index: AX/Uitgaand/PM/UOMConversie/impl/UOMConversieIteratorFilter.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/PM/UOMConversie/impl/UOMConversieIteratorFilter.cls.xml	(revision 0)
+++ AX/Uitgaand/PM/UOMConversie/impl/UOMConversieIteratorFilter.cls.xml	(revision 42749)
@@ -0,0 +1,51 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.PM.UOMConversie.impl.UOMConversieIteratorFilter">
+<Super>TECH.RegisteredObject,TECH.Filter</Super>
+
+<Property name="IsValid">
+<Type>%Boolean</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="AxProductConvertor">
+<Type>AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..AxProductConvertor = ##class(AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="IsValid">
+<FormalSpec>Item:TECH.ResultSet</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim IsValid As %Boolean = $$$False
+	#dim ConvertedAxProduct As AX.Uitgaand.PM.impl.Convertor.Sopr.AxProduct
+	#dim Product As AX.Uitgaand.PM.Product.impl.Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(Item.GetData(1))
+	#dim IsBlumProduct As %Boolean = (Product.Basis.LeverancierNummer = "5005")
+	
+	If (IsBlumProduct = 1){
+		Set ConvertedAxProduct = ..AxProductConvertor.AdminNaarAx(Product.Basis.ProductNr)
+		If ((ConvertedAxProduct.IsSoprInAx = 1) && (ConvertedAxProduct.IsSoprInCache = 1) || (ConvertedAxProduct.IsSoprInAx = 0) && (ConvertedAxProduct.IsSoprInCache = 0)){
+			Set IsValid = $$$True
+		} 
+	} Else {
+		Set IsValid = $$$True
+	}
+	
+	Quit IsValid
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/PM/UOMConversie/impl/UOMConversieIterator.cls.xml
===================================================================
diff -u -r42745 -r42749
--- AX/Uitgaand/PM/UOMConversie/impl/UOMConversieIterator.cls.xml	(.../UOMConversieIterator.cls.xml)	(revision 42745)
+++ AX/Uitgaand/PM/UOMConversie/impl/UOMConversieIterator.cls.xml	(.../UOMConversieIterator.cls.xml)	(revision 42749)
@@ -28,6 +28,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="DynIterator">
+<Type>TECH.Iterator</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Product">
 <Type>AX.Uitgaand.PM.Product.impl.Product</Type>
 <Private>1</Private>
@@ -59,6 +64,9 @@
 	Set ..QueryAPI = $$$Implementation(QueryAPI,##class(TECH.Context).Instance().GeefQueryAPI())
 	Set ..Utils = $$$Inject(Utils,##class(AXimpl.Utils).%New())
 	Do ..VoerUitQuery()
+	Set Filter = ##class(AX.Uitgaand.PM.UOMConversie.impl.UOMConversieIteratorFilter).%New()
+	Set ResultSetIterator = ##class(TECH.ResultSetIterator).%New(..ResultSet)
+	Set ..DynIterator = ##class(TECH.DynamicIterator).%New(ResultSetIterator,,Filter)
 	Set ..Converter = ##class(AX.Uitgaand.PM.UOMConversie.impl.UOMConversieDixfConverter).%New()
 	Quit $$$OK
 ]]></Implementation>
@@ -79,10 +87,10 @@
 	#Dim HeeftVolgendeLijnVoorProduct, HeeftVolgendProduct As %Boolean = $$$False
 	If (..HuidigeLijnVanProduct > 0) {
 		Set HeeftVolgendeLijnVoorProduct = $$$True
-	} ElseIf (..ResultSet.Next() > 0) {
+	} ElseIf (..DynIterator.HasNext() > 0) {
 		Set HeeftVolgendProduct = $$$True
 		
-		Set ..Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(..ResultSet.GetData(1))
+		Set ..Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(..DynIterator.Next().GetData(1))
 		Set ..AantalLijnenPerProduct = ..BepaalAantalLijnenPerProduct()
 		Set ..HuidigeLijnVanProduct = ..AantalLijnenPerProduct
 		Set ..Piece = 1