Index: AX/Uitgaand/VKP/KlantAdres/impl/KlantAdresDixfConverter.cls.xml
===================================================================
diff -u -r48764 -r55649
--- AX/Uitgaand/VKP/KlantAdres/impl/KlantAdresDixfConverter.cls.xml	(.../KlantAdresDixfConverter.cls.xml)	(revision 48764)
+++ AX/Uitgaand/VKP/KlantAdres/impl/KlantAdresDixfConverter.cls.xml	(.../KlantAdresDixfConverter.cls.xml)	(revision 55649)
@@ -99,9 +99,13 @@
 <Implementation><![CDATA[
 	#dim DlvModeId As %String
 	
-	Set DlvModeId = ..AdminToAXUtils.ConvertVerzendingWijze($$$If($$$Not($$$HasLength(AdresEnKlantObject.Adres.GeefVerzendingWijze())),AdresEnKlantObject.Klant.GeefVerzendingWijze(),AdresEnKlantObject.Adres.GeefVerzendingWijze()))
-	Set DlvModeId = $$$If($$$HasLength(DlvModeId),DlvModeId,"DI1")
-	
+	If $$$HasLength(AdresEnKlantObject.Adres.GeefVerzendingWijze()) {
+		Set DlvModeId = ..AdminToAXUtils.ConvertVerzendingWijzeMetLandNr(AdresEnKlantObject.Adres.GeefVerzendingWijze(),AdresEnKlantObject.Adres.GeefLandNr())
+	} else {
+		Set DlvModeId = ..AdminToAXUtils.ConvertVerzendingWijzeMetLandNr(AdresEnKlantObject.Klant.GeefVerzendingWijze(),AdresEnKlantObject.Klant.GeefStandaardLeverAdres().GeefLandNr())
+	}
+
+	Quit:(DlvModeId="") "DI1"
 	Quit DlvModeId
 ]]></Implementation>
 </Method>