Ausblendung von alten Excellisten für Gesamtsicherheiten -> wurden noch auf anderer Stelle aufgerufen.
This commit is contained in:
@@ -2595,21 +2595,31 @@ Public Class frmHauptfenster
|
||||
Panel2.Visible = False
|
||||
Label4.Visible = False
|
||||
cboGrenzstelle.Visible = False
|
||||
BürgschaftenExcelToolStripMenuItem.Visible = True
|
||||
ToolStripMenuItem4.Visible = True
|
||||
ToolStripMenuItem5.Visible = True
|
||||
'BürgschaftenExcelToolStripMenuItem.Visible = True
|
||||
ATGesamtsicherheitVeragCSToolStripMenuItem.Visible = True
|
||||
'ToolStripMenuItem4.Visible = True
|
||||
DEGesamtsicherheitVeragGmbHToolStripMenuItem.Visible = True
|
||||
'ToolStripMenuItem5.Visible = True
|
||||
ATGesamtsicherheitVeragAGToolStripMenuItem.Visible = True
|
||||
ElseIf VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERIMEX" Then
|
||||
'nix
|
||||
ElseIf VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "IMEX" Then
|
||||
'btnGenerelleGestellungen.Visible = False
|
||||
ToolStripMenuItem4.Visible = True
|
||||
ToolStripMenuItem5.Visible = True
|
||||
ToolStripMenuItem6.Visible = True
|
||||
'ToolStripMenuItem4.Visible = True
|
||||
DEGesamtsicherheitVeragGmbHToolStripMenuItem.Visible = True
|
||||
'ToolStripMenuItem5.Visible = True
|
||||
ATGesamtsicherheitVeragAGToolStripMenuItem.Visible = True
|
||||
'ToolStripMenuItem6.Visible = True
|
||||
ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Visible = True
|
||||
Else 'VERAG
|
||||
BürgschaftenExcelToolStripMenuItem.Visible = True
|
||||
ToolStripMenuItem4.Visible = True
|
||||
ToolStripMenuItem5.Visible = True
|
||||
ToolStripMenuItem6.Visible = True
|
||||
'BürgschaftenExcelToolStripMenuItem.Visible = True
|
||||
ATGesamtsicherheitVeragCSToolStripMenuItem.Visible = True
|
||||
'ToolStripMenuItem4.Visible = True
|
||||
DEGesamtsicherheitVeragGmbHToolStripMenuItem.Visible = True
|
||||
'ToolStripMenuItem5.Visible = True
|
||||
ATGesamtsicherheitVeragAGToolStripMenuItem.Visible = True
|
||||
'ToolStripMenuItem6.Visible = True
|
||||
ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Visible = True
|
||||
If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG = "WAI" Then
|
||||
Button5.Visible = True
|
||||
End If
|
||||
@@ -2671,7 +2681,7 @@ Public Class frmHauptfenster
|
||||
tbcntrAviso.Width = Panel1.Width
|
||||
VERAG_PROG_ALLGEMEIN.cAllgemein._TRANSLATE(Me)
|
||||
|
||||
|
||||
BürgschaftenExcelToolStripMenuItem.Visible = False
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Reference in New Issue
Block a user