From 610008089b4508a6e70b49c2bd65e0002ebf5dfa Mon Sep 17 00:00:00 2001
From: Andreas Luxbauer <al@verag.ag>
Date: Thu, 2 Oct 2025 09:14:03 +0200
Subject: [PATCH] merge?

---
 initATLASAufschubkonten/frmStartOptions.vb | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb
index bc1945a..a5859ac 100644
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -6487,7 +6487,7 @@ repeatRequestDaily:
                 End If
 
                 If totalPages > 1 Then
-                        For i = 2 To totalPages
+                    For i = 2 To totalPages
 repeatRequestDailyPages:
                         APIText = cs.getCompanyEvents(companyDummy, dtMonitoredRequest, False, totalPages, checkDate, upateKunden, False,, setzeKundenbesonderheiten, True,, i)
                         If APIText.Contains("Invalid token") Then
@@ -6501,15 +6501,15 @@ repeatRequestDailyPages:
                         End If
                     Next
 
-                    End If
-
-
-
-                    Exit Sub
-
                 End If
 
 
+
+                Exit Sub
+
+            End If
+
+
             Dim dtRechnungen As DataTable = (New SQL).loadDgvBySql("select distinct(RechnungsKundenNr) from Rechnungsausgang where cast(RechnungsDatum as Date) >= ' " & Today().AddYears(-1) & "' ", "FMZOLL")
 
             Dim dtCreditsafe As DataTable = (New SQL).loadDgvBySql(creditsave, "FMZOLL")