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

neu

Browse Source
This commit is contained in:
Andreas Luxbauer
2022-09-01 10:38:09 +02:00
parent 505b2800c5
commit 94556d7686
56 changed files with 1303 additions and 547 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Aviso/Anhänge/frmSendungAnhangImport.vb
View File

@@ -1043,6 +1043,8 @@ Public Class frmSendungAnhangImport
Me.Height = Screen.PrimaryScreen.WorkingArea.Height
Me.Top = 0
VERAG_PROG_ALLGEMEIN.cProgramFunctions.spireLoadLicense()
Try
DirectCast(PdfViewer.Controls(0).Controls(0).Controls(0), ToolStrip).Items(0).Visible = False
DirectCast(PdfViewer.Controls(0).Controls(0).Controls(0), ToolStrip).Items(1).Visible = False
@@ -1084,6 +1086,10 @@ Public Class frmSendungAnhangImport
cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("GB - Atanak Rechnung", "Atanak_RG"))
End If
If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("EXPORT_DOCS", "EXPORT_DOCS"))
End If
cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Sonstiges", "Sonstiges"))