Index: WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml =================================================================== diff -u -r58038 -r62495 --- WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml (.../QRcodeNaarKenmerkenService.cls.xml) (revision 58038) +++ WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml (.../QRcodeNaarKenmerkenService.cls.xml) (revision 62495) @@ -78,7 +78,12 @@ } Catch { #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() If Exception.%IsA(##class(TECH.Exceptions.DataNotFoundException).%ClassName($$$True)) { - Set ProductNummer = ..BarcodeService.GeefProductIDVoorBarcode(RegistratieCode) + Try { + Set ProductNummer = ..BarcodeService.GeefProductIDVoorBarcode(RegistratieCode) + } Catch { + #dim Exception2 As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() + Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidUserInputException).%New("Geen product gevonden voor QRcode '"_##class(TECH.StringUtils).Replace($Piece(QRcodeNaarKenmerkenRequest.QRcodeData,"=",2),".","")_"'")) + } } Else { Do ##class(TECH.ExceptionHandler).Rethrow(Exception) } Index: vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml =================================================================== diff -u -r58086 -r62495 --- vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml (.../Test.cls.xml) (revision 58086) +++ vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml (.../Test.cls.xml) (revision 62495) @@ -227,6 +227,24 @@ ]]> + + + +