merge

Aviso/frmSendungsdetailsNEU.Designer.vb

@@ -24,20 +24,20 @@ 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 DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle20 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle21 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle22 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle23 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle24 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle25 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle26 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle27 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle28 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle14 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()
@@ -93,6 +93,13 @@ Partial Class frmSendungsdetailsNEU
         Me.toolModal_Transit = New System.Windows.Forms.ToolStripMenuItem()
         Me.ToolStripMenuItem12 = New System.Windows.Forms.ToolStripMenuItem()
         Me.ToolStripMenuItem32 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.tbATEZ = New System.Windows.Forms.TabPage()
+        Me.dgvATEZNCTS = New System.Windows.Forms.DataGridView()
+        Me.Panel23 = New System.Windows.Forms.Panel()
+        Me.Label18 = New System.Windows.Forms.Label()
+        Me.Label17 = New System.Windows.Forms.Label()
+        Me.btnATEZNewEZA = New System.Windows.Forms.Button()
+        Me.btnATEZNew = New System.Windows.Forms.Button()
         Me.TabPage1 = New System.Windows.Forms.TabPage()
         Me.pnlKundenZolltarif = New System.Windows.Forms.Panel()
         Me.Label22 = New System.Windows.Forms.Label()
@@ -128,11 +135,6 @@ Partial Class frmSendungsdetailsNEU
         Me.TabPage3 = New System.Windows.Forms.TabPage()
         Me.RCntrlVermerke1 = New AVISO.rCntrlVermerke()
         Me.gridVermerke = New System.Windows.Forms.DataGridView()
-        Me.tbATEZ = New System.Windows.Forms.TabPage()
-        Me.dgvATEZNCTS = New System.Windows.Forms.DataGridView()
-        Me.Panel23 = New System.Windows.Forms.Panel()
-        Me.btnATEZNewEZA = New System.Windows.Forms.Button()
-        Me.btnATEZNew = 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()
@@ -505,8 +507,6 @@ Partial Class frmSendungsdetailsNEU
         Me.DataGridViewTextBoxColumn3 = New System.Windows.Forms.DataGridViewTextBoxColumn()
         Me.DataGridViewTextBoxColumn4 = New System.Windows.Forms.DataGridViewTextBoxColumn()
         Me.DataGridViewTextBoxColumn5 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.Label17 = New System.Windows.Forms.Label()
-        Me.Label18 = New System.Windows.Forms.Label()
         Me.pnl.SuspendLayout()
         Me.Panel4.SuspendLayout()
         Me.TabControl1.SuspendLayout()
