Index: DOM/VKP/impl/LeverAdresRepository.cls.xml =================================================================== diff -u -r49684 -r49694 --- DOM/VKP/impl/LeverAdresRepository.cls.xml (.../LeverAdresRepository.cls.xml) (revision 49684) +++ DOM/VKP/impl/LeverAdresRepository.cls.xml (.../LeverAdresRepository.cls.xml) (revision 49694) @@ -110,6 +110,24 @@ ]]> + +AXLeverAdresId:%String +0 + Do ..VerwijderViaID(ResultSet.GetData(1)) + } Catch { + #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() + Do ##class(TECH.Exceptions.IllegalArgumentException).Throw("Leveradres met AxLocationId '"_AXLeverAdresId_"' werd niet gevonden en kon dus niet verwijderd worden.") + } +]]> + + KlantId:%String,AdresVolgNr:%String DOM.VKP.impl.LeverAdres