Index: AXimpl/PM/Kenmerk/ConvertAll.cls.xml
===================================================================
diff -u -r56898 -r56906
--- AXimpl/PM/Kenmerk/ConvertAll.cls.xml	(.../ConvertAll.cls.xml)	(revision 56898)
+++ AXimpl/PM/Kenmerk/ConvertAll.cls.xml	(.../ConvertAll.cls.xml)	(revision 56906)
@@ -38,14 +38,18 @@
 <FormalSpec>UpdateOnly:%Boolean=1</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	// UpdateOnly=0 -> Alle factuurlijnen en alle data vernieuwen duurt meer dan 3 uur
+	// UpdateOnly=2 -> Alle factuurlijnen en alle niet bestaande kenmerken aanmaken
+	// UpdateOnly=1 -> Alle RECENTE factuurlijnen en alle niet bestaande kenmerken aanmaken
+	
 	Set ..UpdateOnly=UpdateOnly
 	quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="Verwerk">
 <Implementation><![CDATA[
-	Set ..itProduct=##class(AXProductIterator).%New($S(..UpdateOnly:$H-1,1:""))
+	Set ..itProduct=##class(AXProductIterator).%New($S(..UpdateOnly=1:$H-1,1:""))
 	#dim lbProductIDs as %List
 	#dim ProductID as %String
 	#dim RecID as %String
@@ -61,7 +65,7 @@
 		Set PRNr=$LI(lbProductIDs,2)
 		Set RecID=$LI(lbProductIDs,3)
 		Set InventTransID=$LI(lbProductIDs,4)
-		Do ..ConverteerOne(ProductID,PRNr,RecID,InventTransID)
+		Do ..ConverteerOneFromAX(ProductID,PRNr,RecID,InventTransID)
 	}
 ]]></Implementation>
 </Method>
