Bugfix ATEZ und Digicust

2023-09-12 12:19:29 +02:00
parent b48531626d
commit 629be8e387
5 changed files with 281 additions and 206 deletions
--- a/Aviso/frmSendungsdetailsNEU.Designer.vb
+++ b/Aviso/frmSendungsdetailsNEU.Designer.vb
@@ -30,10 +30,10 @@ Partial Class frmSendungsdetailsNEU
        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 DataGridViewCellStyle10 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()
        Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle10 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()
@@ -123,6 +123,8 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel23 = New System.Windows.Forms.Panel()
        Me.Button20 = New System.Windows.Forms.Button()
        Me.tbDigicust = New System.Windows.Forms.TabPage()
+        Me.dgvDigicust = New System.Windows.Forms.DataGridView()
+        Me.Panel24 = New System.Windows.Forms.Panel()
        Me.Button19 = New System.Windows.Forms.Button()
        Me.Panel14 = New System.Windows.Forms.Panel()
        Me.pnlDetails = New System.Windows.Forms.Panel()
@@ -426,8 +428,8 @@ Partial Class frmSendungsdetailsNEU
        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.dgvDigicust = New System.Windows.Forms.DataGridView()
-        Me.Panel24 = New System.Windows.Forms.Panel()
+        Me.cntDigicust = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.StatusAbrufenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.pnl.SuspendLayout()
        Me.Panel4.SuspendLayout()
        Me.TabControl1.SuspendLayout()
@@ -453,6 +455,8 @@ Partial Class frmSendungsdetailsNEU
        CType(Me.dgvATEZNCTS, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel23.SuspendLayout()
        Me.tbDigicust.SuspendLayout()
+        CType(Me.dgvDigicust, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.Panel24.SuspendLayout()
        Me.pnlDetails.SuspendLayout()
        Me.tbcntr.SuspendLayout()
        Me.TabPage4.SuspendLayout()
@@ -491,8 +495,7 @@ Partial Class frmSendungsdetailsNEU
        Me.ctxtWeitereFormulare.SuspendLayout()
        Me.ContextMenuStrip1.SuspendLayout()
        Me.ContextMenuStrip2.SuspendLayout()
-        CType(Me.dgvDigicust, System.ComponentModel.ISupportInitialize).BeginInit()
-        Me.Panel24.SuspendLayout()
+        Me.cntDigicust.SuspendLayout()
        Me.SuspendLayout()
        '
        'pnl
@@ -1609,6 +1612,52 @@ Partial Class frmSendungsdetailsNEU
        Me.tbDigicust.Text = "Digicust"
        Me.tbDigicust.UseVisualStyleBackColor = True
        '
+        'dgvDigicust
+        '
+        Me.dgvDigicust.AllowUserToAddRows = False
+        Me.dgvDigicust.AllowUserToDeleteRows = False
+        Me.dgvDigicust.AllowUserToResizeRows = False
+        DataGridViewCellStyle7.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvDigicust.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle7
+        Me.dgvDigicust.BackgroundColor = System.Drawing.Color.White
+        DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle8.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvDigicust.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle8
+        Me.dgvDigicust.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
+        Me.dgvDigicust.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvDigicust.Location = New System.Drawing.Point(0, 45)
+        Me.dgvDigicust.MultiSelect = False
+        Me.dgvDigicust.Name = "dgvDigicust"
+        Me.dgvDigicust.ReadOnly = True
+        Me.dgvDigicust.RowHeadersVisible = False
+        Me.dgvDigicust.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
+        DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvDigicust.RowsDefaultCellStyle = DataGridViewCellStyle9
+        Me.dgvDigicust.RowTemplate.Height = 20
+        Me.dgvDigicust.RowTemplate.ReadOnly = True
+        Me.dgvDigicust.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.dgvDigicust.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.dgvDigicust.ShowCellErrors = False
+        Me.dgvDigicust.ShowRowErrors = False
+        Me.dgvDigicust.Size = New System.Drawing.Size(1206, 243)
+        Me.dgvDigicust.TabIndex = 107
+        Me.dgvDigicust.TabStop = False
+        '
+        'Panel24
+        '
+        Me.Panel24.Controls.Add(Me.Button19)
+        Me.Panel24.Dock = System.Windows.Forms.DockStyle.Top
+        Me.Panel24.Location = New System.Drawing.Point(0, 0)
+        Me.Panel24.Name = "Panel24"
+        Me.Panel24.Size = New System.Drawing.Size(1206, 45)
+        Me.Panel24.TabIndex = 108
+        '
        'Button19
        '
        Me.Button19.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -5451,51 +5500,17 @@ Partial Class frmSendungsdetailsNEU
        Me.NurÖffnenToolStripMenuItem.Size = New System.Drawing.Size(255, 30)
        Me.NurÖffnenToolStripMenuItem.Text = "nur öffnen"
        '
-        'dgvDigicust
+        'cntDigicust
        '
-        Me.dgvDigicust.AllowUserToAddRows = False
-        Me.dgvDigicust.AllowUserToDeleteRows = False
-        Me.dgvDigicust.AllowUserToResizeRows = False
-        DataGridViewCellStyle7.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvDigicust.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle7
-        Me.dgvDigicust.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle8.BackColor = System.Drawing.Color.LightBlue
-        DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
-        DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvDigicust.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle8
-        Me.dgvDigicust.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        Me.dgvDigicust.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.dgvDigicust.Location = New System.Drawing.Point(0, 45)
-        Me.dgvDigicust.MultiSelect = False
-        Me.dgvDigicust.Name = "dgvDigicust"
-        Me.dgvDigicust.ReadOnly = True
-        Me.dgvDigicust.RowHeadersVisible = False
-        Me.dgvDigicust.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvDigicust.RowsDefaultCellStyle = DataGridViewCellStyle9
-        Me.dgvDigicust.RowTemplate.Height = 20
-        Me.dgvDigicust.RowTemplate.ReadOnly = True
-        Me.dgvDigicust.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.dgvDigicust.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.dgvDigicust.ShowCellErrors = False
-        Me.dgvDigicust.ShowRowErrors = False
-        Me.dgvDigicust.Size = New System.Drawing.Size(1206, 243)
-        Me.dgvDigicust.TabIndex = 107
-        Me.dgvDigicust.TabStop = False
+        Me.cntDigicust.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.StatusAbrufenToolStripMenuItem})
+        Me.cntDigicust.Name = "cntDigicust"
+        Me.cntDigicust.Size = New System.Drawing.Size(181, 48)
        '
