Index: AX/Uitgaand/PM/KostPrijs/impl/KostPrijsDixfGenerator.cls.xml
===================================================================
diff -u -r46467 -r47251
--- AX/Uitgaand/PM/KostPrijs/impl/KostPrijsDixfGenerator.cls.xml	(.../KostPrijsDixfGenerator.cls.xml)	(revision 46467)
+++ AX/Uitgaand/PM/KostPrijs/impl/KostPrijsDixfGenerator.cls.xml	(.../KostPrijsDixfGenerator.cls.xml)	(revision 47251)
@@ -21,7 +21,7 @@
 		Do StartTimer^vhLib
 		#dim KostPrijsIterator As TECH.Iterator = ##class(AX.Uitgaand.PM.KostPrijs.impl.KostPrijsIterator).%New(,,Vestiging)
 		do ..Generate(KostPrijsIterator)
-		Write !,"Csv voor migratie 0612 KostPrijzen voor "_Vestiging_" is klaar. Aantal minuten: " 
+		Write !,"Csv voor migratie 0612_"_Vestiging_"_KostPrijzen is klaar. Aantal minuten: " 
 		write $$TimeFromStart^vhLib()/60
 	} Catch {
 		Write ##class(TECH.ExceptionHandler).Catch().ToString()
@@ -47,7 +47,7 @@
 
 	Set AXKostPrijsData.ScheidingsTeken = ";"	
 	Set AXKostPrijsData.Iterator = KostPrijsIterator
-	Set AXKostPrijsData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"0612KostPrijzen"_..Vestiging_".csv")
+	Set AXKostPrijsData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"0612_"_..Vestiging_"_KostPrijzen.csv")
 	
 	#dim BestandGenerator As APPS.common.Rapport.impl.BestandGenerator
 	Set BestandGenerator = ##class(APPS.common.Rapport.impl.BestandGenerator).%New()
Index: AX/Uitgaand/PM/impl/RunAll2a.cls.xml
===================================================================
diff -u -r47250 -r47251
--- AX/Uitgaand/PM/impl/RunAll2a.cls.xml	(.../RunAll2a.cls.xml)	(revision 47250)
+++ AX/Uitgaand/PM/impl/RunAll2a.cls.xml	(.../RunAll2a.cls.xml)	(revision 47251)
@@ -34,8 +34,8 @@
 	Do ##class(AX.Uitgaand.PM.BehoeftePlanning.impl.BehoeftePlanningDixfGenerator).%New().GenerateAll("VHBE") 						// 0609 - BEHOEFTEPLANNING MINMAX
 	Do ##class(AX.Uitgaand.PM.BehoeftePlanning.impl.BehoeftePlanningDixfGenerator).%New().GenerateAll("HLX") 						// 0609 - BEHOEFTEPLANNING MINMAX
 	Do ##class(AX.Uitgaand.PM.Assortimenten.impl.ProductCategorieGenerator).%New().ExportAll() 										// 0610 - PRODUCTCATEGORIEEN
-	Do ##class(AX.Uitgaand.PM.KostPrijs.impl.KostPrijsDixfGenerator).%New().GenerateAll("VHBE") 									// 0612 - KOSTPRIJZEN
-	Do ##class(AX.Uitgaand.PM.KostPrijs.impl.KostPrijsDixfGenerator).%New().GenerateAll("HLX") 										// 0612 - KOSTPRIJZEN
+	Do ##class(AX.Uitgaand.PM.KostPrijs.impl.KostPrijsDixfGenerator).%New().GenerateAll("VHBE") 									// 0612_VHBE_KOSTPRIJZEN *
+	Do ##class(AX.Uitgaand.PM.KostPrijs.impl.KostPrijsDixfGenerator).%New().GenerateAll("HLX") 										// 0612_HLX_KOSTPRIJZEN *
 	Do ##class(AX.Uitgaand.PM.LijstPrijs.impl.LijstPrijsDixfGenerator).%New().GenerateAll("VHBE") 									// 0613 - LIJSTPRIJZEN
 	Do ##class(AX.Uitgaand.PM.LijstPrijs.impl.LijstPrijsDixfGenerator).%New().GenerateAll("HLX") 									// 0613 - LIJSTPRIJZEN
 	Do ##class(AX.Uitgaand.VKP.CustomerCodexRelation.impl.CustomerCodexRelationDixfGenerator).%New().GenerateAll()					// 0615 - CUSTOMERCODEXRELATION
Index: AX/Uitgaand/PM/KostPrijs/impl/KostPrijsIterator.cls.xml
===================================================================
diff -u -r46500 -r47251
--- AX/Uitgaand/PM/KostPrijs/impl/KostPrijsIterator.cls.xml	(.../KostPrijsIterator.cls.xml)	(revision 46500)
+++ AX/Uitgaand/PM/KostPrijs/impl/KostPrijsIterator.cls.xml	(.../KostPrijsIterator.cls.xml)	(revision 47251)
@@ -3,11 +3,17 @@
 <Class name="AX.Uitgaand.PM.KostPrijs.impl.KostPrijsIterator">
 <Super>TECH.RegisteredObject,TECH.Iterator</Super>
 
