This commit is contained in:
2025-09-05 17:49:18 +02:00
parent 3085943897
commit 8bb56bfaed

View File

@@ -734,7 +734,7 @@ Public Class cCreditSafeAPI
saveCR = True saveCR = True
End If End If
If saveCR Then CR = value If saveCR AndAlso IsNumeric(value) Then CR = value
Case "CL" Case "CL"
Dim saveCL As Boolean = False Dim saveCL As Boolean = False
@@ -743,7 +743,7 @@ Public Class cCreditSafeAPI
saveCL = True saveCL = True
End If End If
If saveCL Then CL = value If saveCL AndAlso IsNumeric(value) Then CL = value
End Select End Select