-        'Panel24
+        'StatusAbrufenToolStripMenuItem
        '
-        Me.Panel24.Controls.Add(Me.Button19)
-        Me.Panel24.Dock = System.Windows.Forms.DockStyle.Top
-        Me.Panel24.Location = New System.Drawing.Point(0, 0)
-        Me.Panel24.Name = "Panel24"
-        Me.Panel24.Size = New System.Drawing.Size(1206, 45)
-        Me.Panel24.TabIndex = 108
+        Me.StatusAbrufenToolStripMenuItem.Name = "StatusAbrufenToolStripMenuItem"
+        Me.StatusAbrufenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.StatusAbrufenToolStripMenuItem.Text = "Status abrufen"
        '
        'frmSendungsdetailsNEU
        '
@@ -5545,6 +5560,8 @@ Partial Class frmSendungsdetailsNEU
        CType(Me.dgvATEZNCTS, System.ComponentModel.ISupportInitialize).EndInit()
        Me.Panel23.ResumeLayout(False)
        Me.tbDigicust.ResumeLayout(False)
+        CType(Me.dgvDigicust, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel24.ResumeLayout(False)
        Me.pnlDetails.ResumeLayout(False)
        Me.tbcntr.ResumeLayout(False)
        Me.TabPage4.ResumeLayout(False)
@@ -5595,8 +5612,7 @@ Partial Class frmSendungsdetailsNEU
        Me.ctxtWeitereFormulare.ResumeLayout(False)
        Me.ContextMenuStrip1.ResumeLayout(False)
        Me.ContextMenuStrip2.ResumeLayout(False)
-        CType(Me.dgvDigicust, System.ComponentModel.ISupportInitialize).EndInit()
-        Me.Panel24.ResumeLayout(False)
+        Me.cntDigicust.ResumeLayout(False)
        Me.ResumeLayout(False)

    End Sub
@@ -5995,4 +6011,6 @@ Partial Class frmSendungsdetailsNEU
    Friend WithEvents Button19 As Button
    Friend WithEvents dgvDigicust As DataGridView
    Friend WithEvents Panel24 As Panel
+    Friend WithEvents cntDigicust As ContextMenuStrip
+    Friend WithEvents StatusAbrufenToolStripMenuItem As ToolStripMenuItem
 End Class