Index: AXimpl/PM/Kenmerk/ConvertAll.cls.xml
===================================================================
diff -u -r54045 -r54529
--- AXimpl/PM/Kenmerk/ConvertAll.cls.xml	(.../ConvertAll.cls.xml)	(revision 54045)
+++ AXimpl/PM/Kenmerk/ConvertAll.cls.xml	(.../ConvertAll.cls.xml)	(revision 54529)
@@ -18,9 +18,15 @@
 <Private>1</Private>
 </Property>
 
+<Property name="UpdateOnly">
+<Type>%Boolean</Type>
+<InitialExpression>1</InitialExpression>
+</Property>
+
 <Method name="VerwijderAlles">
 <Description>
-D ##class(AXimpl.PM.Kenmerken.ConvertAll).%New().Verwerk()</Description>
+D ##class(AXimpl.PM.Kenmerk.ConvertAll).%New().Verwerk()
+D ##class(AXimpl.PM.Kenmerk.ConvertAll).VerwijderAlles()</Description>
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
 	Do ##class(Kenmerken).%KillExtent()
@@ -52,25 +58,24 @@
 <Method name="ConverteerOne">
 <FormalSpec>ProductID:%String,PRNr:%String,RecID:%String</FormalSpec>
 <Implementation><![CDATA[
-	If ##class(Kenmerken).%ExistsId(ProductID)
+	If '##class(Kenmerken).%ExistsId(ProductID)&&..UpdateOnly
 	{
 		Do ##class(Kenmerken).%DeleteId(ProductID)
+		Set GenTyp=$P($$GENTYP^HAD(PRNr),"\")
+		If GenTyp="TBX"
+		{   ;w !,PRNr," TBX"
+			Do ##class(ConvertTBX).%New().Converteer(ProductID,PRNr,RecID)
+		}
+		ElseIf GenTyp="LBX"
+		{	;w !,PRNr," LBX"
+			Do ##class(ConvertLBX).%New().Converteer(ProductID,PRNr,RecID)
+		}
+		ElseIf GenTyp="TAO"
+		{
+			;w !,PRNr," TAX"
+			Do ##class(ConvertTAX).%New().Converteer(ProductID,PRNr,RecID)
+		}
 	}
-
-	Set GenTyp=$P($$GENTYP^HAD(PRNr),"\")
-	If GenTyp="TBX"
-	{   w !,PRNr," TBX"
-		;Do ##class(ConvertTBX).%New().Converteer(ProductID,PRNr,RecID)
-	}
-	ElseIf GenTyp="LBX"
-	{	w !,PRNr," LBX"
-		Do ##class(ConvertLBX).%New().Converteer(ProductID,PRNr,RecID)
-	}
-	ElseIf GenTyp="TAO"
-	{
-		w !,PRNr," TAX"
-		Do ##class(ConvertTAX).%New().Converteer(ProductID,PRNr,RecID)
-	}
 ]]></Implementation>
 </Method>