Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/GeefMaatwerkDetails.cls.xml =================================================================== diff -u -r63386 -r63387 --- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/GeefMaatwerkDetails.cls.xml (.../GeefMaatwerkDetails.cls.xml) (revision 63386) +++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/GeefMaatwerkDetails.cls.xml (.../GeefMaatwerkDetails.cls.xml) (revision 63387) @@ -19,25 +19,25 @@ Do Logger.Info("BOMBOL DotNet request", JSONStream) - #dim HttpRequest As %Net.HttpRequest = ..GeefHttpsRequest() - Do HttpRequest.EntityBody.CopyFrom(JSONStream) - - #dim StatusCode As %Status = HttpRequest.Get("/api/Maatwerk",0) - Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(StatusCode,"Fout bij opvragen van de BOMBOL via DotNet.") - #dim bombol As %Stream.GlobalBinary = HttpRequest.HttpResponse.Data - - Do Logger.Info("BOMBOL DotNet response", bombol) - + #dim HttpRequest As %Net.HttpRequest = ..GeefHttpsRequest() + Do HttpRequest.EntityBody.CopyFrom(JSONStream) + + #dim StatusCode As %Status = HttpRequest.Get("/api/Maatwerk",0) + Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(StatusCode,"Fout bij opvragen van de BOMBOL via DotNet.") + #dim bombol As %Stream.GlobalBinary = HttpRequest.HttpResponse.Data + + Do Logger.Info("BOMBOL DotNet response", bombol) + Set MaatwerkDetails = ..Parse(bombol) - } Catch { + } Catch { #dim Exceptie As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() If $IsObject($G(HttpRequest)) { Do Exceptie.VoegToeExtraInfo("HttpRequest : "_$$$CRLF_ $$ObjToText^vhLib(HttpRequest)) If $IsObject(HttpRequest.HttpResponse) { Do Exceptie.VoegToeExtraInfo("HttpResponse : "_$$$CRLF_ $$ObjToText^vhLib(HttpRequest.HttpResponse)) } } - Do Logger.ErrorMail("BOMBOL via DotNet niet gelukt. HttpResponse Statuscode: "_HttpRequest.HttpResponse.StatusCode) + Do Logger.ErrorMail("BOMBOL via DotNet niet gelukt. HttpResponse Statuscode: "_HttpRequest.HttpResponse.StatusCode, Exceptie.ToStream()) Do ##class(TECH.ExceptionHandler).Throw(Exceptie) }