Aviso Redesign

2026-03-27 10:08:20 +01:00
parent 0e00ec3a2a
commit d134027977
122 changed files with 2696 additions and 1394 deletions
--- a/Aviso/ATEZ/frmATEZ_EZA.Designer.vb
+++ b/Aviso/ATEZ/frmATEZ_EZA.Designer.vb
@@ -26,6 +26,7 @@ Partial Class frmATEZ_EZA
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmATEZ_EZA))
        Me.btnSend = New System.Windows.Forms.Button()
        Me.pnlHead = New System.Windows.Forms.Panel()
+        Me.Label4 = New System.Windows.Forms.Label()
        Me.lblInfo = New System.Windows.Forms.Label()
        Me.Label8 = New System.Windows.Forms.Label()
        Me.cboStammreferenz = New VERAG_PROG_ALLGEMEIN.MyComboBox()
@@ -48,7 +49,6 @@ Partial Class frmATEZ_EZA
        Me.btnAgg_desc = New System.Windows.Forms.Button()
        Me.dgvAnhaenge = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
        Me.columnName = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.Label4 = New System.Windows.Forms.Label()
        Me.Button2 = New System.Windows.Forms.Button()
        Me.pnlHead.SuspendLayout()
        CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -59,23 +59,24 @@ Partial Class frmATEZ_EZA
        Me.btnSend.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.btnSend.BackColor = System.Drawing.Color.White
        Me.btnSend.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
-        Me.btnSend.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnSend.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnSend.Image = Global.AVISO.My.Resources.Resources.Declarant
-        Me.btnSend.ImageAlign = System.Drawing.ContentAlignment.TopCenter
-        Me.btnSend.Location = New System.Drawing.Point(486, 348)
+        Me.btnSend.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        Me.btnSend.Image = Global.AVISO.My.Resources.Resources.ico_atez_declarantAI
+        Me.btnSend.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnSend.Location = New System.Drawing.Point(473, 348)
        Me.btnSend.Margin = New System.Windows.Forms.Padding(2)
        Me.btnSend.Name = "btnSend"
-        Me.btnSend.Size = New System.Drawing.Size(192, 58)
+        Me.btnSend.Padding = New System.Windows.Forms.Padding(5, 0, 5, 0)
+        Me.btnSend.Size = New System.Drawing.Size(205, 58)
        Me.btnSend.TabIndex = 26
        Me.btnSend.Text = "An ATEZ senden >>"
-        Me.btnSend.TextAlign = System.Drawing.ContentAlignment.BottomCenter
+        Me.btnSend.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.btnSend.UseVisualStyleBackColor = False
        '
        'pnlHead
        '
        Me.pnlHead.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
        Me.pnlHead.BackColor = System.Drawing.Color.White
+        Me.pnlHead.Controls.Add(Me.Label1)
        Me.pnlHead.Controls.Add(Me.Label4)
        Me.pnlHead.Controls.Add(Me.lblInfo)
        Me.pnlHead.Controls.Add(Me.Label8)
@@ -85,7 +86,6 @@ Partial Class frmATEZ_EZA
        Me.pnlHead.Controls.Add(Me.Label9)
        Me.pnlHead.Controls.Add(Me.sbAdressierteZollstelle)
        Me.pnlHead.Controls.Add(Me.txtDyMandant)
-        Me.pnlHead.Controls.Add(Me.Label1)
        Me.pnlHead.Controls.Add(Me.txtDyNiederlassung)
        Me.pnlHead.Controls.Add(Me.lblBezugsnummer)
        Me.pnlHead.Location = New System.Drawing.Point(3, 2)
@@ -93,6 +93,15 @@ Partial Class frmATEZ_EZA
        Me.pnlHead.Size = New System.Drawing.Size(675, 151)
        Me.pnlHead.TabIndex = 112
        '
+        'Label4
+        '
+        Me.Label4.BackColor = System.Drawing.Color.White
+        Me.Label4.Location = New System.Drawing.Point(108, 13)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(45, 12)
+        Me.Label4.TabIndex = 149
+        Me.Label4.Text = "SUB"
+        '
        'lblInfo
        '
        Me.lblInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -106,9 +115,9 @@ Partial Class frmATEZ_EZA
        '
        Me.Label8.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label8.AutoSize = True
-        Me.Label8.Location = New System.Drawing.Point(10, 61)
+        Me.Label8.Location = New System.Drawing.Point(6, 61)
        Me.Label8.Name = "Label8"
-        Me.Label8.Size = New System.Drawing.Size(80, 13)
+        Me.Label8.Size = New System.Drawing.Size(86, 13)
        Me.Label8.TabIndex = 146
        Me.Label8.Text = "Stammreferenz:"
        Me.Label8.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -154,17 +163,19 @@ Partial Class frmATEZ_EZA
        '
        'Label3
        '
-        Me.Label3.Location = New System.Drawing.Point(10, 91)
+        Me.Label3.AutoSize = True
+        Me.Label3.Location = New System.Drawing.Point(6, 91)
        Me.Label3.Name = "Label3"
-        Me.Label3.Size = New System.Drawing.Size(103, 17)
+        Me.Label3.Size = New System.Drawing.Size(48, 13)
        Me.Label3.TabIndex = 113
        Me.Label3.Text = "LKW-KZ:"
        '
        'Label9
        '
-        Me.Label9.Location = New System.Drawing.Point(10, 117)
+        Me.Label9.AutoSize = True
+        Me.Label9.Location = New System.Drawing.Point(6, 117)
        Me.Label9.Name = "Label9"
-        Me.Label9.Size = New System.Drawing.Size(103, 17)
+        Me.Label9.Size = New System.Drawing.Size(117, 13)
        Me.Label9.TabIndex = 110
        Me.Label9.Text = "Adressierte-Zollstelle:"
        '
@@ -196,10 +207,11 @@ Partial Class frmATEZ_EZA
        '
        'txtDyMandant
        '
+        Me.txtDyMandant.AutoSize = True
        Me.txtDyMandant.BackColor = System.Drawing.Color.White
-        Me.txtDyMandant.Location = New System.Drawing.Point(2, 7)
+        Me.txtDyMandant.Location = New System.Drawing.Point(6, 13)
        Me.txtDyMandant.Name = "txtDyMandant"
-        Me.txtDyMandant.Size = New System.Drawing.Size(44, 13)
+        Me.txtDyMandant.Size = New System.Drawing.Size(35, 13)
        Me.txtDyMandant.TabIndex = 109
        Me.txtDyMandant.Text = "VERG"
        Me.txtDyMandant.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -209,16 +221,16 @@ Partial Class frmATEZ_EZA
        Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label1.AutoSize = True
        Me.Label1.BackColor = System.Drawing.Color.White
