eAVISO ANpassung, Banchrichtigungen

2023-02-02 13:07:05 +01:00
parent a94373cda8
commit f77a8b16d7
6 changed files with 200 additions and 45 deletions
--- a/Aviso/frmSendungsdetailsNEU.Designer.vb
+++ b/Aviso/frmSendungsdetailsNEU.Designer.vb
@@ -24,10 +24,10 @@ Partial Class frmSendungsdetailsNEU
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungsdetailsNEU))
-        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Me.pnl = New System.Windows.Forms.Panel()
        Me.Panel4 = New System.Windows.Forms.Panel()
        Me.TabControl1 = New System.Windows.Forms.TabControl()
@@ -391,6 +391,8 @@ Partial Class frmSendungsdetailsNEU
        Me.UNISPEDToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.VERAGToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.AuftragATANAKToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ATANAKTRFraechter = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ATANAKEUFraechter = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem26 = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem27 = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem25 = New System.Windows.Forms.ToolStripMenuItem()
@@ -400,10 +402,10 @@ Partial Class frmSendungsdetailsNEU
        Me.AlleEIDRSendungenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.AktuelleSendungToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.WarenortAMBARToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.AuftragMOTISToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.ToolStripMenuItem14 = New System.Windows.Forms.ToolStripMenuItem()
        Me.NurÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.AuftragMOTISToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.pnl.SuspendLayout()
        Me.Panel4.SuspendLayout()
        Me.TabControl1.SuspendLayout()
@@ -1444,18 +1446,18 @@ Partial Class frmSendungsdetailsNEU
        Me.gridVermerke.AllowUserToAddRows = False
        Me.gridVermerke.AllowUserToDeleteRows = False
        Me.gridVermerke.AllowUserToResizeRows = False
-        DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
+        DataGridViewCellStyle5.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle5
        Me.gridVermerke.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle2.BackColor = System.Drawing.Color.LightBlue
-        DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
-        DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
+        DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle6.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
+        DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle6
        Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
        Me.gridVermerke.Dock = System.Windows.Forms.DockStyle.Fill
        Me.gridVermerke.Location = New System.Drawing.Point(0, 0)
@@ -1464,8 +1466,8 @@ Partial Class frmSendungsdetailsNEU
        Me.gridVermerke.ReadOnly = True
        Me.gridVermerke.RowHeadersVisible = False
        Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle3
+        DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle7
        Me.gridVermerke.RowTemplate.Height = 20
        Me.gridVermerke.RowTemplate.ReadOnly = True
        Me.gridVermerke.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
@@ -2210,8 +2212,8 @@ Partial Class frmSendungsdetailsNEU
        'clmnPreis
        '
        Me.clmnPreis.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        DataGridViewCellStyle4.Format = "C2"
-        Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle4
+        DataGridViewCellStyle8.Format = "C2"
+        Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle8
        Me.clmnPreis.HeaderText = "Preis"
        Me.clmnPreis.MaxInputLength = 15
        Me.clmnPreis.Name = "clmnPreis"
@@ -5066,7 +5068,7 @@ Partial Class frmSendungsdetailsNEU
        Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(24, 24)
        Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem15, Me.T1BestätigungToolStripMenuItem, Me.SpeditionSUBENToolStripMenuItem, Me.ToolStripMenuItem16, Me.AuftragATANAKToolStripMenuItem, Me.ToolStripMenuItem26, Me.ToolStripMenuItem27, Me.ToolStripMenuItem25, Me.GVMSInfoToolStripMenuItem, Me.WarenortAMBARToolStripMenuItem, Me.AuftragMOTISToolStripMenuItem})
        Me.ContextMenuStrip1.Name = "cntxtAnh"
-        Me.ContextMenuStrip1.Size = New System.Drawing.Size(223, 356)
+        Me.ContextMenuStrip1.Size = New System.Drawing.Size(223, 334)
        '
        'ToolStripMenuItem15
        '
@@ -5129,11 +5131,26 @@ Partial Class frmSendungsdetailsNEU
        '
        'AuftragATANAKToolStripMenuItem
        '
