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

Feature_Gesamtsicherheiten

Browse Source
This commit is contained in:
d.breimaier
2022-10-28 12:01:16 +02:00
parent 2f763da552
commit 0fdf25d07e
7 changed files with 501 additions and 212 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
Aviso/frmHauptfenster.vb
View File

@@ -3992,25 +3992,25 @@ Public Class frmHauptfenster
End Sub
Private Sub ATGesamtsicherheitVeragAGToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ATGesamtsicherheitVeragAGToolStripMenuItem.Click
Dim frm As New frmGesamtsicherheitenMenu
Dim frm As New frmGesamtsicherheitenMenuNEU
frm.Standort = "VERAG AG"
frm.Show()
End Sub
Private Sub DEGesamtsicherheitVeragGmbHToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DEGesamtsicherheitVeragGmbHToolStripMenuItem.Click
Dim frm As New frmGesamtsicherheitenMenu
Dim frm As New frmGesamtsicherheitenMenuNEU
frm.Standort = "Verag GmbH"
frm.Show()
End Sub
Private Sub ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Click
Dim frm As New frmGesamtsicherheitenMenu
Dim frm As New frmGesamtsicherheitenMenuNEU
frm.Standort = "IMEX"
frm.Show()
End Sub
Private Sub ATGesamtsicherheitVeragCSToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ATGesamtsicherheitVeragCSToolStripMenuItem.Click
Dim frm As New frmGesamtsicherheitenMenu
Dim frm As New frmGesamtsicherheitenMenuNEU
frm.Standort = "Verag CS"
frm.Show()
End Sub
@@ -4175,11 +4175,6 @@ Public Class frmHauptfenster
meineAviso_anzeigen()
End Sub
Private Sub DEGesamtsicherheitVeragGmbHNEUToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DEGesamtsicherheitVeragGmbHNEUToolStripMenuItem.Click
Dim frm As New frmGesamtsicherheitenMenuNEU
frm.Standort = "VERAG GmbH"
frm.Show()
End Sub
End Class
Public Class AvisoStatusFunctions