-        Me.Label1.Location = New System.Drawing.Point(387, 20)
+        Me.Label1.Location = New System.Drawing.Point(387, 13)
        Me.Label1.Name = "Label1"
-        Me.Label1.Size = New System.Drawing.Size(82, 13)
+        Me.Label1.Size = New System.Drawing.Size(89, 13)
        Me.Label1.TabIndex = 106
        Me.Label1.Text = "Bezugsnummer:"
        '
        'txtDyNiederlassung
        '
        Me.txtDyNiederlassung.BackColor = System.Drawing.Color.White
-        Me.txtDyNiederlassung.Location = New System.Drawing.Point(52, 7)
+        Me.txtDyNiederlassung.Location = New System.Drawing.Point(55, 13)
        Me.txtDyNiederlassung.Name = "txtDyNiederlassung"
        Me.txtDyNiederlassung.Size = New System.Drawing.Size(45, 12)
        Me.txtDyNiederlassung.TabIndex = 108
@@ -229,7 +241,7 @@ Partial Class frmATEZ_EZA
        Me.lblBezugsnummer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.lblBezugsnummer.BackColor = System.Drawing.Color.White
        Me.lblBezugsnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblBezugsnummer.Location = New System.Drawing.Point(475, 14)
+        Me.lblBezugsnummer.Location = New System.Drawing.Point(475, 8)
        Me.lblBezugsnummer.Name = "lblBezugsnummer"
        Me.lblBezugsnummer.Size = New System.Drawing.Size(193, 23)
        Me.lblBezugsnummer.TabIndex = 107
@@ -238,10 +250,9 @@ Partial Class frmATEZ_EZA
        '
        'Button3
        '
-        Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.Button3.Location = New System.Drawing.Point(473, 159)
+        Me.Button3.Location = New System.Drawing.Point(473, 157)
        Me.Button3.Name = "Button3"
-        Me.Button3.Size = New System.Drawing.Size(205, 23)
+        Me.Button3.Size = New System.Drawing.Size(205, 25)
        Me.Button3.TabIndex = 152
        Me.Button3.Text = "alle Anhänge auswählen"
        Me.Button3.UseVisualStyleBackColor = True
@@ -264,7 +275,6 @@ Partial Class frmATEZ_EZA
        '
        'Button1
        '
-        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button1.Location = New System.Drawing.Point(3, 383)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(178, 23)
@@ -275,8 +285,7 @@ Partial Class frmATEZ_EZA
        'btnAgg_Tnr
        '
        Me.btnAgg_Tnr.BackColor = System.Drawing.Color.DeepSkyBlue
-        Me.btnAgg_Tnr.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnAgg_Tnr.Location = New System.Drawing.Point(71, 344)
+        Me.btnAgg_Tnr.Location = New System.Drawing.Point(79, 345)
        Me.btnAgg_Tnr.Name = "btnAgg_Tnr"
        Me.btnAgg_Tnr.Size = New System.Drawing.Size(83, 23)
        Me.btnAgg_Tnr.TabIndex = 154
@@ -286,6 +295,7 @@ Partial Class frmATEZ_EZA
        '
        'Label2
        '
+        Me.Label2.Font = New System.Drawing.Font("Segoe UI", 8.0!)
        Me.Label2.Location = New System.Drawing.Point(6, 350)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(103, 17)
@@ -295,10 +305,9 @@ Partial Class frmATEZ_EZA
        'btnAgg_Origin
        '
        Me.btnAgg_Origin.BackColor = System.Drawing.Color.DeepSkyBlue
-        Me.btnAgg_Origin.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnAgg_Origin.Location = New System.Drawing.Point(160, 344)
+        Me.btnAgg_Origin.Location = New System.Drawing.Point(165, 345)
        Me.btnAgg_Origin.Name = "btnAgg_Origin"
-        Me.btnAgg_Origin.Size = New System.Drawing.Size(90, 23)
+        Me.btnAgg_Origin.Size = New System.Drawing.Size(92, 23)
        Me.btnAgg_Origin.TabIndex = 155
        Me.btnAgg_Origin.Tag = "1"
        Me.btnAgg_Origin.Text = "Ursprungsland"
@@ -306,8 +315,7 @@ Partial Class frmATEZ_EZA
        '
        'btnAgg_Unit
        '
-        Me.btnAgg_Unit.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnAgg_Unit.Location = New System.Drawing.Point(255, 344)
+        Me.btnAgg_Unit.Location = New System.Drawing.Point(260, 345)
        Me.btnAgg_Unit.Name = "btnAgg_Unit"
        Me.btnAgg_Unit.Size = New System.Drawing.Size(79, 23)
        Me.btnAgg_Unit.TabIndex = 156
@@ -317,8 +325,7 @@ Partial Class frmATEZ_EZA
        '
        'btnAgg_desc
        '
-        Me.btnAgg_desc.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnAgg_desc.Location = New System.Drawing.Point(340, 344)
+        Me.btnAgg_desc.Location = New System.Drawing.Point(342, 345)
        Me.btnAgg_desc.Name = "btnAgg_desc"
        Me.btnAgg_desc.Size = New System.Drawing.Size(126, 23)
        Me.btnAgg_desc.TabIndex = 157
@@ -351,19 +358,9 @@ Partial Class frmATEZ_EZA
        Me.columnName.Name = "columnName"
        Me.columnName.ReadOnly = True
        '
-        'Label4
-        '
-        Me.Label4.BackColor = System.Drawing.Color.White
-        Me.Label4.Location = New System.Drawing.Point(106, 8)
-        Me.Label4.Name = "Label4"
-        Me.Label4.Size = New System.Drawing.Size(45, 12)
-        Me.Label4.TabIndex = 149
-        Me.Label4.Text = "SUB"
-        '
        'Button2
        '
-        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.Button2.Location = New System.Drawing.Point(416, 383)
+        Me.Button2.Location = New System.Drawing.Point(402, 383)
        Me.Button2.Name = "Button2"
        Me.Button2.Size = New System.Drawing.Size(65, 23)
        Me.Button2.TabIndex = 158
@@ -389,6 +386,7 @@ Partial Class frmATEZ_EZA
        Me.Controls.Add(Me.Label6)
        Me.Controls.Add(Me.btnSend)
        Me.Controls.Add(Me.dgvAnhaenge)
