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

WL

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-08-01 07:43:34 +02:00
parent 038e2957c7
commit 14dc77cdb7
9 changed files with 115 additions and 78 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
Aviso/Benachrichtigung/frmAvisoWeiterleiten.vb
View File

@@ -222,10 +222,12 @@ Public Class frmAvisoWeiterleiten
btn.Enabled = enabled
AddHandler btn.Click, Sub()
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Case "ATILLA" : btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung, bezeichnungFirma, "WL: " & If(bezeichnungFirma <> "ATILLA", "[" & bezeichnungFirma & "] ", "") & bezeichnung)
Case Else : btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung, bezeichnungFirma)
End Select
btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung, bezeichnungFirma, "WL: " & If(bezeichnungFirma <> VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, "[" & bezeichnungFirma & "] ", "") & bezeichnung)
'Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
' Case "ATILLA" : btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung, bezeichnungFirma, "WL: " & If(bezeichnungFirma <> "ATILLA", "[" & bezeichnungFirma & "] ", "") & bezeichnung)
' Case Else : btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung, bezeichnungFirma)
'End Select
initButtons(flpFirma, btn)
End Sub