MSE, Essensbestellungen, MDM, Kundebearbeiten, Vollmachten

SDL/kunden/usrCntlKundenuebersicht.vb

@@ -1571,17 +1571,20 @@ Public Class usrCntlKundenuebersicht
     Public Sub initAufschub()
         '  AUFSCHUB = VERAG_PROG_ALLGEMEIN.cKundenAufschubkonten.LOAD_ListAufschubKTOByKdNr(kdNr)
         dgvAufschub.Rows.Clear()
+
         If AUFSCHUB IsNot Nothing Then
-            For Each AB In AUFSCHUB
-                Dim art = ""
-                Select Case AB.kdAkto_art
-                    Case "10" : art = "10 - ZOLL/EUST"
-                    Case "15" : art = "15 - ZOLL"
-                    Case "20" : art = "20 - EUST"
-                End Select
-                dgvAufschub.Rows.Add(AB.kdAkto_id, art, AB.kdAkto_hauptzollamt, AB.kdAkto_kontonummer, AB.kdAkto_eori, AB.kdAkto_eoriNL, AB.kdAkto_bin)
-            Next
-        End If
+                For Each AB In AUFSCHUB
+                    Dim art = ""
+                    Select Case AB.kdAkto_art
+                        Case "10" : art = "10 - ZOLL/EUST"
+                        Case "15" : art = "15 - ZOLL"
+                        Case "20" : art = "20 - EUST"
+                    End Select
+                    dgvAufschub.Rows.Add(AB.kdAkto_id, art, AB.kdAkto_hauptzollamt, AB.kdAkto_kontonummer, AB.kdAkto_eori, AB.kdAkto_eoriNL, AB.kdAkto_bin)
+                Next
+            End If
+
+
         dgvAufschub.ClearSelection()
     End Sub