+        Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
        Me.Name = "frmATEZ_EZA"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
--- a/Aviso/ATEZ/frmATEZ_EZA.vb
+++ b/Aviso/ATEZ/frmATEZ_EZA.vb
@@ -474,7 +474,7 @@ Public Class frmATEZ_EZA
        '    Case "IMEX" : txtDyMandant.Text = "IMEX" : txtDyNiederlassung.Text = "IME"
        '    Case "AMBAR" : txtDyMandant.Text = "ATIL" : txtDyNiederlassung.Text = "AMBWO"
        'End Select 
-        FIRMA_DY = cDakosyFunftions.getFirma_DY(FilialenNr.ToString, Me)
+        FIRMA_DY = cDakosyFunftions.getFirma_DY(FilialenNr.ToString, Me, "EZA")
        txtDyMandant.Text = cDakosyFunftions.getIOPartner(FIRMA_DY, "EZA")
        txtDyNiederlassung.Text = cDakosyFunftions.getDivision(FIRMA_DY, "EZA")

@@ -566,7 +566,7 @@ Public Class frmATEZ_EZA

                                                case WHEN [anh_size] > 0 Then ROUND([anh_size] / 1000000,2) End as anh_size,
                                                   [anh_Art],[anh_Typ] FROM [tblAvisoAnhaenge] 
-                                        WHERE [anh_AvisoId]=" & AVISO.AvisoID & "AND (anh_SendungsId is null OR anh_SendungsId <=0 OR anh_SendungsId='" & SENDUNG.tblSnd_SendungID & "') And anh_Typ = 'PDF'
+                                        WHERE [anh_AvisoId]=" & AVISO.AvisoID & "AND (anh_SendungsId is null OR anh_SendungsId <=0 OR anh_SendungsId='" & SENDUNG.tblSnd_SendungID & "') And anh_Typ NOT IN ('MSG', 'SONSTIGES')
                                           ORDER BY  anh_SendungsId desc,
 										  case	  
                                                when [anh_Art] = 'ATR-EUR1' then 0
--- a/Aviso/ATEZ/frmATEZ_NCTS.Designer.vb
+++ b/Aviso/ATEZ/frmATEZ_NCTS.Designer.vb
@@ -39,11 +39,9 @@ Partial Class frmATEZ_NCTS
        Me.lblC = New System.Windows.Forms.Label()
        Me.txtTransporttemp = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.cbxTemperatur = New System.Windows.Forms.CheckBox()
-        Me.sbDurchgangszollstelle5 = New VERAG_PROG_ALLGEMEIN.MySearchBox()
        Me.sbDurchgangszollstelle9 = New VERAG_PROG_ALLGEMEIN.MySearchBox()
        Me.sbDurchgangszollstelle8 = New VERAG_PROG_ALLGEMEIN.MySearchBox()
        Me.sbDurchgangszollstelle7 = New VERAG_PROG_ALLGEMEIN.MySearchBox()
-        Me.sbDurchgangszollstelle6 = New VERAG_PROG_ALLGEMEIN.MySearchBox()
        Me.sbDurchgangszollstelle4 = New VERAG_PROG_ALLGEMEIN.MySearchBox()
        Me.sbDurchgangszollstelle3 = New VERAG_PROG_ALLGEMEIN.MySearchBox()
        Me.sbDurchgangszollstelle2 = New VERAG_PROG_ALLGEMEIN.MySearchBox()
@@ -69,11 +67,14 @@ Partial Class frmATEZ_NCTS
        Me.Label1 = New System.Windows.Forms.Label()
        Me.txtDyNiederlassung = New System.Windows.Forms.Label()
        Me.lblBezugsnummer = New System.Windows.Forms.Label()
+        Me.sbDurchgangszollstelle5 = New VERAG_PROG_ALLGEMEIN.MySearchBox()
+        Me.sbDurchgangszollstelle6 = New VERAG_PROG_ALLGEMEIN.MySearchBox()
        Me.Button3 = New System.Windows.Forms.Button()
        Me.Label6 = New System.Windows.Forms.Label()
        Me.dgvAnhaenge = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
        Me.columnName = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.lblAnh = New System.Windows.Forms.Label()
+        Me.Button2 = New System.Windows.Forms.Button()
        Me.pnlHead.SuspendLayout()
        CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
@@ -83,17 +84,17 @@ Partial Class frmATEZ_NCTS
        Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Button1.BackColor = System.Drawing.Color.White
        Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
-        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Button1.Image = Global.AVISO.My.Resources.Resources.Transcode
-        Me.Button1.ImageAlign = System.Drawing.ContentAlignment.TopCenter
-        Me.Button1.Location = New System.Drawing.Point(395, 773)
+        Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        Me.Button1.Image = Global.AVISO.My.Resources.Resources.ico_atez_transitAI
+        Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button1.Location = New System.Drawing.Point(379, 773)
        Me.Button1.Margin = New System.Windows.Forms.Padding(2)
        Me.Button1.Name = "Button1"
-        Me.Button1.Size = New System.Drawing.Size(192, 58)
+        Me.Button1.Padding = New System.Windows.Forms.Padding(5, 0, 5, 0)
+        Me.Button1.Size = New System.Drawing.Size(208, 58)
        Me.Button1.TabIndex = 26
        Me.Button1.Text = "An ATEZ senden >>"
-        Me.Button1.TextAlign = System.Drawing.ContentAlignment.BottomCenter
+        Me.Button1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.Button1.UseVisualStyleBackColor = False
        '
        'pnlHead
@@ -154,7 +155,7 @@ Partial Class frmATEZ_NCTS
        Me.Label2.AutoSize = True
        Me.Label2.Location = New System.Drawing.Point(10, 59)
        Me.Label2.Name = "Label2"
-        Me.Label2.Size = New System.Drawing.Size(52, 13)
+        Me.Label2.Size = New System.Drawing.Size(56, 13)
        Me.Label2.TabIndex = 150
        Me.Label2.Text = "Prozedur:"
        Me.Label2.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -168,7 +169,7 @@ Partial Class frmATEZ_NCTS
        Me.cboProzedur.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboProzedur.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.cboProzedur.FormattingEnabled = True
-        Me.cboProzedur.Location = New System.Drawing.Point(151, 56)
+        Me.cboProzedur.Location = New System.Drawing.Point(157, 56)
        Me.cboProzedur.Name = "cboProzedur"
        Me.cboProzedur.Size = New System.Drawing.Size(100, 21)
        Me.cboProzedur.TabIndex = 149
