Index: vhUnitTest/AX/Uitgaand/AKP/Leverancier/impl/DixfConverter/Convert.cls.xml
===================================================================
diff -u -r34615 -r34616
--- vhUnitTest/AX/Uitgaand/AKP/Leverancier/impl/DixfConverter/Convert.cls.xml	(.../Convert.cls.xml)	(revision 34615)
+++ vhUnitTest/AX/Uitgaand/AKP/Leverancier/impl/DixfConverter/Convert.cls.xml	(.../Convert.cls.xml)	(revision 34616)
@@ -452,6 +452,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test Betalingwijze - Special voor BLUM">
+<Implementation><![CDATA[
+	Do ..Partij.IndienMethodCall("GeefID").DanReturn("L||5005")
+	
+	Set Converter = ##class(AX.Uitgaand.AKP.Leverancier.impl.DixfConverter).%New()
+	Set ..AxLeverancier = Converter.Convert(..Partij, ..Leverancier)
+	
+	Do $$$AssertEquals(..AxLeverancier.PaymMode,"BLUM-SEPA")
+]]></Implementation>
+</Method>
+
 <Method name="Test Betalingwijze - Vooruitbetaling">
 <Implementation><![CDATA[
 	Do ..Leverancier.IndienMethodCall("GeefBetaalwijze").DanReturn(##class(DOM.VKP.enu.Betalingwijze).Vooruitbetaling())
Index: AX/Uitgaand/AKP/Leverancier/impl/DixfConverter.cls.xml
===================================================================
diff -u -r34615 -r34616
--- AX/Uitgaand/AKP/Leverancier/impl/DixfConverter.cls.xml	(.../DixfConverter.cls.xml)	(revision 34615)
+++ AX/Uitgaand/AKP/Leverancier/impl/DixfConverter.cls.xml	(.../DixfConverter.cls.xml)	(revision 34616)
@@ -44,7 +44,7 @@
 	Set AxLeverancier.EnterpriseNumber = ..Formatter.FormatEnterpriseNumber(Partij.GeefBTWNr())
 	Set AxLeverancier.VATNum = ..Formatter.FormatVATNum(Partij.GeefBTWNr())
 	Set AxLeverancier.PaymTermId = ..Formatter.ConvertPaymTermId(Leverancier.GeefBetaalwijze(),Leverancier.GeefBetaalTermijn())
-	Set AxLeverancier.PaymMode = $Select(Partij.GeefMunt()="EUR":"SEPA",1:"SWIFT")
+	Set AxLeverancier.PaymMode = ..ConvertPaymentMode(Partij)
 	Set AxLeverancier.UseCashDisc = ..Formatter.FormatCashDiscount(Leverancier.GeefKortingKontant(),Leverancier.GeefTermijnKortingKontant())
 	Set:$$$HasLength(Leverancier.GeefBankRekeningNr()) AxLeverancier.BankAccount = "1"
 	
@@ -88,6 +88,17 @@
 	quit "EX"
 ]]></Implementation>
 </Method>
+
+<Method name="ConvertPaymentMode">
+<FormalSpec>Partij:DOM.PARTIJ.Partij</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+ 
+	Quit:Partij.GeefID()="L||5005" "BLUM-SEPA"
+	Quit:Partij.GeefMunt()="EUR" "SEPA"
+	Quit "SWIFT"
+]]></Implementation>
+</Method>
 </Class>