Index: AX/Uitgaand/VKP/Klant/impl/KlantDixfGenerator.cls.xml
===================================================================
diff -u -r48166 -r48329
--- AX/Uitgaand/VKP/Klant/impl/KlantDixfGenerator.cls.xml	(.../KlantDixfGenerator.cls.xml)	(revision 48166)
+++ AX/Uitgaand/VKP/Klant/impl/KlantDixfGenerator.cls.xml	(.../KlantDixfGenerator.cls.xml)	(revision 48329)
@@ -27,8 +27,12 @@
 <Implementation><![CDATA[
 	#dim AXKlantData As APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased	
 	Set AXKlantData = ##class(APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased).%New()
-	Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "AccountNum")
 	Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "ADUPriceGroupId")
+	Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "AccountNum")
+	Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "AddressEmail")
+	Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "AddressName")
+	Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "Blocked")
+	Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "CellularPhone")
 	Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "CountryRegionId")
 	Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "Currency")
 	Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "CustClassificationId")
Index: AX/Uitgaand/VKP/Klant/impl/KlantDixfConverter.cls.xml
===================================================================
diff -u -r48166 -r48329
--- AX/Uitgaand/VKP/Klant/impl/KlantDixfConverter.cls.xml	(.../KlantDixfConverter.cls.xml)	(revision 48166)
+++ AX/Uitgaand/VKP/Klant/impl/KlantDixfConverter.cls.xml	(.../KlantDixfConverter.cls.xml)	(revision 48329)
@@ -53,8 +53,12 @@
 	#dim Adres As DOM.common.Adres = Partij.GeefAdres()
 	Set AxKlant = ##class(AXdixf.Klant.Klant).%New()
 	
-	Set AxKlant.AccountNum = ..Formatter.FormatAccountNumber(Partij.GeefCode())
 	Set AxKlant.ADUPriceGroupId = ..ADUPriceGroupIdConverter.ConvertAdminNaarAx(KlantData.GeefActiviteit())
+	Set AxKlant.AccountNum = ..Formatter.FormatAccountNumber(Partij.GeefCode())
+	Set AxKlant.AddressEmail = $Translate(Partij.GeefEmail(),"$#~","")
+	Set AxKlant.AddressName = ..Formatter.FormatPartyName(Partij)
+	Set AxKlant.Blocked = $$$If(KlantData.GeefCommercieleStatus()=##class(DOM.CRM.enu.CommercieleStatus).Actief(),"0","1")
+	Set AxKlant.CellularPhone = Partij.GeefGsm()
 	Set AxKlant.CountryRegionId = KlantData.GeefAdres().GeefLand().GeefIso3()
 	Set AxKlant.Currency = "EUR"
 	Set AxKlant.CustClassificationId = ..ConvertCustClassificationId(KlantData)
Index: AXdixf/Klant/Klant.cls.xml
===================================================================
diff -u -r48166 -r48329
--- AXdixf/Klant/Klant.cls.xml	(.../Klant.cls.xml)	(revision 48166)
+++ AXdixf/Klant/Klant.cls.xml	(.../Klant.cls.xml)	(revision 48329)
@@ -7,14 +7,30 @@
 <Default>AXdixf.Klant.Klant</Default>
 </Parameter>
 
+<Property name="ADUPriceGroupId">
+<Type>%String</Type>
+</Property>
+
 <Property name="AccountNum">
 <Type>%String</Type>
 </Property>
 
-<Property name="ADUPriceGroupId">
+<Property name="AddressEmail">
 <Type>%String</Type>
 </Property>
 
+<Property name="AddressName">
+<Type>%String</Type>
+</Property>
+
+<Property name="Blocked">
+<Type>%String</Type>
+</Property>
+
+<Property name="CellularPhone">
+<Type>%String</Type>
+</Property>
+
 <Property name="CountryRegionId">
 <Type>%String</Type>
 </Property>