Index: zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfConverter.cls.xml
===================================================================
diff -u -r42113 -r43095
--- zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfConverter.cls.xml	(.../TestProductDixfConverter.cls.xml)	(revision 42113)
+++ zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfConverter.cls.xml	(.../TestProductDixfConverter.cls.xml)	(revision 43095)
@@ -45,22 +45,35 @@
 	Set AxTestProduct.ID = Product.Basis.%Id()
 	
 	// Te ontdekken velden:
-	// Set AxTestProduct. = 
-	#dim VoorraadBewegingObject As Prod.VoorraadBewegingRepository = ##class(Prod.VoorraadBewegingRepository).%New().GeefViaID(AxTestProduct.ID_"||"_$order(^PRHIST(AxTestProduct.ID,"")))
+	//#dim VoorraadBewegingObject As Prod.VoorraadBewegingRepository = ##class(Prod.VoorraadBewegingRepository).%New().GeefViaID(AxTestProduct.ID_"||"_$order(^PRHIST(AxTestProduct.ID,"")))
 	#dim Formatter As AXimpl.Formatter = ##class(AXimpl.Formatter).%New()
 	//Set AxTestProduct.Ontdek = Formatter.FormatDate(VoorraadBewegingObject.Datum) // Omzetting naar dd-mm-yyy, indien nodig als check.
-	Set AxTestProduct.Ontdek = VoorraadBewegingObject.Datum
+	//Set AxTestProduct.Ontdek = VoorraadBewegingObject.Datum
 	Set AxTestProduct.HoofdGroep = Product.Klassificatie.HoofdGroep
 	Set AxTestProduct.SubGroep = Product.Klassificatie.SubGroep
-	Break
 	Set AxTestProduct.IdentNrAlias = $$ListToPieces^vhLib(##class(Prod.Kenmerk.DataDefinitie).Get("OEI",Product.Basis.%Id(),"AliasI"),",")
+	Set AxTestProduct.ScanType = ..BepaalScanType(Product)  //Product.Basis.ScanType
 	
-	
 	Set ..AxTestProduct = AxTestProduct
 	Set ..LeverancierNummer = ""
 	Quit ..AxTestProduct
 ]]></Implementation>
 </Method>
+
+<Method name="BepaalScanType">
+<FormalSpec>Product:AX.Uitgaand.PM.Product.impl.Product</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim ScanType As %String = Product.Basis.ScanType
+	
+	If (##class(TECH.Integer).IsValid(ScanType)){
+		Set ScanType = "Limiet"
+	}
+	
+	Quit ScanType
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: zTryout/THB/AXdixf/TestProduct/TestProduct.cls.xml
===================================================================
diff -u -r41511 -r43095
--- zTryout/THB/AXdixf/TestProduct/TestProduct.cls.xml	(.../TestProduct.cls.xml)	(revision 41511)
+++ zTryout/THB/AXdixf/TestProduct/TestProduct.cls.xml	(.../TestProduct.cls.xml)	(revision 43095)
@@ -79,6 +79,10 @@
 <Property name="IdentNrAlias">
 <Type>%String</Type>
 </Property>
+
+<Property name="ScanType">
+<Type>%String</Type>
+</Property>
 </Class>
 
 
Index: zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfGenerator.cls.xml
===================================================================
diff -u -r41649 -r43095
--- zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfGenerator.cls.xml	(.../TestProductDixfGenerator.cls.xml)	(revision 41649)
+++ zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfGenerator.cls.xml	(.../TestProductDixfGenerator.cls.xml)	(revision 43095)
@@ -30,11 +30,11 @@
 	
 	// Hieronder kunnen de niet-default velden bijgevoegd worden (Zie ook klasse: zTryout.THB.AXdixf.TestProduct.TestProduct):
 	// Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "")
-	Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "Ontdek")
+	//Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "Ontdek")
 	Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "HoofdGroep")
 	Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "SubGroep")
 	Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "IdentNrAlias")
-	
+	Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "ScanType")
 
 	Set AXTestProductData.ScheidingsTeken = ";"	
 	Set AXTestProductData.Iterator = TestProductIterator
Index: zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductIterator.cls.xml
===================================================================
diff -u -r41511 -r43095
--- zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductIterator.cls.xml	(.../TestProductIterator.cls.xml)	(revision 41511)
+++ zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductIterator.cls.xml	(.../TestProductIterator.cls.xml)	(revision 43095)
@@ -43,9 +43,9 @@
 	#Dim SqlStatement as %String
 	Set SqlStatement = "SELECT ID FROM Prod.Product WHERE isnull(Gentype,'')='' and KortTekst not like 'GEN%'"
 	// Indien nodig is hieronder een filter voorzien om het resultaat te beperken tot overzichtelijk, voor debugging:
-	_" and ID in (1641390,1379217,1432226,1432225,1425096,1425095,682391,1359867,1168696,1168689,830507,1155640,161442,906194,709825,924268,"
-	_"1124771,1038806,1039173,1039208,1247980,353741,353743,353744,254245,254258,1259381,161441,665626,1067709,1067714,268026,"
-	_"1168369,668615,878186,878220,1169509,1194443,383880,830257)"
+	//_" and ID in (1641390,1379217,1432226,1432225,1425096,1425095,682391,1359867,1168696,1168689,830507,1155640,161442,906194,709825,924268,"
+	//_"1124771,1038806,1039173,1039208,1247980,353741,353743,353744,254245,254258,1259381,161441,665626,1067709,1067714,268026,"
+	//_"1168369,668615,878186,878220,1169509,1194443,383880,830257)"
 	Set ..ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement))
 ]]></Implementation>
 </Method>