Index: vhTest/Mock/DOM/VKP/LeverAdres.cls.xml
===================================================================
diff -u -r47647 -r48255
--- vhTest/Mock/DOM/VKP/LeverAdres.cls.xml (.../LeverAdres.cls.xml) (revision 47647)
+++ vhTest/Mock/DOM/VKP/LeverAdres.cls.xml (.../LeverAdres.cls.xml) (revision 48255)
@@ -19,6 +19,12 @@
]]>
+
+%String
+
+
+
%ListOfDataTypes
+
+AxLeveradresId:%String
+
+
+
Gemeente:%String
Index: DOM/VKP/impl/DataM/DataMKlantNative.cls.xml
===================================================================
diff -u -r48212 -r48255
--- DOM/VKP/impl/DataM/DataMKlantNative.cls.xml (.../DataMKlantNative.cls.xml) (revision 48212)
+++ DOM/VKP/impl/DataM/DataMKlantNative.cls.xml (.../DataMKlantNative.cls.xml) (revision 48255)
@@ -778,6 +778,7 @@
Set $Piece(AdresNode,"\",26) = LeverAdres.GeefVerzendingWijze()
Set $Piece(AdresNode,"\",12) = "L"
Set $Piece(AdresNode,"\",19) = "."
+ Set $Piece(AdresNode,"\",29) = LeverAdres.GeefAxLeveradresId()
#dim AdresId As %String = $I(^KKL.AdresD)
Set $Piece(AdresNode,"\",28) = AdresId
#dim Node As %String = "L"_$$$LeftPadding(VolgendNummer,3," ")
Index: DOM/common/impl/AdresUtils.cls.xml
===================================================================
diff -u -r48212 -r48255
--- DOM/common/impl/AdresUtils.cls.xml (.../AdresUtils.cls.xml) (revision 48212)
+++ DOM/common/impl/AdresUtils.cls.xml (.../AdresUtils.cls.xml) (revision 48255)
@@ -48,6 +48,7 @@
Set Adres.VerzendingWijze = $piece(AdresData,"\",26)
Set Adres.Volmacht = $piece(AdresData,"\",23)
+ Set Adres.AxLeveradresId = $piece(AdresData,"\",29)
]]>