Index: WSimpl/PM/Maatwerk/MaatwerkService/EncowayHttpClient.cls.xml
===================================================================
diff -u -r73883 -r74925
--- WSimpl/PM/Maatwerk/MaatwerkService/EncowayHttpClient.cls.xml	(.../EncowayHttpClient.cls.xml)	(revision 73883)
+++ WSimpl/PM/Maatwerk/MaatwerkService/EncowayHttpClient.cls.xml	(.../EncowayHttpClient.cls.xml)	(revision 74925)
@@ -126,7 +126,9 @@
 	If ($IsObject(HttpRequest.HttpResponse)) {
 		If (HttpRequest.HttpResponse.StatusCode '= 200) {
 			#dim ErrorInfo as %String = HttpRequest.HttpResponse.Data.Read(HttpRequest.HttpResponse.Data.Size)
-			Set Exception = ##class(TECH.Exceptions.AbstractOmschrijvingException).%New("Fout bij opvragen van de BOMBOL via Encoway: HttpRequest to "_HttpRequest.Server_" failed. " _ $$$CRLF _ HttpRequest.HttpResponse.ReasonPhrase _ $$$CRLF _ ErrorInfo)
+			#dim Foutboodschap As %String = "Fout bij opvragen van de BOMBOL via Encoway: HttpRequest to "_HttpRequest.Server_" failed. " _ $$$CRLF _ HttpRequest.HttpResponse.ReasonPhrase _ $$$CRLF _ ErrorInfo
+			Do ..Logger.Error("BOMBOL Encoway response error", Foutboodschap)
+			Set Exception = ##class(TECH.Exceptions.AbstractOmschrijvingException).%New(Foutboodschap)
 			Do ##class(TECH.ExceptionHandler).Throw(Exception)
 		}
 	}