Index: AX/Uitgaand/PM/TMSInventEnabled/impl/TMSInventEnabledIterator.cls.xml
===================================================================
diff -u -r43163 -r46267
--- AX/Uitgaand/PM/TMSInventEnabled/impl/TMSInventEnabledIterator.cls.xml	(.../TMSInventEnabledIterator.cls.xml)	(revision 43163)
+++ AX/Uitgaand/PM/TMSInventEnabled/impl/TMSInventEnabledIterator.cls.xml	(.../TMSInventEnabledIterator.cls.xml)	(revision 46267)
@@ -3,6 +3,11 @@
 <Class name="AX.Uitgaand.PM.TMSInventEnabled.impl.TMSInventEnabledIterator">
 <Super>TECH.RegisteredObject,TECH.Iterator</Super>
 
+<Property name="MigratieProductVolgensAxEntiteitRepository">
+<Type>AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="DynIterator">
 <Type>TECH.Iterator</Type>
 <Private>1</Private>
@@ -24,12 +29,14 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>QueryAPI:TECH.Query.QueryAPI=""</FormalSpec>
+<FormalSpec>QueryAPI:TECH.Query.QueryAPI="",MigratieProductVolgensAxEntiteitRepository:AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
+	Set ..MigratieProductVolgensAxEntiteitRepository = $$$Inject(MigratieProductVolgensAxEntiteitRepository,##class(AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository).%New())
+	Do ..MigratieProductVolgensAxEntiteitRepository.VerwijderVolgensAxEntiteit("TMSInventEnabled", "VHBE")
 	Set ..QueryAPI = $$$Implementation(QueryAPI,##class(TECH.Context).Instance().GeefQueryAPI())
 	Do ..VoerUitQuery()
 	Set Filter = ##class(AX.Uitgaand.PM.TMSInventEnabled.impl.TMSInventEnabledIteratorFilter).%New()
@@ -63,6 +70,18 @@
 <Implementation><![CDATA[
 	set Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(..DynIterator.Next().GetData(1))
 	#dim ConvertedProduct As AXdixf.TMSInventEnabled.TMSInventEnabled = ..Converter.Convert(Product)
+	
+	#dim ProductNr As %String = Product.Basis.ProductNr
+	#dim AxEntiteit As %String = "TMSInventEnabled"
+	#dim Vestiging As %String = "VHBE"
+	If $$$Not(..MigratieProductVolgensAxEntiteitRepository.BestaatVolgensProductFilter(ProductNr, AxEntiteit, Vestiging)) {
+		Set MigratieProductVolgensAxEntiteit = ##class(AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteit).%New()
+		Set MigratieProductVolgensAxEntiteit.AxEntiteit = AxEntiteit
+		Set MigratieProductVolgensAxEntiteit.ProductNr = ProductNr
+		Set MigratieProductVolgensAxEntiteit.Vestiging = Vestiging
+		Do MigratieProductVolgensAxEntiteit.Save()
+	}
+	
 	Quit ConvertedProduct
 ]]></Implementation>
 </Method>