Index: zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfGenerator.cls.xml
===================================================================
diff -u -r43095 -r43141
--- zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfGenerator.cls.xml	(.../TestProductDixfGenerator.cls.xml)	(revision 43095)
+++ zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfGenerator.cls.xml	(.../TestProductDixfGenerator.cls.xml)	(revision 43141)
@@ -35,6 +35,7 @@
 	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")
+	Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "LinkType")
 
 	Set AXTestProductData.ScheidingsTeken = ";"	
 	Set AXTestProductData.Iterator = TestProductIterator
Index: zTryout/THB/AXdixf/TestProduct/TestProduct.cls.xml
===================================================================
diff -u -r43095 -r43141
--- zTryout/THB/AXdixf/TestProduct/TestProduct.cls.xml	(.../TestProduct.cls.xml)	(revision 43095)
+++ zTryout/THB/AXdixf/TestProduct/TestProduct.cls.xml	(.../TestProduct.cls.xml)	(revision 43141)
@@ -83,6 +83,10 @@
 <Property name="ScanType">
 <Type>%String</Type>
 </Property>
+
+<Property name="LinkType">
+<Type>%String</Type>
+</Property>
 </Class>
 
 
Index: zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfConverter.cls.xml
===================================================================
diff -u -r43095 -r43141
--- zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfConverter.cls.xml	(.../TestProductDixfConverter.cls.xml)	(revision 43095)
+++ zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfConverter.cls.xml	(.../TestProductDixfConverter.cls.xml)	(revision 43141)
@@ -52,28 +52,14 @@
 	Set AxTestProduct.HoofdGroep = Product.Klassificatie.HoofdGroep
 	Set AxTestProduct.SubGroep = Product.Klassificatie.SubGroep
 	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.ScanType = Product.Basis.ScanType
+	Set AxTestProduct.LinkType = Product.Basis.LinkType
 	
 	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>