Index: AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml =================================================================== diff -u -r49910 -r49951 --- AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml (.../LeverAdresUtils.cls.xml) (revision 49910) +++ AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml (.../LeverAdresUtils.cls.xml) (revision 49951) @@ -85,10 +85,21 @@ } } } + + #dim NogAdressenVerwijderen As %Boolean = $$$False Set LijstVanAxLocationIdsIterator = ##class(TECH.ListIterator).%New(LijstVanAxLocationIds) While LijstVanAxLocationIdsIterator.HasNext() { - Do ..LeveradresRepository.VerwijderViaAXLeverAdresId(LijstVanAxLocationIdsIterator.Next()) + #dim AXLeverAdresId As %String = LijstVanAxLocationIdsIterator.Next() + If $$$HasLength(AXLeverAdresId) { + Do ..LeveradresRepository.VerwijderViaAXLeverAdresId(AXLeverAdresId) + } Else { + Set NogAdressenVerwijderen = $$$True + } } + + //If NogAdressenVerwijderen { + // Do ..LeveradresRepository.VerwijderLeverAdressenZonderAxLocationIdVanKlant(Klant.GeefID()) + //} ]]>