-<Property name="MigratieProductVolgensAxEntiteitRepository">
-<Type>AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository</Type>
+<Property name="AxEntiteit">
+<Type>%String</Type>
+<InitialExpression>"KostPrijs"</InitialExpression>
 <Private>1</Private>
 </Property>
 
+<Property name="AxEntiteitLogger">
+<Type>AX.Uitgaand.PM.impl.LoggerProductenMigratie</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Vestiging">
 <Type>AXimpl.InterneFirmaInitialen</Type>
 <Private>1</Private>
@@ -34,15 +40,15 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>QueryAPI:TECH.Query.QueryAPI="",MigratieProductVolgensAxEntiteitRepository:AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository,Vestiging:AXimpl.InterneFirmaInitialen</FormalSpec>
+<FormalSpec>QueryAPI:TECH.Query.QueryAPI="",AxEntiteitLogger:AX.Uitgaand.PM.impl.LoggerProductenMigratie,Vestiging:AXimpl.InterneFirmaInitialen</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..Vestiging = Vestiging
-	Set ..MigratieProductVolgensAxEntiteitRepository = $$$Inject(MigratieProductVolgensAxEntiteitRepository,##class(AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository).%New())
-	Do ..MigratieProductVolgensAxEntiteitRepository.VerwijderVolgensAxEntiteit("KostPrijs", Vestiging)
+	Set ..AxEntiteitLogger = $$$Inject(AxEntiteitLogger,##class(AX.Uitgaand.PM.impl.LoggerProductenMigratie).%New())
+	Do ..AxEntiteitLogger.ResetLoggingAxEntiteit(..AxEntiteit, Vestiging)
 	Set ..QueryAPI = $$$Implementation(QueryAPI,##class(TECH.Context).Instance().GeefQueryAPI())
 	Do ..VoerUitQuery()
 	Set Filter = ##class(AX.Uitgaand.PM.KostPrijs.impl.KostPrijsIteratorFilter).%New(Vestiging)
@@ -80,16 +86,7 @@
 	Set KostPrijsProduct = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(..DynIterator.Next().GetData(1))
 	#dim ConvertedKostPrijsProduct As AXdixf.KostEnLijstPrijs.KostEnLijstPrijs = ..Converter.Convert(KostPrijsProduct, ..Vestiging)
 	
-	#dim ProductNr As %String = KostPrijsProduct.Basis.ProductNr
-	#dim AxEntiteit As %String = "KostPrijs"
-	#dim Vestiging As %String = ..Vestiging
-	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()
-	}	
+	Do ..AxEntiteitLogger.LogAxEntiteit(KostPrijsProduct.Basis.ProductNr, ..AxEntiteit, ..Vestiging)
 	
 	Quit ConvertedKostPrijsProduct
 ]]></Implementation>
Index: AX/Uitgaand/PM/KostPrijs/impl/KostPrijsIteratorFilter.cls.xml
===================================================================
diff -u -r46448 -r47251
--- AX/Uitgaand/PM/KostPrijs/impl/KostPrijsIteratorFilter.cls.xml	(.../KostPrijsIteratorFilter.cls.xml)	(revision 46448)
+++ AX/Uitgaand/PM/KostPrijs/impl/KostPrijsIteratorFilter.cls.xml	(.../KostPrijsIteratorFilter.cls.xml)	(revision 47251)
@@ -8,6 +8,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ServiceProductFilter">
+<Type>AX.Uitgaand.PM.impl.IsServiceProductFilter</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="SoprIteratorFilter">
 <Type>AX.Uitgaand.PM.impl.SoprIteratorFilter</Type>
 <Private>1</Private>
@@ -26,6 +31,7 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..Vestiging = Vestiging
+	Set ..ServiceProductFilter = ##class(AX.Uitgaand.PM.impl.IsServiceProductFilter).%New()
 	Set ..SoprIteratorFilter = ##class(AX.Uitgaand.PM.impl.SoprIteratorFilter).%New()
 	Set ..IsOrgaluxProductFilter = ##class(AX.Uitgaand.PM.impl.IsOrgaluxProductFilter).%New()
 	Quit $$$OK
@@ -39,7 +45,7 @@
 	#dim IsValid As %Boolean = $$$False
 	#dim Product As AX.Uitgaand.PM.Product.impl.Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(Item.GetData(1))
 	
-	If ..SoprIteratorFilter.IsValid(Product) {
+	If (..SoprIteratorFilter.IsValid(Product) && $$$Not(..ServiceProductFilter.IsValid(Product))) {
 		Set IsValid = $$$True
 	}