Benachrichtigung nach Upload von der App

VERAG_REST_SERVER/Controllers/AvisoController/AVISOController.vb

@@ -8,6 +8,7 @@ Imports System.Web.Http.Description
 Imports Microsoft.Web.Http
 Imports Org.BouncyCastle.Asn1
 Imports VERAG_PROG_ALLGEMEIN
+Imports VERAG_PROG_ALLGEMEIN.TESTJSON
 
 Namespace ApiController.Controllers
 
@@ -86,6 +87,27 @@ Namespace ApiController.Controllers
 
                 If result = "OK" Then
                     response = Request.CreateResponse(HttpStatusCode.OK, "Die Dokumente wurden erfolgreich hochgeladen.")
+
+
+                    ' Benachrichtigung senden
+                    Dim code As Integer = cAvisoBenachrichtigungenCodes.Verwahrung_Foto
+                    Dim TXT_Titel As String = "Verwahrung Foto hinzugefügt"
+                    Dim TXT_Mitteilung As String = "Ein neues Verwahrung Foto wurde zu AvisoID " & avisoId & " oder SendungsID " & sendungsId & " hinzugefügt."
+
+                    Dim benachrichtigungErfolg As Boolean = cAvisoBenachrichtigungen.send_BENACHRICHTIGUNG_AKTIV_AVISOUSER(
+                        avisoId,
+                        sendungsId,
+                        TXT_Titel,
+                        TXT_Mitteilung,
+                        code
+                    )
+
+                    If benachrichtigungErfolg Then
+                        response = Request.CreateResponse(HttpStatusCode.OK, "Die Benachrichtigung wurde gesendet.")
+                    Else
+                        response = Request.CreateResponse(HttpStatusCode.OK, "Die Dokumente wurden erfolgreich hochgeladen, aber die Benachrichtigung konnte nicht gesendet werden.")
+                    End If
+
                 Else
                     response = Request.CreateErrorResponse(HttpStatusCode.InternalServerError, result)
                 End If