@@ -520,6 +520,9 @@ Partial Class frmSendungsdetailsNEU
         CType(Me.dgvZollAnmeldungen, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.Panel17.SuspendLayout()
         Me.MenuStrip.SuspendLayout()
+        Me.tbATEZ.SuspendLayout()
+        CType(Me.dgvATEZNCTS, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.Panel23.SuspendLayout()
         Me.TabPage1.SuspendLayout()
         Me.pnlKundenZolltarif.SuspendLayout()
         Me.Panel18.SuspendLayout()
@@ -528,9 +531,6 @@ Partial Class frmSendungsdetailsNEU
         Me.pnlSpedBuchNacherfassung.SuspendLayout()
         Me.TabPage3.SuspendLayout()
         CType(Me.gridVermerke, System.ComponentModel.ISupportInitialize).BeginInit()
-        Me.tbATEZ.SuspendLayout()
-        CType(Me.dgvATEZNCTS, System.ComponentModel.ISupportInitialize).BeginInit()
-        Me.Panel23.SuspendLayout()
         Me.tbDigicust.SuspendLayout()
         CType(Me.dgvDigicust, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.Panel24.SuspendLayout()
@@ -1202,6 +1202,121 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem32.Text = "  Log"
         Me.ToolStripMenuItem32.ToolTipText = "Logbuch"
         '
+        'tbATEZ
+        '
+        Me.tbATEZ.Controls.Add(Me.dgvATEZNCTS)
+        Me.tbATEZ.Controls.Add(Me.Panel23)
+        Me.tbATEZ.Location = New System.Drawing.Point(4, 29)
+        Me.tbATEZ.Name = "tbATEZ"
+        Me.tbATEZ.Padding = New System.Windows.Forms.Padding(3)
+        Me.tbATEZ.Size = New System.Drawing.Size(1227, 308)
+        Me.tbATEZ.TabIndex = 6
+        Me.tbATEZ.Text = "ATEZ"
+        Me.tbATEZ.UseVisualStyleBackColor = True
+        '
+        'dgvATEZNCTS
+        '
+        Me.dgvATEZNCTS.AllowUserToAddRows = False
+        Me.dgvATEZNCTS.AllowUserToDeleteRows = False
+        Me.dgvATEZNCTS.AllowUserToResizeRows = False
+        DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvATEZNCTS.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
+        Me.dgvATEZNCTS.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", 10.0!)
+        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.dgvATEZNCTS.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
+        Me.dgvATEZNCTS.ColumnHeadersHeight = 29
+        Me.dgvATEZNCTS.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
+        Me.dgvATEZNCTS.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvATEZNCTS.Location = New System.Drawing.Point(3, 73)
+        Me.dgvATEZNCTS.MultiSelect = False
+        Me.dgvATEZNCTS.Name = "dgvATEZNCTS"
+        Me.dgvATEZNCTS.ReadOnly = True
+        Me.dgvATEZNCTS.RowHeadersVisible = False
+        Me.dgvATEZNCTS.RowHeadersWidth = 51
+        Me.dgvATEZNCTS.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
+        DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvATEZNCTS.RowsDefaultCellStyle = DataGridViewCellStyle3
+        Me.dgvATEZNCTS.RowTemplate.Height = 20
+        Me.dgvATEZNCTS.RowTemplate.ReadOnly = True
+        Me.dgvATEZNCTS.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.dgvATEZNCTS.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.dgvATEZNCTS.ShowCellErrors = False
+        Me.dgvATEZNCTS.ShowRowErrors = False
+        Me.dgvATEZNCTS.Size = New System.Drawing.Size(1221, 232)
+        Me.dgvATEZNCTS.TabIndex = 105
+        Me.dgvATEZNCTS.TabStop = False
+        '
+        'Panel23
+        '
+        Me.Panel23.BackColor = System.Drawing.Color.White
+        Me.Panel23.Controls.Add(Me.Label18)
+        Me.Panel23.Controls.Add(Me.Label17)
+        Me.Panel23.Controls.Add(Me.btnATEZNewEZA)
+        Me.Panel23.Controls.Add(Me.btnATEZNew)
+        Me.Panel23.Dock = System.Windows.Forms.DockStyle.Top
+        Me.Panel23.Location = New System.Drawing.Point(3, 3)
+        Me.Panel23.Name = "Panel23"
+        Me.Panel23.Size = New System.Drawing.Size(1221, 70)
+        Me.Panel23.TabIndex = 106
+        '
+        'Label18
+        '
+        Me.Label18.AutoSize = True
+        Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label18.Location = New System.Drawing.Point(595, 18)
+        Me.Label18.Name = "Label18"
+        Me.Label18.Size = New System.Drawing.Size(226, 39)
+        Me.Label18.TabIndex = 76
+        Me.Label18.Text = "Erstellt eine Zollanmeldung anhand der " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Unterlagen mit ATEZ TransitAI und übermi" &
+    "ttelt " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "den Entwurf an DAKOSY als NCTS." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
+        '
+        'Label17
+        '
+        Me.Label17.AutoSize = True
+        Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label17.Location = New System.Drawing.Point(170, 18)
+        Me.Label17.Name = "Label17"
+        Me.Label17.Size = New System.Drawing.Size(240, 39)
+        Me.Label17.TabIndex = 75
+        Me.Label17.Text = "Erstellt eine Zollanmeldung anhand der " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Unterlagen mit ATEZ DeclarantAI und über" &
+    "mittelt " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "den Entwurf an DAKOSY als EZA."
+        '
+        'btnATEZNewEZA
+        '
+        Me.btnATEZNewEZA.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnATEZNewEZA.Image = Global.AVISO.My.Resources.Resources.ico_atez_declarantAI
+        Me.btnATEZNewEZA.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnATEZNewEZA.Location = New System.Drawing.Point(7, 11)
+        Me.btnATEZNewEZA.Name = "btnATEZNewEZA"
+        Me.btnATEZNewEZA.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0)
+        Me.btnATEZNewEZA.Size = New System.Drawing.Size(160, 50)
+        Me.btnATEZNewEZA.TabIndex = 9
+        Me.btnATEZNewEZA.Text = "ATEZ-EZA"
+        Me.btnATEZNewEZA.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.btnATEZNewEZA.UseVisualStyleBackColor = True
+        '
+        'btnATEZNew
+        '
+        Me.btnATEZNew.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnATEZNew.Image = Global.AVISO.My.Resources.Resources.ico_atez_transitAI
+        Me.btnATEZNew.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnATEZNew.Location = New System.Drawing.Point(429, 11)
+        Me.btnATEZNew.Name = "btnATEZNew"
+        Me.btnATEZNew.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0)
+        Me.btnATEZNew.Size = New System.Drawing.Size(160, 50)
+        Me.btnATEZNew.TabIndex = 8
+        Me.btnATEZNew.Text = "ATEZ-NCTS"
+        Me.btnATEZNew.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.btnATEZNew.UseVisualStyleBackColor = True
+        Me.btnATEZNew.Visible = False
+        '
         'TabPage1
         '
         Me.TabPage1.Controls.Add(Me.pnlKundenZolltarif)
@@ -1644,18 +1759,18 @@ Partial Class frmSendungsdetailsNEU
         Me.gridVermerke.AllowUserToAddRows = False
         Me.gridVermerke.AllowUserToDeleteRows = False
         Me.gridVermerke.AllowUserToResizeRows = False
-        DataGridViewCellStyle18.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle4.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle18
+        Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4
         Me.gridVermerke.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle19.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle19.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle5.BackColor = System.Drawing.Color.LightBlue
-        DataGridViewCellStyle19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
+        DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
-        DataGridViewCellStyle19.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle19.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle19.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle19.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle19
+        Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle5
         Me.gridVermerke.ColumnHeadersHeight = 29
         Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
         Me.gridVermerke.Dock = System.Windows.Forms.DockStyle.Fill
@@ -1666,8 +1781,8 @@ Partial Class frmSendungsdetailsNEU
         Me.gridVermerke.RowHeadersVisible = False
         Me.gridVermerke.RowHeadersWidth = 51
         Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle20.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle20
+        Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle6
         Me.gridVermerke.RowTemplate.Height = 20
         Me.gridVermerke.RowTemplate.ReadOnly = True
         Me.gridVermerke.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
@@ -1678,99 +1793,6 @@ Partial Class frmSendungsdetailsNEU
         Me.gridVermerke.TabIndex = 0
         Me.gridVermerke.TabStop = False
         '
-        'tbATEZ
-        '
-        Me.tbATEZ.Controls.Add(Me.dgvATEZNCTS)
-        Me.tbATEZ.Controls.Add(Me.Panel23)
-        Me.tbATEZ.Location = New System.Drawing.Point(4, 29)
-        Me.tbATEZ.Name = "tbATEZ"
-        Me.tbATEZ.Padding = New System.Windows.Forms.Padding(3)
-        Me.tbATEZ.Size = New System.Drawing.Size(1227, 308)
-        Me.tbATEZ.TabIndex = 6
-        Me.tbATEZ.Text = "ATEZ"
-        Me.tbATEZ.UseVisualStyleBackColor = True
-        '
-        'dgvATEZNCTS
-        '
-        Me.dgvATEZNCTS.AllowUserToAddRows = False
-        Me.dgvATEZNCTS.AllowUserToDeleteRows = False
-        Me.dgvATEZNCTS.AllowUserToResizeRows = False
-        DataGridViewCellStyle15.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvATEZNCTS.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle15
-        Me.dgvATEZNCTS.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle16.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle16.BackColor = System.Drawing.Color.LightBlue
-        DataGridViewCellStyle16.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
-        DataGridViewCellStyle16.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle16.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle16.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvATEZNCTS.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle16
-        Me.dgvATEZNCTS.ColumnHeadersHeight = 29
-        Me.dgvATEZNCTS.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        Me.dgvATEZNCTS.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.dgvATEZNCTS.Location = New System.Drawing.Point(3, 73)
-        Me.dgvATEZNCTS.MultiSelect = False
-        Me.dgvATEZNCTS.Name = "dgvATEZNCTS"
-        Me.dgvATEZNCTS.ReadOnly = True
-        Me.dgvATEZNCTS.RowHeadersVisible = False
-        Me.dgvATEZNCTS.RowHeadersWidth = 51
-        Me.dgvATEZNCTS.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle17.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvATEZNCTS.RowsDefaultCellStyle = DataGridViewCellStyle17
-        Me.dgvATEZNCTS.RowTemplate.Height = 20
-        Me.dgvATEZNCTS.RowTemplate.ReadOnly = True
-        Me.dgvATEZNCTS.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.dgvATEZNCTS.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.dgvATEZNCTS.ShowCellErrors = False
-        Me.dgvATEZNCTS.ShowRowErrors = False
-        Me.dgvATEZNCTS.Size = New System.Drawing.Size(1221, 232)
-        Me.dgvATEZNCTS.TabIndex = 105
-        Me.dgvATEZNCTS.TabStop = False
-        '
-        'Panel23
-        '
-        Me.Panel23.BackColor = System.Drawing.Color.White
-        Me.Panel23.Controls.Add(Me.Label18)
-        Me.Panel23.Controls.Add(Me.Label17)
-        Me.Panel23.Controls.Add(Me.btnATEZNewEZA)
-        Me.Panel23.Controls.Add(Me.btnATEZNew)
-        Me.Panel23.Dock = System.Windows.Forms.DockStyle.Top
-        Me.Panel23.Location = New System.Drawing.Point(3, 3)
-        Me.Panel23.Name = "Panel23"
-        Me.Panel23.Size = New System.Drawing.Size(1221, 70)
-        Me.Panel23.TabIndex = 106
-        '
-        'btnATEZNewEZA
-        '
-        Me.btnATEZNewEZA.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.btnATEZNewEZA.Image = Global.AVISO.My.Resources.Resources.ico_atez_declarantAI
-        Me.btnATEZNewEZA.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.btnATEZNewEZA.Location = New System.Drawing.Point(7, 11)
-        Me.btnATEZNewEZA.Name = "btnATEZNewEZA"
-        Me.btnATEZNewEZA.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0)
-        Me.btnATEZNewEZA.Size = New System.Drawing.Size(160, 50)
-        Me.btnATEZNewEZA.TabIndex = 9
-        Me.btnATEZNewEZA.Text = "ATEZ-EZA"
-        Me.btnATEZNewEZA.TextAlign = System.Drawing.ContentAlignment.MiddleRight
-        Me.btnATEZNewEZA.UseVisualStyleBackColor = True
-        '
-        'btnATEZNew
-        '
-        Me.btnATEZNew.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.btnATEZNew.Image = Global.AVISO.My.Resources.Resources.ico_atez_transitAI
-        Me.btnATEZNew.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.btnATEZNew.Location = New System.Drawing.Point(429, 11)
-        Me.btnATEZNew.Name = "btnATEZNew"
-        Me.btnATEZNew.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0)
-        Me.btnATEZNew.Size = New System.Drawing.Size(160, 50)
-        Me.btnATEZNew.TabIndex = 8
-        Me.btnATEZNew.Text = "ATEZ-NCTS"
-        Me.btnATEZNew.TextAlign = System.Drawing.ContentAlignment.MiddleRight
-        Me.btnATEZNew.UseVisualStyleBackColor = True
-        Me.btnATEZNew.Visible = False
-        '
         'tbDigicust
         '
         Me.tbDigicust.Controls.Add(Me.dgvDigicust)