@@ -186,9 +187,9 @@ Partial Class frmATEZ_NCTS
        '
        Me.Label8.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label8.AutoSize = True
-        Me.Label8.Location = New System.Drawing.Point(389, 88)
+        Me.Label8.Location = New System.Drawing.Point(378, 88)
        Me.Label8.Name = "Label8"
-        Me.Label8.Size = New System.Drawing.Size(57, 13)
+        Me.Label8.Size = New System.Drawing.Size(61, 13)
        Me.Label8.TabIndex = 146
        Me.Label8.Text = "Stammref.:"
        Me.Label8.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -222,12 +223,12 @@ Partial Class frmATEZ_NCTS
        Me.txtLKWId._Waehrung = False
        Me.txtLKWId._WaehrungZeichen = True
        Me.txtLKWId.ForeColor = System.Drawing.Color.Black
-        Me.txtLKWId.Location = New System.Drawing.Point(151, 86)
+        Me.txtLKWId.Location = New System.Drawing.Point(157, 86)
        Me.txtLKWId.MaxLineLength = -1
        Me.txtLKWId.MaxLines_Warning = ""
        Me.txtLKWId.MaxLines_Warning_Label = Nothing
        Me.txtLKWId.Name = "txtLKWId"
-        Me.txtLKWId.Size = New System.Drawing.Size(196, 20)
+        Me.txtLKWId.Size = New System.Drawing.Size(196, 22)
        Me.txtLKWId.TabIndex = 144
        '
        'usrCntl_Carrier
@@ -255,7 +256,7 @@ Partial Class frmATEZ_NCTS
        Me.txtDat._WaehrungZeichen = True
        Me.txtDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!)
        Me.txtDat.ForeColor = System.Drawing.Color.Black
-        Me.txtDat.Location = New System.Drawing.Point(151, 160)
+        Me.txtDat.Location = New System.Drawing.Point(157, 160)
        Me.txtDat.MaxLength = 10
        Me.txtDat.MaxLineLength = -1
        Me.txtDat.MaxLines_Warning = ""
@@ -270,7 +271,7 @@ Partial Class frmATEZ_NCTS
        Me.dtpDat.CustomFormat = "''"
        Me.dtpDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.dtpDat.Format = System.Windows.Forms.DateTimePickerFormat.Custom
-        Me.dtpDat.Location = New System.Drawing.Point(151, 160)
+        Me.dtpDat.Location = New System.Drawing.Point(157, 160)
        Me.dtpDat.Margin = New System.Windows.Forms.Padding(0)
        Me.dtpDat.Name = "dtpDat"
        Me.dtpDat.Size = New System.Drawing.Size(110, 24)
@@ -278,16 +279,17 @@ Partial Class frmATEZ_NCTS
        '
        'Label7
        '
-        Me.Label7.Location = New System.Drawing.Point(10, 160)
+        Me.Label7.AutoSize = True
+        Me.Label7.Location = New System.Drawing.Point(10, 165)
        Me.Label7.Name = "Label7"
-        Me.Label7.Size = New System.Drawing.Size(134, 17)
+        Me.Label7.Size = New System.Drawing.Size(145, 13)
        Me.Label7.TabIndex = 140
        Me.Label7.Text = "Wiedergestellungs-Datum:"
        '
        'lblC
        '
        Me.lblC.AutoSize = True
-        Me.lblC.Location = New System.Drawing.Point(251, 191)
+        Me.lblC.Location = New System.Drawing.Point(257, 191)
        Me.lblC.Name = "lblC"
        Me.lblC.Size = New System.Drawing.Size(18, 13)
        Me.lblC.TabIndex = 139
@@ -308,51 +310,26 @@ Partial Class frmATEZ_NCTS
        Me.txtTransporttemp._Waehrung = False
        Me.txtTransporttemp._WaehrungZeichen = True
        Me.txtTransporttemp.ForeColor = System.Drawing.Color.Black
-        Me.txtTransporttemp.Location = New System.Drawing.Point(151, 187)
+        Me.txtTransporttemp.Location = New System.Drawing.Point(157, 187)
        Me.txtTransporttemp.MaxLineLength = -1
        Me.txtTransporttemp.MaxLines_Warning = ""
        Me.txtTransporttemp.MaxLines_Warning_Label = Nothing
        Me.txtTransporttemp.Name = "txtTransporttemp"
-        Me.txtTransporttemp.Size = New System.Drawing.Size(100, 20)
+        Me.txtTransporttemp.Size = New System.Drawing.Size(100, 22)
        Me.txtTransporttemp.TabIndex = 138
        '
        'cbxTemperatur
        '
        Me.cbxTemperatur.AutoSize = True
-        Me.cbxTemperatur.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbxTemperatur.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cbxTemperatur.Location = New System.Drawing.Point(13, 187)
        Me.cbxTemperatur.Name = "cbxTemperatur"
-        Me.cbxTemperatur.Size = New System.Drawing.Size(131, 17)
+        Me.cbxTemperatur.Size = New System.Drawing.Size(138, 17)
        Me.cbxTemperatur.TabIndex = 137
        Me.cbxTemperatur.TabStop = False
        Me.cbxTemperatur.Text = "Transport-Temperatur:"
        Me.cbxTemperatur.UseVisualStyleBackColor = True
        '
-        'sbDurchgangszollstelle5
-        '
-        Me.sbDurchgangszollstelle5._allowFreitext = False
-        Me.sbDurchgangszollstelle5._AllowSetValue = False
-        Me.sbDurchgangszollstelle5._allowSpaceAsSplitter = False
-        Me.sbDurchgangszollstelle5._autoSizeGross = False
-        Me.sbDurchgangszollstelle5._hideIfListEmpty = True
-        Me.sbDurchgangszollstelle5._value = ""
-        Me.sbDurchgangszollstelle5.conn_art = "FMZOLL"
-        Me.sbDurchgangszollstelle5.dgvpos = "LEFT"
-        Me.sbDurchgangszollstelle5.DISPLAY_PARAM = Nothing
-        Me.sbDurchgangszollstelle5.INVISIBLE_COLUMNS = Nothing
-        Me.sbDurchgangszollstelle5.key_visible = False
-        Me.sbDurchgangszollstelle5.KEYPARAM = Nothing
-        Me.sbDurchgangszollstelle5.Location = New System.Drawing.Point(206, 415)
-        Me.sbDurchgangszollstelle5.Name = "sbDurchgangszollstelle5"
-        Me.sbDurchgangszollstelle5.searchActive = True
-        Me.sbDurchgangszollstelle5.Size = New System.Drawing.Size(171, 20)
-        Me.sbDurchgangszollstelle5.SQL_ORDER_BY = Nothing
-        Me.sbDurchgangszollstelle5.SQL_SELECT = Nothing
-        Me.sbDurchgangszollstelle5.SQL_WHERE = Nothing
-        Me.sbDurchgangszollstelle5.SQL_WhereParamList = Nothing
-        Me.sbDurchgangszollstelle5.TabIndex = 132
-        Me.sbDurchgangszollstelle5.usrcntl = Nothing
-        '
        'sbDurchgangszollstelle9
        '
        Me.sbDurchgangszollstelle9._allowFreitext = False
