Index: DOM/VKP/impl/LeverAdresRepository.cls.xml =================================================================== diff -u -r64011 -r66902 --- DOM/VKP/impl/LeverAdresRepository.cls.xml (.../LeverAdresRepository.cls.xml) (revision 64011) +++ DOM/VKP/impl/LeverAdresRepository.cls.xml (.../LeverAdresRepository.cls.xml) (revision 66902) @@ -71,6 +71,7 @@ Set $Piece(AdresNode,"\",26) = LeverAdres.GeefVerzendingWijze() Set $Piece(AdresNode,"\",19) = "." Set $Piece(AdresNode,"\",29) = LeverAdres.GeefAxLeveradresId() + Set $Piece(AdresNode,"\",30) = LeverAdres.GeefProvincie() #dim AdresId As %String If ($$$HasLength(LeverAdres.GeefUniekId())) { Set AdresId = LeverAdres.GeefUniekId() @@ -168,6 +169,7 @@ Do Leveradres.ZetUniekId($Piece(Key,"\",28)) Do Leveradres.ZetAdresType($Piece(Key,"\",12)) Do Leveradres.ZetKlantId(KlantId) + Do Leveradres.ZetProvincie($Piece(Key,"\",30)) Quit Leveradres ]]>