Index: vhUnitTest/AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevKortingDixfConverter/Test.cls.xml
===================================================================
diff -u -r41046 -r41164
--- vhUnitTest/AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevKortingDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 41046)
+++ vhUnitTest/AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevKortingDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 41164)
@@ -8,7 +8,7 @@
 	#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New()
 	#dim Vestiging As %String = "VanHoecke"
 	#dim LeverancierNummer As %String = "6332"
-	#dim TestProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevKortingDixfConverter).%New(,Vestiging,LeverancierNummer).ConvertVanHoecke(AxProduct)
+	#dim TestProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevKortingDixfConverter).%New(Vestiging,LeverancierNummer).ConvertVanHoecke(AxProduct)
 	
 	Do $$$AssertEquals(TestProduct.AccountCode ,"Tabel")
 	Do $$$AssertEquals(TestProduct.Amount ,"")
@@ -35,7 +35,7 @@
 	#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New()
 	#dim Vestiging As %String = "Halux"
 	#dim LeverancierNummer As %String = "5497"
-	#dim TestProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevKortingDixfConverter).%New(,Vestiging,LeverancierNummer).ConvertHalux(AxProduct)
+	#dim TestProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevKortingDixfConverter).%New(Vestiging,LeverancierNummer).ConvertHalux(AxProduct)
 	
 	Do $$$AssertEquals(TestProduct.AccountCode ,"Tabel")
 	Do $$$AssertEquals(TestProduct.Amount ,"")
Index: vhUnitTest/AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevDixfConverter/Test.cls.xml
===================================================================
diff -u -r41046 -r41164
--- vhUnitTest/AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 41046)
+++ vhUnitTest/AX/Uitgaand/PM/AankoopPrijzenLev/impl/AankoopPrijzenLevDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 41164)
@@ -8,7 +8,7 @@
 	#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New()
 	#dim Vestiging As %String = "VanHoecke"
 	#dim LeverancierNummer As %String = "6332"
-	#dim TestProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(,Vestiging,LeverancierNummer).ConvertVanHoecke(AxProduct)
+	#dim TestProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(Vestiging,LeverancierNummer).ConvertVanHoecke(AxProduct)
 	
 	Do $$$AssertEquals(TestProduct.AccountCode ,"Tabel")
 	Do $$$AssertEquals(TestProduct.Currency  ,"EUR")
@@ -34,7 +34,7 @@
 	#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New()
 	#dim Vestiging As %String = "Halux"
 	#dim LeverancierNummer As %String = "5497"
-	#dim TestProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(,Vestiging,LeverancierNummer).ConvertHalux(AxProduct)
+	#dim TestProduct As AXdixf.AankoopPrijzenLev.AankoopPrijzenLev = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(Vestiging,LeverancierNummer).ConvertHalux(AxProduct)
 	
 	Do $$$AssertEquals(TestProduct.AccountCode ,"Tabel")
 	Do $$$AssertEquals(TestProduct.Currency  ,"EUR")
@@ -64,7 +64,7 @@
 	Set TestProduct.Prijs.GrootteOrde = "E"
 
 	
-	#dim PriceUnit  As %String = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(,Vestiging,LeverancierNummer).BepaalPriceUnit(TestProduct)
+	#dim PriceUnit  As %String = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(Vestiging,LeverancierNummer).BepaalPriceUnit(TestProduct)
 	
 	Do $$$AssertEquals(PriceUnit ,"1")
 	Do $$$AssertNotEquals(PriceUnit ,"100")
@@ -82,7 +82,7 @@
 	Set TestProduct.Prijs.GrootteOrde = "H"
 
 	
-	#dim PriceUnit  As %String = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(,Vestiging,LeverancierNummer).BepaalPriceUnit(TestProduct)
+	#dim PriceUnit  As %String = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(Vestiging,LeverancierNummer).BepaalPriceUnit(TestProduct)
 	
 	Do $$$AssertEquals(PriceUnit ,"100")
 	Do $$$AssertNotEquals(PriceUnit ,"1")
@@ -100,7 +100,7 @@
 	Set TestProduct.Prijs.GrootteOrde = "M"
 
 	
-	#dim PriceUnit  As %String = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(,Vestiging,LeverancierNummer).BepaalPriceUnit(TestProduct)
+	#dim PriceUnit  As %String = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(Vestiging,LeverancierNummer).BepaalPriceUnit(TestProduct)
 	
 	Do $$$AssertEquals(PriceUnit ,"1000")
 	Do $$$AssertNotEquals(PriceUnit ,"1")
@@ -118,7 +118,7 @@
 	Set TestProduct.Prijs.GrootteOrde = ""
 
 	
-	#dim PriceUnit  As %String = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(,Vestiging,LeverancierNummer).BepaalPriceUnit(TestProduct)
+	#dim PriceUnit  As %String = ##class(AX.Uitgaand.PM.AankoopPrijzenLev.impl.AankoopPrijzenLevDixfConverter).%New(Vestiging,LeverancierNummer).BepaalPriceUnit(TestProduct)
 	
 	Do $$$AssertEquals(PriceUnit ,"")
 	Do $$$AssertNotEquals(PriceUnit ,"1")