Index: AX/Uitgaand/PM/impl/RunAll2a.cls.xml
===================================================================
diff -u -r46878 -r47203
--- AX/Uitgaand/PM/impl/RunAll2a.cls.xml	(.../RunAll2a.cls.xml)	(revision 46878)
+++ AX/Uitgaand/PM/impl/RunAll2a.cls.xml	(.../RunAll2a.cls.xml)	(revision 47203)
@@ -26,8 +26,8 @@
 	Do ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfGenerator).%New().GenerateAll("HLX") 						// 0606 - AANKOOPPRIJZEN LEVERANCIERS
 	Do ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevKortingDixfGenerator).%New().GenerateAll("VHBE") 				// 0606 - KORTINGEN LEVERANCIERS
 	Do ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevKortingDixfGenerator).%New().GenerateAll("HLX") 				// 0606 - KORTINGEN LEVERANCIERS
-	Do ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevCifDixfGenerator).%New().GenerateAll("VHBE") 					// 0606 - CIF % LEVERANCIERS
-	Do ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevCifDixfGenerator).%New().GenerateAll("HLX") 					// 0606 - CIF % LEVERANCIERS
+	Do ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevCifDixfGenerator).%New().GenerateAll("VHBE") 					// 0606_VHBE_AANKOOPPRIJZEN LEVERANCIERS CIF%
+	Do ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevCifDixfGenerator).%New().GenerateAll("HLX") 					// 0606_HLX_AANKOOPPRIJZEN LEVERANCIERS CIF%
 	Do ##class(AX.Uitgaand.PM.VestSpecOrdInst.impl.VestSpecOrdInstDixfGenerator).%New().GenerateAll("VHBE") 						// 0607 - VESTIGINGSPECIFIEKE ORDERINSTELLINGEN
 	Do ##class(AX.Uitgaand.PM.VestSpecOrdInst.impl.VestSpecOrdInstDixfGenerator).%New().GenerateAll("HLX") 							// 0607 - VESTIGINGSPECIFIEKE ORDERINSTELLINGEN
 	Do ##class(AX.Uitgaand.PM.UOMConversie.impl.UOMConversieDixfGenerator).%New().GenerateAll() 									// 0608 - UOMCONVERSIE
Index: vhUnitTest/AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifDixfConverter/Test.cls.xml
===================================================================
diff -u -r46087 -r47203
--- vhUnitTest/AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 46087)
+++ vhUnitTest/AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 47203)
@@ -36,13 +36,13 @@
 	#dim ConvertedProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = Converter.Convert(AxProduct,"1",Firma)
 	
 	Do $$$AssertEquals(ConvertedProduct.AccountCode ,"Tabel")
-	Do $$$AssertEquals(ConvertedProduct.Amount ,"")
 	Do $$$AssertEquals(ConvertedProduct.FromDate  ,"02/01/2017")
 	Do $$$AssertEquals(ConvertedProduct.InventDimId  ,"AllBlank")
 	Do $$$AssertEquals(ConvertedProduct.ItemCode  ,"Tabel")
 	Do $$$AssertEquals(ConvertedProduct.JournalName  ,"HOJ")
-	Do $$$AssertEquals(ConvertedProduct.JournalNum  ,"00000020")
+	Do $$$AssertEquals(ConvertedProduct.JournalNum  ,"00000030")
 	Do $$$AssertEquals(ConvertedProduct.Module  ,"Leverancier")
+	Do $$$AssertEquals(ConvertedProduct.Percent1  ,"")
 	Do $$$AssertEquals(ConvertedProduct.Percent2  ,"")
 	Do $$$AssertEquals(ConvertedProduct.QuantityAmountFrom  ,"")
 	Do $$$AssertEquals(ConvertedProduct.QuantityAmountTo  ,"")
