AbfertArt Land in Anzeige

2025-03-11 08:02:48 +01:00
parent a5e0f08596
commit 4dd9f87975
7 changed files with 29 additions and 12 deletions
--- a/Aviso/frmSendungsdetailsNEU.vb
+++ b/Aviso/frmSendungsdetailsNEU.vb
@@ -6825,6 +6825,13 @@ Public Class frmSendungsdetailsNEU
        If abfTmp <> "" Then
            cboAbfertigungsart.changeItem(abfTmp)
        End If
+
+        Select Case cboAbfertigungsLand._value
+            Case "AT"
+                MenuStrip.Enabled = False
+            Case Else
+                MenuStrip.Enabled = True
+        End Select
    End Sub

    Sub checkinitOLDAbfertigungsart(Optional AbfNr As Object = Nothing)