@@ -1787,18 +1809,18 @@ Partial Class frmSendungsdetailsNEU
         Me.dgvDigicust.AllowUserToAddRows = False
         Me.dgvDigicust.AllowUserToDeleteRows = False
         Me.dgvDigicust.AllowUserToResizeRows = False
-        DataGridViewCellStyle21.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle7.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle21.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvDigicust.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle21
+        Me.dgvDigicust.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle7
         Me.dgvDigicust.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle22.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle22.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle8.BackColor = System.Drawing.Color.LightBlue
-        DataGridViewCellStyle22.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
-        DataGridViewCellStyle22.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle22.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle22.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle22.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvDigicust.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle22
+        Me.dgvDigicust.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle8
         Me.dgvDigicust.ColumnHeadersHeight = 29
         Me.dgvDigicust.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
         Me.dgvDigicust.Dock = System.Windows.Forms.DockStyle.Fill
@@ -1809,8 +1831,8 @@ Partial Class frmSendungsdetailsNEU
         Me.dgvDigicust.RowHeadersVisible = False
         Me.dgvDigicust.RowHeadersWidth = 51
         Me.dgvDigicust.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle23.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvDigicust.RowsDefaultCellStyle = DataGridViewCellStyle23
+        Me.dgvDigicust.RowsDefaultCellStyle = DataGridViewCellStyle9
         Me.dgvDigicust.RowTemplate.Height = 20
         Me.dgvDigicust.RowTemplate.ReadOnly = True
         Me.dgvDigicust.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
