Index: AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter.cls.xml
===================================================================
diff -u -r42042 -r42043
--- AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter.cls.xml	(.../AankoopOrderRegelDixfConverter.cls.xml)	(revision 42042)
+++ AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter.cls.xml	(.../AankoopOrderRegelDixfConverter.cls.xml)	(revision 42043)
@@ -65,7 +65,7 @@
 	Set ..AxRegel.ItemId = ..BepaalItemId(ToeleveringLijn)
 	Set ..AxRegel.LineAmount = ""
 	Set ..AxRegel.LineNumber = ..BepaalLineNumber(ToeleveringLijn)
-	Set ..AxRegel.LinePercent = ""
+	Set ..AxRegel.LinePercent = ..BepaalLinePercent(ToeleveringLijn)
 	Set ..AxRegel.OverDeliveryPct = ..BepaalOverDeliveryPct(ToeleveringLijn)
 	Set ..AxRegel.PriceUnit = ..BepaalPriceUnit(ToeleveringLijn)
 	Set ..AxRegel.PurchId = ..BepaalPurchId(ToeleveringLijn)
@@ -147,6 +147,26 @@
 ]]></Implementation>
 </Method>
 
+<Method name="BepaalLinePercent">
+<FormalSpec>ToeleveringLijn:%RegisteredObject</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#Dim LinePercent As %String = "0"
+	
+	If ToeleveringLijn.%Extends("DOM.AKP.ProductToeleveringLijn")
+	{
+		Set LinePercent = ToeleveringLijn.GeefKorting()
+		Set $Extract(LinePercent,$Find(LinePercent,".")-1) = ","
+	} ElseIf ToeleveringLijn.%Extends("APPS.EDIExport.AankoopOrderResponse.BLUM.impl.BlOrdRsp")
+	{
+		Set LinePercent = ""
+	}
+	
+	Quit LinePercent
+]]></Implementation>
+</Method>
+
 <Method name="BepaalOverDeliveryPct">
 <FormalSpec>ToeleveringLijn:%RegisteredObject</FormalSpec>
 <Private>1</Private>