@@ -74,7 +74,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Percent1 is CifPerc waarvan het punt omgezet is naar een komma">
+<Method name="Test: Amount is CifPerc waarvan het punt omgezet is naar een komma">
 <Implementation><![CDATA[
 	#dim LegacyProductAPIStub As vhTest.Mock.DOM.PM.LegacyProductAPI = ##class(vhTest.Mock.DOM.PM.LegacyProductAPI).MockInstance()
 	do LegacyProductAPIStub.IndienMethodCall("GeefLeverancierNummer",$$$ElkeWaarde).DanReturn(6332)
@@ -88,7 +88,7 @@
 	
 	#dim ConvertedProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = Converter.Convert(AxProduct,"1",Firma)
 	
-	Do $$$AssertEquals(ConvertedProduct.Percent1,"5,25")
+	Do $$$AssertEquals(ConvertedProduct.Amount,"5,25")
 ]]></Implementation>
 </Method>
 
Index: AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifIterator.cls.xml
===================================================================
diff -u -r46441 -r47203
--- AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifIterator.cls.xml	(.../AankoopPrijzenLevCifIterator.cls.xml)	(revision 46441)
+++ AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifIterator.cls.xml	(.../AankoopPrijzenLevCifIterator.cls.xml)	(revision 47203)
@@ -3,11 +3,17 @@
 <Class name="AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevCifIterator">
 <Super>TECH.RegisteredObject,TECH.Iterator</Super>
 
-<Property name="MigratieProductVolgensAxEntiteitRepository">
-<Type>AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository</Type>
+<Property name="AxEntiteit">
+<Type>%String</Type>
+<InitialExpression>"AankoopPrijzenLevCif"</InitialExpression>
 <Private>1</Private>
 </Property>
 
+<Property name="AxEntiteitLogger">
+<Type>AX.Uitgaand.PM.impl.LoggerProductenMigratie</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="LineNum">
 <Type>%Integer</Type>
 <Private>1</Private>
@@ -39,14 +45,14 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>QueryAPI:TECH.Query.QueryAPI="",Vestiging:AXimpl.InterneFirmaInitialen,MigratieProductVolgensAxEntiteitRepository:AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository</FormalSpec>
+<FormalSpec>QueryAPI:TECH.Query.QueryAPI="",Vestiging:AXimpl.InterneFirmaInitialen,AxEntiteitLogger:AX.Uitgaand.PM.impl.LoggerProductenMigratie</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("AankoopPrijzenLevCif", Vestiging)
+	Set ..AxEntiteitLogger = $$$Inject(AxEntiteitLogger,##class(AX.Uitgaand.PM.impl.LoggerProductenMigratie).%New())
+	Do ..AxEntiteitLogger.ResetLoggingAxEntiteit(..AxEntiteit, Vestiging)
 	Set ..QueryAPI = $$$Inject(QueryAPI,##class(TECH.Context).Instance().GeefQueryAPI())
 	Set ..Vestiging = Vestiging
 	
@@ -85,16 +91,7 @@
 	Set ..LineNum = ..LineNum + 1
 	#dim ConvertedProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = ..Converter.Convert(Product,..LineNum, ..Vestiging)
 	
-	#dim ProductNr As %String = Product.Basis.ProductNr
-	#dim AxEntiteit As %String = "AankoopPrijzenLevCif"
-	#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(Product.Basis.ProductNr, ..AxEntiteit, ..Vestiging)
 	
 	Quit ConvertedProduct
 ]]></Implementation>