@@ -370,7 +347,7 @@ Partial Class frmATEZ_NCTS
        Me.sbDurchgangszollstelle9.Location = New System.Drawing.Point(376, 434)
        Me.sbDurchgangszollstelle9.Name = "sbDurchgangszollstelle9"
        Me.sbDurchgangszollstelle9.searchActive = True
-        Me.sbDurchgangszollstelle9.Size = New System.Drawing.Size(198, 20)
+        Me.sbDurchgangszollstelle9.Size = New System.Drawing.Size(198, 22)
        Me.sbDurchgangszollstelle9.SQL_ORDER_BY = Nothing
        Me.sbDurchgangszollstelle9.SQL_SELECT = Nothing
        Me.sbDurchgangszollstelle9.SQL_WHERE = Nothing
@@ -395,7 +372,7 @@ Partial Class frmATEZ_NCTS
        Me.sbDurchgangszollstelle8.Location = New System.Drawing.Point(207, 434)
        Me.sbDurchgangszollstelle8.Name = "sbDurchgangszollstelle8"
        Me.sbDurchgangszollstelle8.searchActive = True
-        Me.sbDurchgangszollstelle8.Size = New System.Drawing.Size(171, 20)
+        Me.sbDurchgangszollstelle8.Size = New System.Drawing.Size(171, 22)
        Me.sbDurchgangszollstelle8.SQL_ORDER_BY = Nothing
        Me.sbDurchgangszollstelle8.SQL_SELECT = Nothing
        Me.sbDurchgangszollstelle8.SQL_WHERE = Nothing
@@ -420,7 +397,7 @@ Partial Class frmATEZ_NCTS
        Me.sbDurchgangszollstelle7.Location = New System.Drawing.Point(13, 434)
        Me.sbDurchgangszollstelle7.Name = "sbDurchgangszollstelle7"
        Me.sbDurchgangszollstelle7.searchActive = True
-        Me.sbDurchgangszollstelle7.Size = New System.Drawing.Size(197, 20)
+        Me.sbDurchgangszollstelle7.Size = New System.Drawing.Size(197, 22)
        Me.sbDurchgangszollstelle7.SQL_ORDER_BY = Nothing
        Me.sbDurchgangszollstelle7.SQL_SELECT = Nothing
        Me.sbDurchgangszollstelle7.SQL_WHERE = Nothing
@@ -428,31 +405,6 @@ Partial Class frmATEZ_NCTS
        Me.sbDurchgangszollstelle7.TabIndex = 134
        Me.sbDurchgangszollstelle7.usrcntl = Nothing
        '
-        'sbDurchgangszollstelle6
-        '
-        Me.sbDurchgangszollstelle6._allowFreitext = False
-        Me.sbDurchgangszollstelle6._AllowSetValue = False
-        Me.sbDurchgangszollstelle6._allowSpaceAsSplitter = False
-        Me.sbDurchgangszollstelle6._autoSizeGross = False
-        Me.sbDurchgangszollstelle6._hideIfListEmpty = True
-        Me.sbDurchgangszollstelle6._value = ""
-        Me.sbDurchgangszollstelle6.conn_art = "FMZOLL"
-        Me.sbDurchgangszollstelle6.dgvpos = "LEFT"
-        Me.sbDurchgangszollstelle6.DISPLAY_PARAM = Nothing
-        Me.sbDurchgangszollstelle6.INVISIBLE_COLUMNS = Nothing
-        Me.sbDurchgangszollstelle6.key_visible = False
-        Me.sbDurchgangszollstelle6.KEYPARAM = Nothing
-        Me.sbDurchgangszollstelle6.Location = New System.Drawing.Point(375, 415)
-        Me.sbDurchgangszollstelle6.Name = "sbDurchgangszollstelle6"
-        Me.sbDurchgangszollstelle6.searchActive = True
-        Me.sbDurchgangszollstelle6.Size = New System.Drawing.Size(199, 20)
-        Me.sbDurchgangszollstelle6.SQL_ORDER_BY = Nothing
-        Me.sbDurchgangszollstelle6.SQL_SELECT = Nothing
-        Me.sbDurchgangszollstelle6.SQL_WHERE = Nothing
-        Me.sbDurchgangszollstelle6.SQL_WhereParamList = Nothing
-        Me.sbDurchgangszollstelle6.TabIndex = 133
-        Me.sbDurchgangszollstelle6.usrcntl = Nothing
-        '
        'sbDurchgangszollstelle4
        '
        Me.sbDurchgangszollstelle4._allowFreitext = False
@@ -470,7 +422,7 @@ Partial Class frmATEZ_NCTS
        Me.sbDurchgangszollstelle4.Location = New System.Drawing.Point(13, 415)
        Me.sbDurchgangszollstelle4.Name = "sbDurchgangszollstelle4"
        Me.sbDurchgangszollstelle4.searchActive = True
-        Me.sbDurchgangszollstelle4.Size = New System.Drawing.Size(195, 20)
+        Me.sbDurchgangszollstelle4.Size = New System.Drawing.Size(195, 22)
        Me.sbDurchgangszollstelle4.SQL_ORDER_BY = Nothing
        Me.sbDurchgangszollstelle4.SQL_SELECT = Nothing
        Me.sbDurchgangszollstelle4.SQL_WHERE = Nothing
@@ -495,7 +447,7 @@ Partial Class frmATEZ_NCTS
        Me.sbDurchgangszollstelle3.Location = New System.Drawing.Point(376, 396)
        Me.sbDurchgangszollstelle3.Name = "sbDurchgangszollstelle3"
        Me.sbDurchgangszollstelle3.searchActive = True
