ATR Archiv

This commit is contained in:
2024-01-23 07:55:21 +01:00
parent 9ac830f590
commit e383a3e6a7
18 changed files with 363 additions and 247 deletions

View File

@@ -24,16 +24,16 @@ 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 DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle14 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle20 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
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()
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()
@@ -401,6 +401,8 @@ Partial Class frmSendungsdetailsNEU
Me.AMBARZollbeschauToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.AMBARZollbeschauNEUToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.AntragQualitätskontrolleToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.EmpfängerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.AuftraggeberToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ToolStripMenuItem15 = New System.Windows.Forms.ToolStripMenuItem()
Me.T1BestätigungToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
@@ -434,8 +436,7 @@ Partial Class frmSendungsdetailsNEU
Me.StatusAbrufenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ContextMenuStrip3 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.XXXToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.EmpfängerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.AuftraggeberToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.Button22 = New System.Windows.Forms.Button()
Me.pnl.SuspendLayout()
Me.Panel4.SuspendLayout()
Me.TabControl1.SuspendLayout()
@@ -628,6 +629,7 @@ Partial Class frmSendungsdetailsNEU
'
'Panel19
'
Me.Panel19.Controls.Add(Me.Button22)
Me.Panel19.Controls.Add(Me.Button17)
Me.Panel19.Controls.Add(Me.btnQuckScan)
Me.Panel19.Controls.Add(Me.Panel21)
@@ -662,7 +664,7 @@ Partial Class frmSendungsdetailsNEU
Me.btnQuckScan.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnQuckScan.Image = CType(resources.GetObject("btnQuckScan.Image"), System.Drawing.Image)
Me.btnQuckScan.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnQuckScan.Location = New System.Drawing.Point(595, 5)
Me.btnQuckScan.Location = New System.Drawing.Point(495, 5)
Me.btnQuckScan.Name = "btnQuckScan"
Me.btnQuckScan.Size = New System.Drawing.Size(107, 34)
Me.btnQuckScan.TabIndex = 4
@@ -774,7 +776,7 @@ Partial Class frmSendungsdetailsNEU
Me.btnPDFZusammenfueren.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnPDFZusammenfueren.Image = Global.AVISO.My.Resources.Resources.pdf11
Me.btnPDFZusammenfueren.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnPDFZusammenfueren.Location = New System.Drawing.Point(159, 5)
Me.btnPDFZusammenfueren.Location = New System.Drawing.Point(68, 5)
Me.btnPDFZusammenfueren.Name = "btnPDFZusammenfueren"
Me.btnPDFZusammenfueren.Size = New System.Drawing.Size(153, 34)
Me.btnPDFZusammenfueren.TabIndex = 1
@@ -787,7 +789,7 @@ Partial Class frmSendungsdetailsNEU
Me.btnMailVorlage.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnMailVorlage.Image = Global.AVISO.My.Resources.Resources.email_big1
Me.btnMailVorlage.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnMailVorlage.Location = New System.Drawing.Point(321, 5)
Me.btnMailVorlage.Location = New System.Drawing.Point(225, 5)
Me.btnMailVorlage.Name = "btnMailVorlage"
Me.btnMailVorlage.Padding = New System.Windows.Forms.Padding(0, 0, 20, 0)
Me.btnMailVorlage.Size = New System.Drawing.Size(134, 34)
@@ -815,7 +817,7 @@ Partial Class frmSendungsdetailsNEU
Me.btnImportAssi.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnImportAssi.Image = CType(resources.GetObject("btnImportAssi.Image"), System.Drawing.Image)
Me.btnImportAssi.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnImportAssi.Location = New System.Drawing.Point(461, 5)
Me.btnImportAssi.Location = New System.Drawing.Point(362, 5)
Me.btnImportAssi.Name = "btnImportAssi"
Me.btnImportAssi.Size = New System.Drawing.Size(129, 34)
Me.btnImportAssi.TabIndex = 3
@@ -1508,18 +1510,18 @@ Partial Class frmSendungsdetailsNEU
Me.gridVermerke.AllowUserToAddRows = False
Me.gridVermerke.AllowUserToDeleteRows = False
Me.gridVermerke.AllowUserToResizeRows = False
DataGridViewCellStyle11.BackColor = System.Drawing.Color.Azure
DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle11
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
Me.gridVermerke.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle12.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle12.BackColor = System.Drawing.Color.LightBlue
DataGridViewCellStyle12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
DataGridViewCellStyle12.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle12.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle12.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle12
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
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)
@@ -1528,8 +1530,8 @@ Partial Class frmSendungsdetailsNEU
Me.gridVermerke.ReadOnly = True
Me.gridVermerke.RowHeadersVisible = False
Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
DataGridViewCellStyle13.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle13
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle3
Me.gridVermerke.RowTemplate.Height = 20
Me.gridVermerke.RowTemplate.ReadOnly = True
Me.gridVermerke.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
@@ -1557,18 +1559,18 @@ Partial Class frmSendungsdetailsNEU
Me.dgvATEZNCTS.AllowUserToAddRows = False
Me.dgvATEZNCTS.AllowUserToDeleteRows = False
Me.dgvATEZNCTS.AllowUserToResizeRows = False
DataGridViewCellStyle14.BackColor = System.Drawing.Color.Azure
DataGridViewCellStyle14.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvATEZNCTS.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle14
DataGridViewCellStyle4.BackColor = System.Drawing.Color.Azure
DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvATEZNCTS.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4
Me.dgvATEZNCTS.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle15.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle15.BackColor = System.Drawing.Color.LightBlue
DataGridViewCellStyle15.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
DataGridViewCellStyle15.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle15.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle15.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvATEZNCTS.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle15
DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle5.BackColor = System.Drawing.Color.LightBlue
DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvATEZNCTS.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle5
Me.dgvATEZNCTS.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
Me.dgvATEZNCTS.Dock = System.Windows.Forms.DockStyle.Fill
Me.dgvATEZNCTS.Location = New System.Drawing.Point(3, 48)
@@ -1577,8 +1579,8 @@ Partial Class frmSendungsdetailsNEU
Me.dgvATEZNCTS.ReadOnly = True
Me.dgvATEZNCTS.RowHeadersVisible = False
Me.dgvATEZNCTS.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvATEZNCTS.RowsDefaultCellStyle = DataGridViewCellStyle16
DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvATEZNCTS.RowsDefaultCellStyle = DataGridViewCellStyle6
Me.dgvATEZNCTS.RowTemplate.Height = 20
Me.dgvATEZNCTS.RowTemplate.ReadOnly = True
Me.dgvATEZNCTS.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
@@ -1629,18 +1631,18 @@ Partial Class frmSendungsdetailsNEU
Me.dgvDigicust.AllowUserToAddRows = False
Me.dgvDigicust.AllowUserToDeleteRows = False
Me.dgvDigicust.AllowUserToResizeRows = False
DataGridViewCellStyle17.BackColor = System.Drawing.Color.Azure
DataGridViewCellStyle17.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvDigicust.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle17
DataGridViewCellStyle7.BackColor = System.Drawing.Color.Azure
DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvDigicust.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle7
Me.dgvDigicust.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle18.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle18.BackColor = System.Drawing.Color.LightBlue
DataGridViewCellStyle18.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
DataGridViewCellStyle18.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle18.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle18.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvDigicust.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle18
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)
@@ -1649,8 +1651,8 @@ Partial Class frmSendungsdetailsNEU
Me.dgvDigicust.ReadOnly = True
Me.dgvDigicust.RowHeadersVisible = False
Me.dgvDigicust.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
DataGridViewCellStyle19.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvDigicust.RowsDefaultCellStyle = DataGridViewCellStyle19
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]
@@ -2419,8 +2421,8 @@ Partial Class frmSendungsdetailsNEU
'clmnPreis
'
Me.clmnPreis.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
DataGridViewCellStyle20.Format = "C2"
Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle20
DataGridViewCellStyle10.Format = "C2"
Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle10
Me.clmnPreis.HeaderText = "Preis"
Me.clmnPreis.MaxInputLength = 15
Me.clmnPreis.Name = "clmnPreis"
@@ -5339,6 +5341,18 @@ Partial Class frmSendungsdetailsNEU
Me.AntragQualitätskontrolleToolStripMenuItem.Size = New System.Drawing.Size(262, 22)
Me.AntragQualitätskontrolleToolStripMenuItem.Text = "Antrag Qualitätskontrolle"
'
'EmpfängerToolStripMenuItem1
'
Me.EmpfängerToolStripMenuItem1.Name = "EmpfängerToolStripMenuItem1"
Me.EmpfängerToolStripMenuItem1.Size = New System.Drawing.Size(144, 22)
Me.EmpfängerToolStripMenuItem1.Text = "Empfänger"
'
'AuftraggeberToolStripMenuItem1
'
Me.AuftraggeberToolStripMenuItem1.Name = "AuftraggeberToolStripMenuItem1"
Me.AuftraggeberToolStripMenuItem1.Size = New System.Drawing.Size(144, 22)
Me.AuftraggeberToolStripMenuItem1.Text = "Auftraggeber"
'
'ContextMenuStrip1
'
Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(24, 24)
@@ -5568,17 +5582,18 @@ Partial Class frmSendungsdetailsNEU
Me.XXXToolStripMenuItem.Size = New System.Drawing.Size(95, 22)
Me.XXXToolStripMenuItem.Text = "XXX"
'
'EmpfängerToolStripMenuItem1
'Button22
'
Me.EmpfängerToolStripMenuItem1.Name = "EmpfängerToolStripMenuItem1"
Me.EmpfängerToolStripMenuItem1.Size = New System.Drawing.Size(180, 22)
Me.EmpfängerToolStripMenuItem1.Text = "Empfänger"
'
'AuftraggeberToolStripMenuItem1
'
Me.AuftraggeberToolStripMenuItem1.Name = "AuftraggeberToolStripMenuItem1"
Me.AuftraggeberToolStripMenuItem1.Size = New System.Drawing.Size(180, 22)
Me.AuftraggeberToolStripMenuItem1.Text = "Auftraggeber"
Me.Button22.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button22.Image = Global.AVISO.My.Resources.Resources.atr_s
Me.Button22.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button22.Location = New System.Drawing.Point(606, 5)
Me.Button22.Name = "Button22"
Me.Button22.Size = New System.Drawing.Size(105, 34)
Me.Button22.TabIndex = 8
Me.Button22.Text = "ATR Archiv"
Me.Button22.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button22.UseVisualStyleBackColor = True
'
'frmSendungsdetailsNEU
'
@@ -6088,4 +6103,5 @@ Partial Class frmSendungsdetailsNEU
Friend WithEvents txtUIDPruef As TextBox
Friend WithEvents EmpfängerToolStripMenuItem1 As ToolStripMenuItem
Friend WithEvents AuftraggeberToolStripMenuItem1 As ToolStripMenuItem
Friend WithEvents Button22 As Button
End Class