Index: APPS/VKP/OfferteService/impl/NaarBerekenInputConverter.cls.xml
===================================================================
diff -u -r33484 -r36130
--- APPS/VKP/OfferteService/impl/NaarBerekenInputConverter.cls.xml	(.../NaarBerekenInputConverter.cls.xml)	(revision 33484)
+++ APPS/VKP/OfferteService/impl/NaarBerekenInputConverter.cls.xml	(.../NaarBerekenInputConverter.cls.xml)	(revision 36130)
@@ -35,7 +35,7 @@
 	#dim InternationaalAdres As APPS.TRANSP.dto.InternationaalAdres = ##class(APPS.TRANSP.dto.InternationaalAdres).%New()
 	Set InternationaalAdres.Aanspreking = LeverAdres.GeefAanspreking()
 	Set InternationaalAdres.ID  = LeverAdres.GeefID()
-	Set InternationaalAdres.LandCode  = LeverAdres.GeefLandNr() 
+	Set InternationaalAdres.LandCode  = LeverAdres.GeefLand().GeefCode() 
 	Set InternationaalAdres.Naam  = LeverAdres.GeefNaam()
 	Set InternationaalAdres.Postcode = LeverAdres.GeefPostcode() 
 	Set InternationaalAdres.Straat = LeverAdres.GeefStraat()