-        Me.sbDurchgangszollstelle3.Size = New System.Drawing.Size(198, 20)
+        Me.sbDurchgangszollstelle3.Size = New System.Drawing.Size(198, 22)
        Me.sbDurchgangszollstelle3.SQL_ORDER_BY = Nothing
        Me.sbDurchgangszollstelle3.SQL_SELECT = Nothing
        Me.sbDurchgangszollstelle3.SQL_WHERE = Nothing
@@ -520,7 +472,7 @@ Partial Class frmATEZ_NCTS
        Me.sbDurchgangszollstelle2.Location = New System.Drawing.Point(207, 396)
        Me.sbDurchgangszollstelle2.Name = "sbDurchgangszollstelle2"
        Me.sbDurchgangszollstelle2.searchActive = True
-        Me.sbDurchgangszollstelle2.Size = New System.Drawing.Size(171, 20)
+        Me.sbDurchgangszollstelle2.Size = New System.Drawing.Size(171, 22)
        Me.sbDurchgangszollstelle2.SQL_ORDER_BY = Nothing
        Me.sbDurchgangszollstelle2.SQL_SELECT = Nothing
        Me.sbDurchgangszollstelle2.SQL_WHERE = Nothing
@@ -545,7 +497,7 @@ Partial Class frmATEZ_NCTS
        Me.sbDurchgangszollstelle1.Location = New System.Drawing.Point(13, 396)
        Me.sbDurchgangszollstelle1.Name = "sbDurchgangszollstelle1"
        Me.sbDurchgangszollstelle1.searchActive = True
-        Me.sbDurchgangszollstelle1.Size = New System.Drawing.Size(197, 20)
+        Me.sbDurchgangszollstelle1.Size = New System.Drawing.Size(197, 22)
        Me.sbDurchgangszollstelle1.SQL_ORDER_BY = Nothing
        Me.sbDurchgangszollstelle1.SQL_SELECT = Nothing
        Me.sbDurchgangszollstelle1.SQL_WHERE = Nothing
@@ -567,7 +519,7 @@ Partial Class frmATEZ_NCTS
        Me.lklRoutenauswahl.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
        Me.lklRoutenauswahl.Location = New System.Drawing.Point(493, 475)
        Me.lklRoutenauswahl.Name = "lklRoutenauswahl"
-        Me.lklRoutenauswahl.Size = New System.Drawing.Size(81, 13)
+        Me.lklRoutenauswahl.Size = New System.Drawing.Size(88, 13)
        Me.lklRoutenauswahl.TabIndex = 117
        Me.lklRoutenauswahl.TabStop = True
        Me.lklRoutenauswahl.Text = "Routenauswahl"
@@ -589,7 +541,7 @@ Partial Class frmATEZ_NCTS
        Me.sbRoute5.Location = New System.Drawing.Point(205, 510)
        Me.sbRoute5.Name = "sbRoute5"
        Me.sbRoute5.searchActive = True
-        Me.sbRoute5.Size = New System.Drawing.Size(183, 20)
+        Me.sbRoute5.Size = New System.Drawing.Size(183, 22)
        Me.sbRoute5.SQL_ORDER_BY = Nothing
        Me.sbRoute5.SQL_SELECT = Nothing
        Me.sbRoute5.SQL_WHERE = Nothing
@@ -614,7 +566,7 @@ Partial Class frmATEZ_NCTS
        Me.sbRoute9.Location = New System.Drawing.Point(387, 529)
        Me.sbRoute9.Name = "sbRoute9"
        Me.sbRoute9.searchActive = True
-        Me.sbRoute9.Size = New System.Drawing.Size(187, 20)
+        Me.sbRoute9.Size = New System.Drawing.Size(187, 22)
        Me.sbRoute9.SQL_ORDER_BY = Nothing
        Me.sbRoute9.SQL_SELECT = Nothing
        Me.sbRoute9.SQL_WHERE = Nothing
@@ -639,7 +591,7 @@ Partial Class frmATEZ_NCTS
        Me.sbRoute8.Location = New System.Drawing.Point(205, 529)
        Me.sbRoute8.Name = "sbRoute8"
        Me.sbRoute8.searchActive = True
-        Me.sbRoute8.Size = New System.Drawing.Size(183, 20)
+        Me.sbRoute8.Size = New System.Drawing.Size(183, 22)
        Me.sbRoute8.SQL_ORDER_BY = Nothing
        Me.sbRoute8.SQL_SELECT = Nothing
        Me.sbRoute8.SQL_WHERE = Nothing
@@ -664,7 +616,7 @@ Partial Class frmATEZ_NCTS
        Me.sbRoute7.Location = New System.Drawing.Point(13, 529)
        Me.sbRoute7.Name = "sbRoute7"
        Me.sbRoute7.searchActive = True
-        Me.sbRoute7.Size = New System.Drawing.Size(195, 20)
+        Me.sbRoute7.Size = New System.Drawing.Size(195, 22)
        Me.sbRoute7.SQL_ORDER_BY = Nothing
        Me.sbRoute7.SQL_SELECT = Nothing
        Me.sbRoute7.SQL_WHERE = Nothing
@@ -689,7 +641,7 @@ Partial Class frmATEZ_NCTS
        Me.sbRoute6.Location = New System.Drawing.Point(387, 510)
        Me.sbRoute6.Name = "sbRoute6"
        Me.sbRoute6.searchActive = True
-        Me.sbRoute6.Size = New System.Drawing.Size(187, 20)
+        Me.sbRoute6.Size = New System.Drawing.Size(187, 22)
        Me.sbRoute6.SQL_ORDER_BY = Nothing
        Me.sbRoute6.SQL_SELECT = Nothing
        Me.sbRoute6.SQL_WHERE = Nothing
@@ -714,7 +666,7 @@ Partial Class frmATEZ_NCTS
        Me.sbRoute4.Location = New System.Drawing.Point(13, 510)
        Me.sbRoute4.Name = "sbRoute4"
        Me.sbRoute4.searchActive = True
-        Me.sbRoute4.Size = New System.Drawing.Size(195, 20)
+        Me.sbRoute4.Size = New System.Drawing.Size(195, 22)
        Me.sbRoute4.SQL_ORDER_BY = Nothing
        Me.sbRoute4.SQL_SELECT = Nothing
        Me.sbRoute4.SQL_WHERE = Nothing
@@ -739,7 +691,7 @@ Partial Class frmATEZ_NCTS
        Me.sbRoute3.Location = New System.Drawing.Point(387, 491)
        Me.sbRoute3.Name = "sbRoute3"
        Me.sbRoute3.searchActive = True