@@ -1862,18 +1884,18 @@ Partial Class frmSendungsdetailsNEU
         Me.dgvMail.AllowUserToAddRows = False
         Me.dgvMail.AllowUserToDeleteRows = False
         Me.dgvMail.AllowUserToResizeRows = False
-        DataGridViewCellStyle24.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle10.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle24.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvMail.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle24
+        Me.dgvMail.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle10
         Me.dgvMail.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle25.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle11.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle25.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle11.BackColor = System.Drawing.Color.LightBlue
-        DataGridViewCellStyle25.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        DataGridViewCellStyle11.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
-        DataGridViewCellStyle25.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle11.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle25.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle11.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle25.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle11.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle25.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvMail.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle25
+        Me.dgvMail.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle11
         Me.dgvMail.ColumnHeadersHeight = 29
         Me.dgvMail.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
         Me.dgvMail.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnSender, Me.clmnRec, Me.clmnSbj, Me.clmnAtt, Me.clmnUIDL})
@@ -1885,8 +1907,8 @@ Partial Class frmSendungsdetailsNEU
         Me.dgvMail.RowHeadersVisible = False
         Me.dgvMail.RowHeadersWidth = 51
         Me.dgvMail.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle26.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvMail.RowsDefaultCellStyle = DataGridViewCellStyle26
