ATR

SDL/Formulare/KDFormulare/FormulareBaukasten/usrcntlVerzollungspreise.vb

@@ -120,7 +120,7 @@
                     MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Verzollung Fiskal DE", "VZ_FISKAL_DE"))
                 End If
                 If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("BREXIT", Me.FindForm) Then
-                    cboFirma.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("VERAG-UNISPED Ltd", "IMEX"))
+                    cboFirma.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("VERAG-UNISPED Ltd", "LTD"))
                 End If
                 MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Handling", "HANDLING"))
                 MyComboBox1.changeItem("VZ")

SDL/Formulare/KDFormulare/frmFormulare.vb

@@ -4281,12 +4281,12 @@ Public Class FormularManagerNEU
                 Dim dgvVon = (i - 1) * 10 ' Start der Seite in der DGV
                 Dim listPos As New List(Of VERAG_PROG_ALLGEMEIN.MyListItem)
 
-                If i = 1 Then
-                    'BisherigeFelder in listPOSladen:
-                    For Each p In list
+                ' If i = 1 Then 'zt jed
+                'BisherigeFelder in listPOSladen:
+                For Each p In list
                         listPos.Add(p)
                     Next
-                End If
+                ' End If
 
                 For ii As Integer = 0 To 9
                     'Wenn DGV Ende --> Abbruch: