Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml =================================================================== diff -u -r45597 -r48330 --- WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml (.../MaakOrderVanOfferte.cls.xml) (revision 45597) +++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml (.../MaakOrderVanOfferte.cls.xml) (revision 48330) @@ -57,7 +57,15 @@ Lock +^Vhisie4.Winkelkar(MaakOrderVanOfferteRequest.WinkelkarId):0 Else Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.LockedException).%New("Winkelkar '" _MaakOrderVanOfferteRequest.WinkelkarId _"' is gelocked door een andere webservice call. Probeer later opnieuw.")) Try { - #dim VanHoeckeGebruiker As DOM.common.VanHoeckeGebruiker = ..VanHoeckeGebruikerBeheerder.GeefGebruikerViaEmail(MaakOrderVanOfferteRequest.GebruikerEmail) + Try { + #dim VanHoeckeGebruiker As DOM.common.VanHoeckeGebruiker = ..VanHoeckeGebruikerBeheerder.GeefGebruikerViaEmail(MaakOrderVanOfferteRequest.GebruikerEmail) + } Catch { + #dim ExceptionIvmGebruiker As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() + Set UserException = ##class(TECH.Exceptions.InvalidUserInputException).%New("Het order kon niet gemaakt worden!" _$$$CRLF _"Het email-adres '"_MaakOrderVanOfferteRequest.GebruikerEmail_"' van de VHisie4-gebruiker komt niet overeen met een interne gebruiker (in vhUSER).") + Do UserException.VoegToeInnerExceptie(ExceptionIvmGebruiker) + Do ##class(TECH.ExceptionHandler).Throw(UserException) + } + #dim InterneOfferteId As %String = ..WinkelkarRepository.GeefOfferteIDViaID(MaakOrderVanOfferteRequest.WinkelkarId) #dim ComputerNaam As %String = ..SystemInformation.GeefComputerNaamViaIP(MaakOrderVanOfferteRequest.Header.GebruikerIp)