cUID, Webservice

VERAG_PROG_ALLGEMEIN/Classes/cUIDPruefung.vb

@@ -254,6 +254,9 @@ Public Class cUIDPruefung
 
                                     If r("Error-Code") = "1511" Then
                                         errorCounter += 1 'Fehler Mitgliedsstaat nicht erreichbar!!!
+                                    ElseIf r("Error-Code") = "-99" AndAlso r("Error-Text") <> "" AndAlso r("Error-Text").ToString.Contains("Wegen Wartungsarbeiten") Then
+                                        Exit For
+
                                     End If
 
                                     ' Bei ERROR soll er ebenfalls einzeln durchgehen! Besprochen mit A.Stockenhuber
@@ -278,6 +281,7 @@ Public Class cUIDPruefung
                             End If
 
                             If veroegerungMs > 0 Then
+                                r("Verzoegerung") = veroegerungMs
                                 Thread.Sleep(veroegerungMs) 'Bei Verögeung soll zwischen jeder Abfrage eine Pause gemacht werden! (Wegen Sperre bei zu vielen Abfragen)
                             End If