This commit is contained in:
2022-11-08 08:52:15 +01:00
2 changed files with 15 additions and 2 deletions

View File

@@ -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