diff --git a/VERAG_PROG_ALLGEMEIN/Schnittstellen/Creditsafe/cCreditSafeAPI.vb b/VERAG_PROG_ALLGEMEIN/Schnittstellen/Creditsafe/cCreditSafeAPI.vb
index d9068aa6..7be67150 100644
--- a/VERAG_PROG_ALLGEMEIN/Schnittstellen/Creditsafe/cCreditSafeAPI.vb
+++ b/VERAG_PROG_ALLGEMEIN/Schnittstellen/Creditsafe/cCreditSafeAPI.vb
@@ -734,7 +734,7 @@ Public Class cCreditSafeAPI
                     saveCR = True
                 End If
 
-                If saveCR Then CR = value
+                If saveCR AndAlso IsNumeric(value) Then CR = value
 
             Case "CL"
                 Dim saveCL As Boolean = False
@@ -743,7 +743,7 @@ Public Class cCreditSafeAPI
                     saveCL = True
                 End If
 
-                If saveCL Then CL = value
+                If saveCL AndAlso IsNumeric(value) Then CL = value
 
         End Select