@@ -89,36 +93,64 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ConverteerOne">
+<Method name="ConverteerOneFromAX">
 <FormalSpec>ProductID:%String,PRNr:%String,RecID:%String,InventTransID:%String</FormalSpec>
 <Implementation><![CDATA[
-	If '(##class(Kenmerken).%ExistsId(ProductID)&&..UpdateOnly)
-	{
-		Do ##class(Kenmerken).%DeleteId(ProductID)
+	If '(..BestaatLinkReeds(ProductID)&&..UpdateOnly)
+	{	
+		Do ..ConverteerOne(PRNr)
+		If ##class(Kenmerken).%ExistsId(PRNr)
+		{	
+			Do ..CreateAXLink(ProductID,PRNr,RecID,InventTransID)
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="BestaatLinkReeds">
+<FormalSpec>ProductID:%String</FormalSpec>
+<Implementation><![CDATA[
+	Set LinkID=""
+	&SQL(select top 1 ID into :LinkID from AXimpl_PM_Kenmerk.AXLink where ProductID=:ProductID )
+	Quit $L(LinkID)
+]]></Implementation>
+</Method>
+
+<Method name="ConverteerOne">
+<FormalSpec>PRNr</FormalSpec>
+<Implementation><![CDATA[
+	;w "."
+		Quit:##class(Kenmerken).%ExistsId(PRNr)
+		;w "+"
+		Do ##class(Kenmerken).%DeleteId(PRNr) ;  steeds herrekenen (laatste versie) ook al wordt het Admin product herbruikt voor een verschillend ProductID (is verschillend ConfigID)
 		Set GenTyp=$P($$GENTYP^HAD(PRNr),"\")
 		If GenTyp="TBX"
 		{   ;w !,PRNr," TBX"
-			Do ##class(ConvertTBX).%New().Converteer(ProductID,PRNr,RecID,InventTransID)
+			Do ##class(ConvertTBX).%New().Converteer(PRNr)
 		}
 		ElseIf GenTyp="LBX"
 		{	;w !,PRNr," LBX"
-			Do ##class(ConvertLBX).%New().Converteer(ProductID,PRNr,RecID,InventTransID)
+			Do ##class(ConvertLBX).%New().Converteer(PRNr)
 		}
 		ElseIf GenTyp="TAO"
 		{
 			;w !,PRNr," TAX"
-			Do ##class(ConvertTAX).%New().Converteer(ProductID,PRNr,RecID,InventTransID)
+			Do ##class(ConvertTAX).%New().Converteer(PRNr)
 		}
-	}
 ]]></Implementation>
 </Method>
 
-<Method name="Add">
-<ClassMethod>1</ClassMethod>
+<Method name="CreateAXLink">
 <FormalSpec>ProductID:%String,PRNr:%String,RecID:%String,InventTransID:%String</FormalSpec>
 <Implementation><![CDATA[
-	Set bl=..%New()
-	Do bl.ConverteerOne(ProductID,PRNr,RecID,InventTransID)
+	Do ##class(AXLink).%DeleteId(ProductID)
+	Set AXLink=##class(AXLink).%New()
+	Set AXLink.ProductID=ProductID
+	Do AXLink.ProductSetObjectId(PRNr)
+	Quit:'$isObject(AXLink.Product)
+	Set AXLink.RecID=RecID
+	Set AXLink.InventTransID=InventTransID
+	Do AXLink.Save()
 ]]></Implementation>
 </Method>
 </Class>
Index: AXimpl/PM/Kenmerk/AXLink.cls.xml
===================================================================
diff -u
--- AXimpl/PM/Kenmerk/AXLink.cls.xml	(revision 0)
+++ AXimpl/PM/Kenmerk/AXLink.cls.xml	(revision 56906)
@@ -0,0 +1,59 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AXimpl.PM.Kenmerk.AXLink">
+<ClassType>persistent</ClassType>
+<Super>TECH.Persistent</Super>
+
+<Property name="ProductID">
+<Type>%String</Type>
+</Property>
+
+<Property name="RecID">
+<Type>%String</Type>
+</Property>
+
+<Property name="InventTransID">
+<Type>%String</Type>
+</Property>
+
+<Property name="Product">
+<Type>Prod.Product</Type>
+</Property>
+
+<Index name="iAX">
+<Properties>ProductID</Properties>
+</Index>
+
+<Index name="iAdmin">
+<Properties>Product</Properties>
+</Index>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+<DataLocation>^AXimpl.PM.Kenmerk.AXLinkD</DataLocation>
+<DefaultData>AXLinkDefaultData</DefaultData>
+<IdLocation>^AXimpl.PM.Kenmerk.AXLinkD</IdLocation>
+<IndexLocation>^AXimpl.PM.Kenmerk.AXLinkI</IndexLocation>
+<StreamLocation>^AXimpl.PM.Kenmerk.AXLinkS</StreamLocation>
+<Data name="AXLinkDefaultData">
+<Value name="1">
+<Value>%%CLASSNAME</Value>
+</Value>
+<Value name="2">
+<Value>RecID</Value>
+</Value>
+<Value name="3">
+<Value>InventTransID</Value>
+</Value>
+<Value name="4">
+<Value>Product</Value>
+</Value>
+<Value name="5">
+<Value>ProductID</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: AXimpl/PM/Kenmerk/Kenmerken.cls.xml
===================================================================
diff -u -r56898 -r56906
--- AXimpl/PM/Kenmerk/Kenmerken.cls.xml	(.../Kenmerken.cls.xml)	(revision 56898)
+++ AXimpl/PM/Kenmerk/Kenmerken.cls.xml	(.../Kenmerken.cls.xml)	(revision 56906)
@@ -4,37 +4,17 @@
 <ClassType>persistent</ClassType>
 <Super>TECH.Persistent</Super>
 
-<Property name="ProductID">
-<Type>%String</Type>
+<Property name="Product">
+<Type>Prod.Product</Type>
 </Property>
 
-<Property name="RecID">
-<Type>%String</Type>
-</Property>
-
-<Property name="InventTransID">
-<Type>%String</Type>
-</Property>
-
 <Index name="PrimKey">
 <IdKey>1</IdKey>
 <PrimaryKey>1</PrimaryKey>
-<Properties>ProductID</Properties>
+<Properties>Product</Properties>
 <Unique>1</Unique>
 </Index>
 
-<Property name="VolgNummer">
-<Type>%Decimal</Type>
-</Property>
-
-<Index name="VolgNr">
-<Properties>VolgNummer</Properties>
-</Index>
-
-<Property name="Product">
-<Type>Prod.Product</Type>
-</Property>
-
 <Property name="BodemKleur">
 <Description>
 
Index: AXimpl/PM/Kenmerk/ConvertProductAbstract.cls.xml
===================================================================
diff -u -r56898 -r56906
--- AXimpl/PM/Kenmerk/ConvertProductAbstract.cls.xml	(.../ConvertProductAbstract.cls.xml)	(revision 56898)
+++ AXimpl/PM/Kenmerk/ConvertProductAbstract.cls.xml	(.../ConvertProductAbstract.cls.xml)	(revision 56906)
@@ -43,9 +43,9 @@
 </Method>
 
 <Method name="Converteer">
-<FormalSpec>QlikProductID:%String,PRNr:%String,RecID:%String,InventTransID:%String</FormalSpec>
-<ReturnType>WS.Vhisie4.QRcodeNaarKenmerkenResponse</ReturnType>
+<FormalSpec>PRNr:%String</FormalSpec>
 <Implementation><![CDATA[
+	;w " 1"
 	try {
 		#dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..ConfiguratorService.GeefOnverwerkteKenmerkenVanProduct(PRNr)
 		#dim arKenmerken As %ArrayOfDataTypes = ..AppsNaarEconConverter.ConverteerAppsNaarEcon(IngegevenKenmerken).ToArray()
@@ -56,14 +56,11 @@
 		}
 		
 	Quit:arKenmerken=""
-	
+	;w "2"
 	Set Kenmerken=##class(Kenmerken).%New()
-	Set Kenmerken.ProductID=QlikProductID
 	Do Kenmerken.ProductSetObjectId(PRNr)
 	Quit:'$isObject(Kenmerken.Product)
-	Set Kenmerken.RecID=RecID
-	Set Kenmerken.InventTransID=InventTransID
-	
+	;w "3"
 	#dim SetCount as %Integer=0
 	#dim Key as %String=""
 	While arKenmerken.GetNext(.Key)'=""
@@ -99,7 +96,8 @@
 		}
 	}
 	;Do DumpObject^%apiOBJ(Kenmerken)
-	Set Kenmerken.VolgNummer=$I(^AXimpl.PM.Kenmerk.KenmerkenD)
+	;Set Kenmerken.VolgNummer=$I(^AXimpl.PM.Kenmerk.KenmerkenD)
+	;w "4"
 	Do:SetCount Kenmerken.Save()
 	;Write:SetCount "."
 ]]></Implementation>