-        Me.sbRoute3.Size = New System.Drawing.Size(187, 20)
+        Me.sbRoute3.Size = New System.Drawing.Size(187, 22)
        Me.sbRoute3.SQL_ORDER_BY = Nothing
        Me.sbRoute3.SQL_SELECT = Nothing
        Me.sbRoute3.SQL_WHERE = Nothing
@@ -764,7 +716,7 @@ Partial Class frmATEZ_NCTS
        Me.sbRoute2.Location = New System.Drawing.Point(205, 491)
        Me.sbRoute2.Name = "sbRoute2"
        Me.sbRoute2.searchActive = True
-        Me.sbRoute2.Size = New System.Drawing.Size(183, 20)
+        Me.sbRoute2.Size = New System.Drawing.Size(183, 22)
        Me.sbRoute2.SQL_ORDER_BY = Nothing
        Me.sbRoute2.SQL_SELECT = Nothing
        Me.sbRoute2.SQL_WHERE = Nothing
@@ -789,7 +741,7 @@ Partial Class frmATEZ_NCTS
        Me.sbRoute1.Location = New System.Drawing.Point(13, 491)
        Me.sbRoute1.Name = "sbRoute1"
        Me.sbRoute1.searchActive = True
-        Me.sbRoute1.Size = New System.Drawing.Size(195, 20)
+        Me.sbRoute1.Size = New System.Drawing.Size(195, 22)
        Me.sbRoute1.SQL_ORDER_BY = Nothing
        Me.sbRoute1.SQL_SELECT = Nothing
        Me.sbRoute1.SQL_WHERE = Nothing
@@ -807,9 +759,9 @@ Partial Class frmATEZ_NCTS
        '
        'Label4
        '
-        Me.Label4.Location = New System.Drawing.Point(10, 138)
+        Me.Label4.Location = New System.Drawing.Point(10, 141)
        Me.Label4.Name = "Label4"
-        Me.Label4.Size = New System.Drawing.Size(121, 17)
+        Me.Label4.Size = New System.Drawing.Size(135, 17)
        Me.Label4.TabIndex = 114
        Me.Label4.Text = "Bestimmungs-Zollstelle:"
        '
@@ -827,10 +779,10 @@ Partial Class frmATEZ_NCTS
        Me.sbBestimmungsZollstelle.INVISIBLE_COLUMNS = Nothing
        Me.sbBestimmungsZollstelle.key_visible = False
        Me.sbBestimmungsZollstelle.KEYPARAM = Nothing
-        Me.sbBestimmungsZollstelle.Location = New System.Drawing.Point(151, 138)
+        Me.sbBestimmungsZollstelle.Location = New System.Drawing.Point(157, 138)
        Me.sbBestimmungsZollstelle.Name = "sbBestimmungsZollstelle"
        Me.sbBestimmungsZollstelle.searchActive = True
-        Me.sbBestimmungsZollstelle.Size = New System.Drawing.Size(196, 20)
+        Me.sbBestimmungsZollstelle.Size = New System.Drawing.Size(196, 22)
        Me.sbBestimmungsZollstelle.SQL_ORDER_BY = Nothing
        Me.sbBestimmungsZollstelle.SQL_SELECT = Nothing
        Me.sbBestimmungsZollstelle.SQL_WHERE = Nothing
@@ -868,10 +820,10 @@ Partial Class frmATEZ_NCTS
        Me.sbAbgangZollstelle.INVISIBLE_COLUMNS = Nothing
        Me.sbAbgangZollstelle.key_visible = False
        Me.sbAbgangZollstelle.KEYPARAM = Nothing
-        Me.sbAbgangZollstelle.Location = New System.Drawing.Point(151, 112)
+        Me.sbAbgangZollstelle.Location = New System.Drawing.Point(157, 112)
        Me.sbAbgangZollstelle.Name = "sbAbgangZollstelle"
        Me.sbAbgangZollstelle.searchActive = True
-        Me.sbAbgangZollstelle.Size = New System.Drawing.Size(196, 20)
+        Me.sbAbgangZollstelle.Size = New System.Drawing.Size(196, 22)
        Me.sbAbgangZollstelle.SQL_ORDER_BY = Nothing
        Me.sbAbgangZollstelle.SQL_SELECT = Nothing
        Me.sbAbgangZollstelle.SQL_WHERE = Nothing
@@ -896,14 +848,14 @@ Partial Class frmATEZ_NCTS
        Me.Label1.BackColor = System.Drawing.Color.White
        Me.Label1.Location = New System.Drawing.Point(296, 19)
        Me.Label1.Name = "Label1"
-        Me.Label1.Size = New System.Drawing.Size(82, 13)
+        Me.Label1.Size = New System.Drawing.Size(89, 13)
        Me.Label1.TabIndex = 106
        Me.Label1.Text = "Bezugsnummer:"
        '
        'txtDyNiederlassung
        '
        Me.txtDyNiederlassung.BackColor = System.Drawing.Color.White
-        Me.txtDyNiederlassung.Location = New System.Drawing.Point(52, 15)
+        Me.txtDyNiederlassung.Location = New System.Drawing.Point(52, 14)
        Me.txtDyNiederlassung.Name = "txtDyNiederlassung"
        Me.txtDyNiederlassung.Size = New System.Drawing.Size(45, 12)
        Me.txtDyNiederlassung.TabIndex = 108
@@ -921,9 +873,58 @@ Partial Class frmATEZ_NCTS
        Me.lblBezugsnummer.Text = "4800/000000/17 AAA"
        Me.lblBezugsnummer.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
