Index: AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifConverter.cls.xml
===================================================================
diff -u -r35206 -r35369
--- AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifConverter.cls.xml	(.../AifConverter.cls.xml)	(revision 35206)
+++ AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifConverter.cls.xml	(.../AifConverter.cls.xml)	(revision 35369)
@@ -87,7 +87,7 @@
 	set DirParty.class = "entity"
 	set DirParty.LanguageId = ..Formatter.FormatLanguageId(Partij.GeefTaal())
 	set DirParty.Name = ..Formatter.FormatPartyName(Partij)
-	set DirParty.DunsNumberRecId = ""
+	set:(Partij.GeefAdres().GeefLandNr()=##class(DOM.common.enu.Land).Nederland()) DirParty.DunsNumberRecId = Partij.GeefHandelRegisterNr()
 	
 	set OrganizationName = ##class(AXaif.Customer.AxdEntityOrganizationName).%New()
 	set OrganizationName.class = "entity"
Index: vhUnitTest/AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifConverter/OrganizationCommon/Test.cls.xml
===================================================================
diff -u -r34673 -r35369
--- vhUnitTest/AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifConverter/OrganizationCommon/Test.cls.xml	(.../Test.cls.xml)	(revision 34673)
+++ vhUnitTest/AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifConverter/OrganizationCommon/Test.cls.xml	(.../Test.cls.xml)	(revision 35369)
@@ -3,7 +3,7 @@
 <Class name="vhUnitTest.AX.Uitgaand.VKP.VanHoeckeKlant.impl.AifConverter.OrganizationCommon.Test">
 <Super>vhUnitTest.AX.Uitgaand.VKP.VanHoeckeKlant.impl.AifConverter.TestBase</Super>
 
-<Method name="Test: Handelsregisternummer wordt niet overgenomen voor een belgisch adres">
+<Method name="Test: Handelsregisternummer wordt niet overgenomen voor een Belgisch adres">
 <Implementation><![CDATA[
 	do ..Partij.IndienMethodCall("GeefAdres").DanReturn(##class(vhTest.Utils.DOM.VKP.LeverAdres).Belgisch())
 	do ..Partij.IndienMethodCall("GeefHandelRegisterNr").DanReturn("1234567")
@@ -17,7 +17,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Handelsregister nr wordt niet overgenomen voor een nederlands adres">
+<Method name="Test: Handelsregister nr wordt overgenomen voor een Nederlands adres">
 <Implementation><![CDATA[
 	do ..Partij.IndienMethodCall("GeefAdres").DanReturn(##class(vhTest.Utils.DOM.VKP.LeverAdres).Nederlands())
 	do ..Partij.IndienMethodCall("GeefHandelRegisterNr").DanReturn("1234567")
@@ -27,7 +27,7 @@
 	#dim CustTable As AXaif.Customer.AxdEntityCustTable = AxKlant.CustTable.GetAt(1)
 	#dim Party As AXaif.Customer.AxdEntityDirPartyDirOrganization = CustTable.DirParty.GetAt(1)
 	
-	do $$$AssertEquals(Party.DunsNumberRecId,"")
+	do $$$AssertEquals(Party.DunsNumberRecId,"1234567")
 ]]></Implementation>
 </Method>
 </Class>