edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

vers rh

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-05-13 15:57:20 +02:00
parent 3361f2655a
commit e8ac79845b
2 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
SDL/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.3.9.9")> <Assembly: AssemblyVersion("1.4.0.0")>
<Assembly: AssemblyFileVersion("1.3.9.9")> <Assembly: AssemblyFileVersion("1.4.0.0")>

3
VERAG_PROG_ALLGEMEIN/Schnittstellen/ATEZ/RELAYHUB/cRelayHub.vb
View File

@@ -144,7 +144,9 @@ Public Class cRelayHub
' Anfrage senden ' Anfrage senden
Dim response As Chilkat.HttpResponse = http.PostJson2(API_URL & "/job-orders/init", "application/json", jsonPayload) Dim response As Chilkat.HttpResponse = http.PostJson2(API_URL & "/job-orders/init", "application/json", jsonPayload)
MsgBox(jsonPayload)
Console.WriteLine(jsonPayload)
If http.LastMethodSuccess <> True Then If http.LastMethodSuccess <> True Then
result.Success = False result.Success = False
result.StatusCode = 0 result.StatusCode = 0
@@ -165,6 +167,7 @@ Public Class cRelayHub
result.Details = $"ID: {jobResponse.id}, Referenz: {jobResponse.referenceNo}" result.Details = $"ID: {jobResponse.id}, Referenz: {jobResponse.referenceNo}"
Catch ex As Exception Catch ex As Exception
result.Success = False result.Success = False
result.StatusCode = 999
result.Message = "Antwort konnte nicht gelesen werden" result.Message = "Antwort konnte nicht gelesen werden"
result.Details = ex.Message result.Details = ex.Message
End Try End Try