Index: APPS/EC/impl/LoginKortingBewaarder.cls.xml
===================================================================
diff -u -r32191 -r32263
--- APPS/EC/impl/LoginKortingBewaarder.cls.xml	(.../LoginKortingBewaarder.cls.xml)	(revision 32191)
+++ APPS/EC/impl/LoginKortingBewaarder.cls.xml	(.../LoginKortingBewaarder.cls.xml)	(revision 32263)
@@ -66,7 +66,7 @@
 	
 	#dim Korting As %String = ..KlantSessieData.Korting
 	#dim KortingPercentage As TECH.Percentage
-	If (##class(TECH.Integer).IsValid(Korting) && ((Korting=0) || ((Korting>=1) && (Korting<=100)))) {
+	If ($IsValidNum(Korting) && ((Korting=0) || ((Korting>=1) && (Korting<=100)))) {
 		Set KortingPercentage = (Korting / 100)
 	}ElseIf (Korting = "") {
 		Set KortingPercentage = 0