MS

app/ResultHandler_Konfig/clsDateiverarbeitung.vb

@@ -227,7 +227,7 @@ Public Class clsDateiverarbeitung
     ''' </summary>
     ''' <param name="WMFile">Das WMObject, dass das aktuelle Dokument repräsentiert</param>
     ''' <param name="userId">Die eindeutige Benutzer Kennung für die Authentifizierung in Windream</param>
-    Public Shared Sub BNSjsonDownload(WMFile As WMObject, userId As String, apiAddress As String)
+    Public Shared Function BNSjsonDownload(WMFile As WMObject, userId As String, apiAddress As String)
         Try
             ' Indizes für das aktuelle Dokument auslesen
             Dim SENDUNGNR = WMFile.GetVariableValue("Sendungnr")
@@ -289,11 +289,12 @@ Public Class clsDateiverarbeitung
                     Throw New Exception($"Server Error (HTTP {code}: {text})")
                 End If
             End Using
-
+            Return True
         Catch ex As Exception
             clsLogger.AddError("Unvorhergesehener Fehler: " & ex.Message & " - " & ex.Source, "BNSjsonDownload")
+            Return True
         End Try
-    End Sub
+    End Function
     Public Shared Function RUN_ORACLE_COMMAND(WMFile As WMObject, OracleCS As String, OracleCommandRAW As String)
         Try
             Dim result = REGEX_REPLACE(WMFile, OracleCommandRAW)