Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml =================================================================== diff -u -r39762 -r39776 --- WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml (.../MaakOrderVanOfferte.cls.xml) (revision 39762) +++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte.cls.xml (.../MaakOrderVanOfferte.cls.xml) (revision 39776) @@ -52,7 +52,16 @@ #dim InterneOfferteId As %String = ..WinkelkarRepository.GeefOfferteIDViaID(MaakOrderVanOfferteRequest.WinkelkarId) #dim ComputerNaam As %String = ..SystemInformation.GeefComputerNaamViaIP(MaakOrderVanOfferteRequest.Header.GebruikerIp) - #dim OrderId As %String = ..OrderIngaveService.MaakOrderVanOfferte(InterneOfferteId,"") + Try { + #dim OrderId As %String = ..OrderIngaveService.MaakOrderVanOfferte(InterneOfferteId,"") + } catch { + #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() + If Exception.%IsA("APPS.common.Bevestigen.exception.BevestigingNodigException") { + Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidUserInputException).%New("Van deze webofferte is reeds een order gemaakt!")) + }Else{ + Do ##class(TECH.ExceptionHandler).Rethrow(Exception) + } + } Do ..TerminalNavigatieService.RaadpleegOrder(VanHoeckeGebruiker.GeefID(),ComputerNaam, OrderId) ]]> Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml =================================================================== diff -u -r39765 -r39776 --- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml (.../Test.cls.xml) (revision 39765) +++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml (.../Test.cls.xml) (revision 39776) @@ -31,6 +31,28 @@ ]]> + + + + 1 WS.Vhisie4.Winkelkar.MaakOrderVanOfferteRequest