Index: vhUnitTest/AX/Uitgaand/PM/AankoopOrderHoofding/impl/AankoopOrderHoofdingDixfConverter/Test.cls.xml
===================================================================
diff -u -r41839 -r41840
--- vhUnitTest/AX/Uitgaand/PM/AankoopOrderHoofding/impl/AankoopOrderHoofdingDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 41839)
+++ vhUnitTest/AX/Uitgaand/PM/AankoopOrderHoofding/impl/AankoopOrderHoofdingDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 41840)
@@ -30,7 +30,7 @@
 	Set ..ToeleveringStub = ToeleveringStub
 	
 	Set LeverancierStub = ##class(vhTest.Mock.DOM.AKP.Leverancier).%New()
-	Do LeverancierStub.IndienMethodCall("GeefKortingKontant").DanReturn(5)
+	Do LeverancierStub.IndienMethodCall("GeefKortingKontant").DanReturn(5.7)
 	Do LeverancierStub.IndienMethodCall("GeefTermijnKortingKontant").DanReturn(10)
 	Do LeverancierStub.IndienMethodCall("GeefTaal").DanReturn("NL")
 	Do LeverancierStub.IndienMethodCall("GeefNaam").DanReturn("LevNaam")
@@ -99,6 +99,22 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Als er een KortingKontant bedrag is wordt het decimale punt vervangen door een komma">
+<Implementation><![CDATA[
+	#dim AankoopApiStub As vhTest.Mock.DOM.AKP.AankoopAPI = ##class(vhTest.Mock.DOM.AKP.AankoopAPI).MockInstance()
+	Do AankoopApiStub.IndienMethodCall("GeefLeverancier","5000").DanReturn(..LeverancierStub)
+	Set ..AankoopApi = AankoopApiStub
+	
+	#dim Vestiging As AX.common.enu.InterneFirmaInitialen = "VHBE"
+	
+	#dim Converter As AX.Uitgaand.PM.AankoopOrderHoofding.impl.AankoopOrderHoofdingDixfConverter = ..GeefConverter()
+	
+	#dim Hoofding As AXdixf.AankoopOrderHoofding.AankoopOrderHoofding = Converter.Convert(..ToeleveringStub,Vestiging)
+	
+	Do $$$AssertEquals(Hoofding.CashDiscPercent,"5,7")
+]]></Implementation>
+</Method>
+
 <Method name="GeefConverter">
 <Private>1</Private>
 <ReturnType>AX.Uitgaand.PM.AankoopOrderHoofding.impl.AankoopOrderHoofdingDixfConverter</ReturnType>