Index: AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml =================================================================== diff -u -r53959 -r53961 --- AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml (.../LeverAdresUtils.cls.xml) (revision 53959) +++ AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml (.../LeverAdresUtils.cls.xml) (revision 53961) @@ -193,9 +193,11 @@ If (..LeveradresRepository.BestaatViaKlantIdEnKlantAdresNr(KlantId, "1")) { #dim TeVerplaatsenAdres As DOM.VKP.LeverAdres = ..LeveradresRepository.GeefViaKlantIdEnKlantAdresNr(KlantId, "1") #dim VolgendVrijKlantAdresNr As %String = Klant.GeefVolgendVrijKlantAdresNr() - } Else { - Do LeverAdres.ZetKlantAdresNr("1") + Do TeVerplaatsenAdres.ZetKlantAdresNr(VolgendVrijKlantAdresNr) + Do ..LeveradresRepository.Bewaar(Klant, TeVerplaatsenAdres) } + + Do LeverAdres.ZetKlantAdresNr("1") ]]>