ATEZ-NCTS-Sessions eingebaut, Essensbestellungen Bugfix

Aviso/frmATEZ_NCTS.vb

@@ -192,6 +192,8 @@ Public Class frmATEZ_NCTS
             Return False
         End If
 
+        atezData.sessionId = atez.sessionID
+
 
         If Not atez.setJson(atezData) Then
             MsgBox("Fehler beim Erstellen der Daten" & vbNewLine & "Vorgang abgebrochen!")
@@ -231,7 +233,11 @@ Public Class frmATEZ_NCTS
 
         Else
 
-            If azetId = "-1" Then atezData.fehlerbeschreibung = "Request has been sent, but no header received!"
+            If azetId = "-1" Then
+                atezData.fehlerbeschreibung = "Request has been sent, but no header received!"
+            Else
+                atezData.fehlerbeschreibung = ""
+            End If
             atezData.status = "Sent"
             atezData.atezId = IIf(azetId IsNot Nothing, azetId, "")
             Return atezData.SAVE()