Belegmail Betreff; Greenpulse

2025-11-27 09:46:54 +01:00
parent 8e9e964c02
commit 901716de41
3 changed files with 82 additions and 23 deletions
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -1230,6 +1230,14 @@ Public Class frmStartOptions


                            Dim betreff = cStandort.eMail_Zollbeleg_Betreff '"Zollbeleg"
+
+
+
+                            'Wenn ein fixer BEtreff verwendet werden sollte:
+                            If KD_ERW.EmailFreigabeBeleg_Betreff Then
+                                betreff = If(KD_ERW.EmailFreigabeBeleg_BetreffText, "")
+                            End If
+
                            betreff = betreff.Replace("%LKW%", AVISO.LKW_Nr)
                            betreff = betreff.Replace("%AbfertigungsNr%", SND.FilialenNr & "/" & SND.AbfertigungsNr)
                            betreff = betreff.Replace("%Standort%", "")