+        'sbDurchgangszollstelle5
+        '
+        Me.sbDurchgangszollstelle5._allowFreitext = False
+        Me.sbDurchgangszollstelle5._AllowSetValue = False
+        Me.sbDurchgangszollstelle5._allowSpaceAsSplitter = False
+        Me.sbDurchgangszollstelle5._autoSizeGross = False
+        Me.sbDurchgangszollstelle5._hideIfListEmpty = True
+        Me.sbDurchgangszollstelle5._value = ""
+        Me.sbDurchgangszollstelle5.conn_art = "FMZOLL"
+        Me.sbDurchgangszollstelle5.dgvpos = "LEFT"
+        Me.sbDurchgangszollstelle5.DISPLAY_PARAM = Nothing
+        Me.sbDurchgangszollstelle5.INVISIBLE_COLUMNS = Nothing
+        Me.sbDurchgangszollstelle5.key_visible = False
+        Me.sbDurchgangszollstelle5.KEYPARAM = Nothing
+        Me.sbDurchgangszollstelle5.Location = New System.Drawing.Point(206, 415)
+        Me.sbDurchgangszollstelle5.Name = "sbDurchgangszollstelle5"
+        Me.sbDurchgangszollstelle5.searchActive = True
+        Me.sbDurchgangszollstelle5.Size = New System.Drawing.Size(171, 22)
+        Me.sbDurchgangszollstelle5.SQL_ORDER_BY = Nothing
+        Me.sbDurchgangszollstelle5.SQL_SELECT = Nothing
+        Me.sbDurchgangszollstelle5.SQL_WHERE = Nothing
+        Me.sbDurchgangszollstelle5.SQL_WhereParamList = Nothing
+        Me.sbDurchgangszollstelle5.TabIndex = 132
+        Me.sbDurchgangszollstelle5.usrcntl = Nothing
+        '
+        'sbDurchgangszollstelle6
+        '
+        Me.sbDurchgangszollstelle6._allowFreitext = False
+        Me.sbDurchgangszollstelle6._AllowSetValue = False
+        Me.sbDurchgangszollstelle6._allowSpaceAsSplitter = False
+        Me.sbDurchgangszollstelle6._autoSizeGross = False
+        Me.sbDurchgangszollstelle6._hideIfListEmpty = True
+        Me.sbDurchgangszollstelle6._value = ""
+        Me.sbDurchgangszollstelle6.conn_art = "FMZOLL"
+        Me.sbDurchgangszollstelle6.dgvpos = "LEFT"
+        Me.sbDurchgangszollstelle6.DISPLAY_PARAM = Nothing
+        Me.sbDurchgangszollstelle6.INVISIBLE_COLUMNS = Nothing
+        Me.sbDurchgangszollstelle6.key_visible = False
+        Me.sbDurchgangszollstelle6.KEYPARAM = Nothing
+        Me.sbDurchgangszollstelle6.Location = New System.Drawing.Point(375, 415)
+        Me.sbDurchgangszollstelle6.Name = "sbDurchgangszollstelle6"
+        Me.sbDurchgangszollstelle6.searchActive = True
+        Me.sbDurchgangszollstelle6.Size = New System.Drawing.Size(199, 22)
+        Me.sbDurchgangszollstelle6.SQL_ORDER_BY = Nothing
+        Me.sbDurchgangszollstelle6.SQL_SELECT = Nothing
+        Me.sbDurchgangszollstelle6.SQL_WHERE = Nothing
+        Me.sbDurchgangszollstelle6.SQL_WhereParamList = Nothing
+        Me.sbDurchgangszollstelle6.TabIndex = 133
+        Me.sbDurchgangszollstelle6.usrcntl = Nothing
+        '
        'Button3
        '
-        Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button3.Location = New System.Drawing.Point(409, 584)
        Me.Button3.Name = "Button3"
        Me.Button3.Size = New System.Drawing.Size(178, 23)
@@ -970,18 +971,30 @@ Partial Class frmATEZ_NCTS
        Me.lblAnh.TabIndex = 151
        Me.lblAnh.Visible = False
        '
+        'Button2
+        '
+        Me.Button2.Location = New System.Drawing.Point(3, 807)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(178, 23)
+        Me.Button2.TabIndex = 155
+        Me.Button2.Text = "JSON"
+        Me.Button2.UseVisualStyleBackColor = True
+        Me.Button2.Visible = False
+        '
        'frmATEZ_NCTS
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
        Me.ClientSize = New System.Drawing.Size(589, 842)
+        Me.Controls.Add(Me.Button2)
        Me.Controls.Add(Me.Button3)
        Me.Controls.Add(Me.lblAnh)
        Me.Controls.Add(Me.pnlHead)
        Me.Controls.Add(Me.Label6)
        Me.Controls.Add(Me.Button1)
        Me.Controls.Add(Me.dgvAnhaenge)
+        Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
        Me.Name = "frmATEZ_NCTS"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
@@ -1042,4 +1055,5 @@ Partial Class frmATEZ_NCTS
    Friend WithEvents cboProzedur As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents lblAnh As Label
    Friend WithEvents Button3 As Button
+    Friend WithEvents Button2 As Button
 End Class
--- a/Aviso/ATEZ/frmATEZ_NCTS.vb
+++ b/Aviso/ATEZ/frmATEZ_NCTS.vb
@@ -72,7 +72,7 @@ Public Class frmATEZ_NCTS

    End Sub

-    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click, Button2.Click
        Try


@@ -148,6 +148,11 @@ Public Class frmATEZ_NCTS
            saveRoute(atez_data)
            setDurchgangszolstellen()
            setRoute()
+
+            If sender Is Button2 Then
+                MsgBox(getJSONAtezData(atez_data, atez))
+                Exit Sub
+            End If
            If sendAtezData(atez_data, atez) Then
                AvisoStatusFunctions.insertSendungsVermerk(SENDUNG.tblSnd_SendungID, SENDUNG.tblSnd_AvisoID, "An ATEZ gesendet", 109)
                Me.Close()
@@ -165,6 +170,10 @@ Public Class frmATEZ_NCTS

    End Sub

+    Private Function getJSONAtezData(atezData As cATEZ_NCTS_DATA, atez As cATEZ_NCTS_IN) As String
+        Dim jsonData = atez.setJsonPDF(atezData, dgvAnhaenge)
+        Return (jsonData.Emit())
+    End Function
    Private Function sendAtezData(atezData As cATEZ_NCTS_DATA, atez As cATEZ_NCTS_IN) As Boolean

        Dim failreDesc As String
@@ -446,7 +455,7 @@ Public Class frmATEZ_NCTS
                                                when [anh_Art] = 'Sonstiges' then 'OTHER'
                                                when [anh_Art] ='' then 'OTHER' End
                                                [anh_Art],[anh_Typ] FROM [tblAvisoAnhaenge] 
-                                        WHERE [anh_AvisoId]=" & AVISO.AvisoID & "AND (anh_SendungsId is null OR anh_SendungsId <=0 OR anh_SendungsId='" & SENDUNG.tblSnd_SendungID & "') And anh_Typ = 'PDF'
+                                        WHERE [anh_AvisoId]=" & AVISO.AvisoID & "AND (anh_SendungsId is null OR anh_SendungsId <=0 OR anh_SendungsId='" & SENDUNG.tblSnd_SendungID & "') And anh_Typ NOT IN ('MSG', 'SONSTIGES')
                                           ORDER BY  anh_SendungsId desc,
 										  case	  
                                                when [anh_Art] = 'ATR-EUR1' then 0