+        Me.AuftragATANAKToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ATANAKTRFraechter, Me.ATANAKEUFraechter})
        Me.AuftragATANAKToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1
        Me.AuftragATANAKToolStripMenuItem.Name = "AuftragATANAKToolStripMenuItem"
        Me.AuftragATANAKToolStripMenuItem.Size = New System.Drawing.Size(222, 30)
        Me.AuftragATANAKToolStripMenuItem.Text = "Auftrag DSG/ATANAK (UK)"
        '
+        'ATANAKTRFraechter
+        '
+        Me.ATANAKTRFraechter.Image = CType(resources.GetObject("ATANAKTRFraechter.Image"), System.Drawing.Image)
+        Me.ATANAKTRFraechter.Name = "ATANAKTRFraechter"
+        Me.ATANAKTRFraechter.Size = New System.Drawing.Size(238, 30)
+        Me.ATANAKTRFraechter.Text = "ATANAK (TR Frächter)"
+        '
+        'ATANAKEUFraechter
+        '
+        Me.ATANAKEUFraechter.Image = CType(resources.GetObject("ATANAKEUFraechter.Image"), System.Drawing.Image)
+        Me.ATANAKEUFraechter.Name = "ATANAKEUFraechter"
+        Me.ATANAKEUFraechter.Size = New System.Drawing.Size(238, 30)
+        Me.ATANAKEUFraechter.Text = "ATANAK (EU/andere Frächter)"
+        '
        'ToolStripMenuItem26
        '
        Me.ToolStripMenuItem26.Image = Global.AVISO.My.Resources.Resources.email_big1
@@ -5200,6 +5217,13 @@ Partial Class frmSendungsdetailsNEU
        Me.WarenortAMBARToolStripMenuItem.Text = "Warenort (AMBAR) "
        Me.WarenortAMBARToolStripMenuItem.Visible = False
        '
+        'AuftragMOTISToolStripMenuItem
+        '
+        Me.AuftragMOTISToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1
+        Me.AuftragMOTISToolStripMenuItem.Name = "AuftragMOTISToolStripMenuItem"
+        Me.AuftragMOTISToolStripMenuItem.Size = New System.Drawing.Size(222, 30)
+        Me.AuftragMOTISToolStripMenuItem.Text = "Auftrag MOTIS"
+        '
        'ContextMenuStrip2
        '
        Me.ContextMenuStrip2.ImageScalingSize = New System.Drawing.Size(24, 24)
@@ -5222,13 +5246,6 @@ Partial Class frmSendungsdetailsNEU
        Me.NurÖffnenToolStripMenuItem.Size = New System.Drawing.Size(255, 30)
        Me.NurÖffnenToolStripMenuItem.Text = "nur öffnen"
        '
-        'AuftragMOTISToolStripMenuItem
-        '
-        Me.AuftragMOTISToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1
-        Me.AuftragMOTISToolStripMenuItem.Name = "AuftragMOTISToolStripMenuItem"
-        Me.AuftragMOTISToolStripMenuItem.Size = New System.Drawing.Size(222, 30)
-        Me.AuftragMOTISToolStripMenuItem.Text = "Auftrag MOTIS"
-        '
        'frmSendungsdetailsNEU
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
@@ -5666,7 +5683,6 @@ Partial Class frmSendungsdetailsNEU
    Friend WithEvents ExportT1ToolStripMenuItem As ToolStripMenuItem
    Public WithEvents txtAnzahlPos As VERAG_PROG_ALLGEMEIN.MyTextBox
    Friend WithEvents Label4 As Label
-    Friend WithEvents AuftragATANAKToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents btnQuckScan As Button
    Friend WithEvents ToolStripMenuItem21 As ToolStripMenuItem
    Friend WithEvents ToolStripMenuItem22 As ToolStripMenuItem
@@ -5703,4 +5719,7 @@ Partial Class frmSendungsdetailsNEU
    Friend WithEvents AMBARZollbeschauNEUToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents WarenortAMBARToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents AuftragMOTISToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents AuftragATANAKToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ATANAKTRFraechter As ToolStripMenuItem
+    Friend WithEvents ATANAKEUFraechter As ToolStripMenuItem
 End Class