UID-Prüfung: internal ErrorCode = -99

2022-10-31 15:46:26 +01:00
parent 328c278bf6
commit 7314f1c5db
2 changed files with 2 additions and 2 deletions
--- a/VERAG_PROG_ALLGEMEIN/Classes/cUIDPruefung.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cUIDPruefung.vb
@@ -187,7 +187,7 @@ Public Class cUIDPruefung

                            counter += 1

-                            Dim errorCode = 0
+                            Dim errorCode = -99
                            Dim UID_TMP = FO.Call_Web_Service_MethodUID_Abfrage_NEU2020(r("KdNr"),, SaveErgInAdressen, showErr,, errorCode)
                            If UID_TMP IsNot Nothing Then
                                If UID_TMP.uid_valid Then