This commit is contained in:
2024-05-29 09:04:20 +02:00
parent d1c19098c9
commit b07e78dd12
2 changed files with 38 additions and 2 deletions

View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.4.9")>
<Assembly: AssemblyFileVersion("1.0.4.9")>
<Assembly: AssemblyVersion("1.0.5.0")>
<Assembly: AssemblyFileVersion("1.0.5.0")>

View File

@@ -250,6 +250,42 @@ Public Class frmMain
allowCBX(cbxAufschubEUST_de_UnispedDE, False)
allowCBX(cbxAufschub_de_UnispedDE, False)
'--------------------------------------------------
If Me.firma.Contains("ATILLA") Or Me.firma.Contains("ALL") Then
allowCBX(cbxBrg_at_Imex, True)
allowCBX(cbxBrg_at_VeragAG, True)
allowCBX(cbxBrg_de2_VeragAG, True)
allowCBX(cbxBrg_at_VeragAG, True)
allowCBX(cbxBrg_de2_VeragAG, True)
allowCBX(cbxBrg_at_Atilla, True)
End If
If Me.firma.Contains("IMEX") Or Me.firma.Contains("ALL") Then
allowCBX(cbxBrg_at_VeragAG, True)
allowCBX(cbxBrg_de2_VeragAG, True)
allowCBX(cbxBrg_at_VeragAG, True)
allowCBX(cbxBrg_de2_VeragAG, True)
allowCBX(cbxAufschub_de_Imex, True)
allowCBX(cbxBrg_at_Imex, True)
allowCBX(cbxAufschubEUST_de_Imex, True)
allowCBX(cbxAufschubEUST_de_Global, True)
allowCBX(cbxAufschub_at_IMEX, True)
End If
If Me.firma.Contains("UNISPED") Or Me.firma.Contains("ALL") Then
allowCBX(cbxAufschubEUST_de_Unisped, True)
allowCBX(cbxAufschub_de_Unisped, True)
allowCBX(cbxBrg_at_UNISPED, True)
allowCBX(cbxBrg_at_VERAG_CS, True)
allowCBX(cbxAufschubEUST_de_UnispedDE, True)
allowCBX(cbxAufschub_de_UnispedDE, True)
End If
End Select
End If