+        Me.dgvMail.RowsDefaultCellStyle = DataGridViewCellStyle12
         Me.dgvMail.RowTemplate.Height = 20
         Me.dgvMail.RowTemplate.ReadOnly = True
         Me.dgvMail.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
@@ -2754,8 +2776,8 @@ Partial Class frmSendungsdetailsNEU
         '
         'clmnAbrPreis
         '
-        DataGridViewCellStyle27.Format = "C2"
+        DataGridViewCellStyle13.Format = "C2"
-        Me.clmnAbrPreis.DefaultCellStyle = DataGridViewCellStyle27
+        Me.clmnAbrPreis.DefaultCellStyle = DataGridViewCellStyle13
         Me.clmnAbrPreis.HeaderText = "Preis"
         Me.clmnAbrPreis.MaxInputLength = 15
         Me.clmnAbrPreis.MinimumWidth = 6
@@ -3006,8 +3028,8 @@ Partial Class frmSendungsdetailsNEU
         'clmnPreis
         '
         Me.clmnPreis.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        DataGridViewCellStyle28.Format = "C2"
+        DataGridViewCellStyle14.Format = "C2"
-        Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle28
+        Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle14
         Me.clmnPreis.HeaderText = "Preis"
         Me.clmnPreis.MaxInputLength = 15
         Me.clmnPreis.MinimumWidth = 6
@@ -6437,28 +6459,6 @@ Partial Class frmSendungsdetailsNEU
         Me.DataGridViewTextBoxColumn5.Name = "DataGridViewTextBoxColumn5"
         Me.DataGridViewTextBoxColumn5.ReadOnly = True
         Me.DataGridViewTextBoxColumn5.Width = 200
-        '
-        'Label17
-        '
-        Me.Label17.AutoSize = True
-        Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label17.Location = New System.Drawing.Point(170, 18)
-        Me.Label17.Name = "Label17"
-        Me.Label17.Size = New System.Drawing.Size(240, 39)
-        Me.Label17.TabIndex = 75
-        Me.Label17.Text = "Erstellt eine Zollanmeldung anhand der " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Unterlagen mit ATEZ DeclarantAI und über" &
-    "mittelt " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "den Entwurf an DAKOSY als EZA."
-        '
-        'Label18
-        '
-        Me.Label18.AutoSize = True
-        Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label18.Location = New System.Drawing.Point(595, 18)
-        Me.Label18.Name = "Label18"
-        Me.Label18.Size = New System.Drawing.Size(226, 39)
-        Me.Label18.TabIndex = 76
-        Me.Label18.Text = "Erstellt eine Zollanmeldung anhand der " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Unterlagen mit ATEZ TransitAI und übermi" &
-    "ttelt " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "den Entwurf an DAKOSY als NCTS." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
         '
         'frmSendungsdetailsNEU
         '
@@ -6493,6 +6493,10 @@ Partial Class frmSendungsdetailsNEU
         Me.Panel17.ResumeLayout(False)
         Me.MenuStrip.ResumeLayout(False)
         Me.MenuStrip.PerformLayout()
