Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/GeefMaatwerkDetails.cls.xml
===================================================================
diff -u -r63041 -r63386
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/GeefMaatwerkDetails.cls.xml	(.../GeefMaatwerkDetails.cls.xml)	(revision 63041)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/GeefMaatwerkDetails.cls.xml	(.../GeefMaatwerkDetails.cls.xml)	(revision 63386)
@@ -23,13 +23,20 @@
     	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 {
 		#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 ##class(TECH.ExceptionHandler).Throw(Exceptie)
 	}