Index: AX/Uitgaand/PM/impl/LoggerProductenMigratie.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/PM/impl/LoggerProductenMigratie.cls.xml	(revision 0)
+++ AX/Uitgaand/PM/impl/LoggerProductenMigratie.cls.xml	(revision 47203)
@@ -0,0 +1,45 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.PM.impl.LoggerProductenMigratie">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="MigratieProductVolgensAxEntiteitRepository">
+<Type>AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>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())
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="ResetLoggingAxEntiteit">
+<FormalSpec>AxEntiteit:%String,Vestiging:AXimpl.InterneFirmaInitialen</FormalSpec>
+<Implementation><![CDATA[	Do ..MigratieProductVolgensAxEntiteitRepository.VerwijderVolgensAxEntiteit(AxEntiteit, Vestiging)
+]]></Implementation>
+</Method>
+
+<Method name="LogAxEntiteit">
+<FormalSpec>ProductNr:%String,AxEntiteit:%String,Vestiging:AXimpl.InterneFirmaInitialen</FormalSpec>
+<Implementation><![CDATA[
+	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()
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifDixfGenerator.cls.xml
===================================================================
diff -u -r45157 -r47203
--- AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifDixfGenerator.cls.xml	(.../AankoopPrijzenLevCifDixfGenerator.cls.xml)	(revision 45157)
+++ AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifDixfGenerator.cls.xml	(.../AankoopPrijzenLevCifDixfGenerator.cls.xml)	(revision 47203)
@@ -21,7 +21,7 @@
 		Do StartTimer^vhLib
 		#dim ProductIterator As TECH.Iterator = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevCifIterator).%New(,Vestiging)
 		do ..Generate(ProductIterator)
-		Write !,"Csv voor migratie 0606 AankoopPrijzenLevCIF% voor "_Vestiging_" is klaar. Aantal minuten: "
+		Write !,"Csv voor migratie 0606_"_Vestiging_"_AankoopPrijzenLevCIF% is klaar. Aantal minuten: "
 		Write $$TimeFromStart^vhLib()/60
 	} Catch {
 		Write ##class(TECH.ExceptionHandler).Catch().ToString()
@@ -58,7 +58,7 @@
 	
 	Set AXProductData.ScheidingsTeken = ";"	
 	Set AXProductData.Iterator = ProductIterator
-	Set AXProductData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"0606AankoopPrijzenLevCif"_..Vestiging_".csv")
+	Set AXProductData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"0606_"_..Vestiging_"_AankoopPrijzenLevCif.csv")
 	
 	#dim BestandGenerator As APPS.common.Rapport.impl.BestandGenerator
 	Set BestandGenerator = ##class(APPS.common.Rapport.impl.BestandGenerator).%New()
Index: AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifDixfConverter.cls.xml
===================================================================
diff -u -r46087 -r47203
--- AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifDixfConverter.cls.xml	(.../AankoopPrijzenLevCifDixfConverter.cls.xml)	(revision 46087)
+++ AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevCifDixfConverter.cls.xml	(.../AankoopPrijzenLevCifDixfConverter.cls.xml)	(revision 47203)
@@ -67,17 +67,17 @@
 	
 	Set ..AxProduct.AccountCode = "Tabel"
 	Set ..AxProduct.AccountRelation = ..BepaalAccountRelation(Product,Vestiging)
-	Set ..AxProduct.Amount = ""
+	Set ..AxProduct.Amount = $Translate(Product.Prijs.CifPerc,".",",")
 	Set ..AxProduct.Currency = Product.Prijs.MuntAankoop.MuntCode
 	Set ..AxProduct.FromDate = "02/01/2017"
 	Set ..AxProduct.InventDimId = "AllBlank"
 	Set ..AxProduct.ItemCode = "Tabel"
 	Set ..AxProduct.ItemRelation = ..BepaalItemRelation(Product)
 	Set ..AxProduct.JournalName = "HOJ"
-	Set ..AxProduct.JournalNum = "00000020"
+	Set ..AxProduct.JournalNum = "00000030"
 	Set ..AxProduct.LineNum = LineNum
 	Set ..AxProduct.Module = "Leverancier"
-	Set ..AxProduct.Percent1 = $Translate(Product.Prijs.CifPerc,".",",")
+	Set ..AxProduct.Percent1 = ""
 	Set ..AxProduct.Percent2 = ""
 	Set ..AxProduct.PriceUnit = ""
 	Set ..AxProduct.QuantityAmountFrom = ""