ZE, MDM, IDS

This commit is contained in:
2024-11-12 21:41:17 +01:00
parent 4494565024
commit 53e5955411
6 changed files with 931 additions and 37 deletions

View File

@@ -414,7 +414,17 @@ Public Class frmMitarbeitersuche
If MA.mit_nname.ToLower = "celan" Then 'aktuell Hardcoded, wenn Zeit ist dynamisch (per SQL-tbl)
Dim f As New frmZEButtons(art)
Dim f As New frmZEButtons(art, {"IMEX", "ATILLA", "VERAG", "FO"})
f.ShowDialog()
If f.DialogResult = DialogResult.OK AndAlso f.resultCode >= 0 Then
resultCode = f.resultCode
Else
Exit Sub
End If
ElseIf VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_nname.ToLower = "arslan" AndAlso VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_vname.ToLower = "cihan" Then
Dim f As New frmZEButtons(art, {"IMEX", "ATILLA"})
f.ShowDialog()
If f.DialogResult = DialogResult.OK AndAlso f.resultCode >= 0 Then