+        Me.tbATEZ.ResumeLayout(False)
+        CType(Me.dgvATEZNCTS, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel23.ResumeLayout(False)
+        Me.Panel23.PerformLayout()
         Me.TabPage1.ResumeLayout(False)
         Me.TabPage1.PerformLayout()
         Me.pnlKundenZolltarif.ResumeLayout(False)
@@ -6505,10 +6509,6 @@ Partial Class frmSendungsdetailsNEU
         Me.pnlSpedBuchNacherfassung.PerformLayout()
         Me.TabPage3.ResumeLayout(False)
         CType(Me.gridVermerke, System.ComponentModel.ISupportInitialize).EndInit()
-        Me.tbATEZ.ResumeLayout(False)
-        CType(Me.dgvATEZNCTS, System.ComponentModel.ISupportInitialize).EndInit()
-        Me.Panel23.ResumeLayout(False)
-        Me.Panel23.PerformLayout()
         Me.tbDigicust.ResumeLayout(False)
         CType(Me.dgvDigicust, System.ComponentModel.ISupportInitialize).EndInit()
         Me.Panel24.ResumeLayout(False)

Aviso/frmSendungsdetailsNEU.resx

@@ -1386,9 +1386,6 @@
         nRA+F3D8f7cAkA4zZGm9AAAAAElFTkSuQmCC
 </value>
   </data>
-  <metadata name="MenuStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>296, 17</value>
-  </metadata>
   <data name="Button6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAH1JREFUOE/V
@@ -1527,21 +1524,6 @@
   <metadata name="clmnAbrPreis.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>
-  <metadata name="clmnAbrId.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="clmnAbrFirma.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="clmnAbrLeistungsNr.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="clmnAbrLeistung.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="clmnAbrPreis.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
   <data name="Button9.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAG9JREFUSEvt
@@ -1652,18 +1634,6 @@
   <metadata name="clmnPreis.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>
-  <metadata name="clmnVK_id.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="clmnFirma.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="clmnLeistung.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="clmnPreis.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
   <metadata name="ToolTip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>404, 17</value>
   </metadata>
@@ -1926,9 +1896,6 @@
   <metadata name="cntxtOptions.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>174, 17</value>
   </metadata>
-  <metadata name="ToolTip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>404, 17</value>
-  </metadata>
   <metadata name="ctxtWeitereFormulare.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>596, 17</value>
   </metadata>

Aviso/frmSendungsdetailsNEU.vb

@@ -5264,12 +5264,12 @@ Public Class frmSendungsdetailsNEU
             If ABR_ID >= 0 Then
                 Dim ABR = SENDUNG_LIST(CURRENT_INDEX).ABRECHNUNG(ABR_ID)
                 ABR.sndabr_LeistungsNr = cboAbrLeistungen._value
-                abr.sndabr_abrArt = ""
+                ABR.sndabr_abrArt = ""
                 ABR.sndabr_bezeichnung = txtAbrLeistungsBez.Text.Trim
                 ABR.sndabr_beteiligter = cboAbrAn._value.Trim
-                abr.sndabr_preis = CDbl(txtAbrPreis._value)
+                ABR.sndabr_preis = CDbl(txtAbrPreis._value)
-                abr.sndabr_einzelPreis = CDbl(txtAbrPreis._value)
+                ABR.sndabr_einzelPreis = CDbl(txtAbrPreis._value)
-                abr.sndabr_anzahl = 1
+                ABR.sndabr_anzahl = 1
                 'SENDUNG_LIST(CURRENT_INDEX).SAVE()
                 btnAddAbr.BackgroundImage = My.Resources.plus
             Else
@@ -5289,7 +5289,7 @@ Public Class frmSendungsdetailsNEU
             txtVK_Leistung.Text = ""
             txtVK_Firma.Text = ""
             txtVK_Preis.Text = ""
-            initdgvAbrechnung()
+            initDGVAbrechnung()
 
         Catch ex As Exception
             VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
@@ -5305,7 +5305,7 @@ Public Class frmSendungsdetailsNEU
                 Dim ABR = SENDUNG_LIST(CURRENT_INDEX).ABRECHNUNG.Find(Function(x) x.sndabr_id = dgvAbrechnung.SelectedRows(0).Cells("clmnAbrID").Value)
                 SENDUNG_LIST(CURRENT_INDEX).ABRECHNUNG.Remove(ABR)
                 SENDUNG_LIST(CURRENT_INDEX).SAVE(False)
-                initdgvAbrechnung()
+                initDGVAbrechnung()
             End If
         End If
     End Sub