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

dynamische Mailvorlagen

Browse Source
This commit is contained in:
d.breimaier
2024-04-18 17:00:32 +02:00
parent fbd49fa656
commit be31f04393
7 changed files with 2069 additions and 1935 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Aviso/frmHauptfenster.vb
View File

@@ -379,6 +379,9 @@ Public Class frmHauptfenster
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("RECHNUNGSSUCHE", "SDL") Then
btnRg.Visible = True
End If
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("MAILVORLAGEN", "SDL") Then
MailvorlagenToolStripMenuItem.Visible = True
End If
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("MITARBEITER_VERZEICHNIS", "SDL") Then
btnMAVerzeichnis.Visible = True
@@ -4589,6 +4592,11 @@ Public Class frmHauptfenster
Private Sub BackgroundWorker1_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
End Sub
Private Sub MailvorlagenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MailvorlagenToolStripMenuItem.Click
Dim f As New SDL.frmdynMailvorlage(VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ADMIN", "SDL"))
f.ShowDialog(Me)
End Sub
End Class
Public Class AvisoStatusFunctions