From 406ece349c92ba76d0b09162e8e5c15a97af3159 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Mon, 28 Sep 2026 09:06:47 +0200 Subject: [PATCH] dakosy annahme --- initATLASAufschubkonten/frmDYNachrichtenVerarbeitung.vb | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/initATLASAufschubkonten/frmDYNachrichtenVerarbeitung.vb b/initATLASAufschubkonten/frmDYNachrichtenVerarbeitung.vb index a78d3d5..585613b 100644 --- a/initATLASAufschubkonten/frmDYNachrichtenVerarbeitung.vb +++ b/initATLASAufschubkonten/frmDYNachrichtenVerarbeitung.vb @@ -7987,7 +7987,7 @@ Public Class frmDYNachrichtenVerarbeitung End Try End If - If TXT_Rückweisung <> "" Then + If TXT_Rückweisung <> "" OrElse TXT_Annahme <> "" Then 'Benachrichtigung Try @@ -8031,7 +8031,12 @@ Public Class frmDYNachrichtenVerarbeitung 'Nicht Case Else Dim code = VERAG_PROG_ALLGEMEIN.cAvisoBenachrichtigungenCodes.ZOLL_Rueckweisung - Dim BenText = (TXT_Rückweisung & vbNewLine & TXT_Mitteilung).Trim + Dim BenText = "" + If TXT_Rückweisung <> "" Then + BenText = (TXT_Rückweisung & vbNewLine & TXT_Mitteilung).Trim + Else + BenText = (TXT_Annahme & vbNewLine & TXT_Mitteilung).Trim + End If VERAG_PROG_ALLGEMEIN.cAvisoBenachrichtigungen.INSERT_BENACHRICHTIGUNG(DY_TMP.dy_AvisoId, DY_TMP.dy_SendungsId, code, art, sendToID, "ZOLL: Rückweisung", 1, , BenText,,, If(EZA_TMP IsNot Nothing, If(EZA_TMP.eza_firma, ""), "")) VERAG_PROG_ALLGEMEIN.cVermerkeDAL.insertSendungsVermerk(DY_TMP.dy_SendungsId, DY_TMP.dy_AvisoId, BenText, 125,,, True, "ZOLL") End Select