Index: vhLib/LoggingGetalIndex.cls.xml
===================================================================
diff -u -r3515 -r3519
--- vhLib/LoggingGetalIndex.cls.xml	(.../LoggingGetalIndex.cls.xml)	(revision 3515)
+++ vhLib/LoggingGetalIndex.cls.xml	(.../LoggingGetalIndex.cls.xml)	(revision 3519)
@@ -67,7 +67,7 @@
 <FormalSpec>Logging:vhLib.Logging</FormalSpec>
 <Implementation><![CDATA[
 	#dim GevondenGetallen As %String = ""
-	Do ..GeefGetallenInTekst(Logging.Detail, .GevondenGetallen)
+	Do ##class(TECH.StringUtils).GeefGetallenInTekst(Logging.Detail, .GevondenGetallen)
 	Set Getal=""
 	For {
 		Set Getal=$Order(GevondenGetallen(Getal)) 
@@ -120,41 +120,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefGetallenInTekst">
-<Description>
-Set GG=""  Do ##class(vhLib.LoggingGetalIndex).GeefGetallenInTekst("abc123456def987654hij",.GG)  zw GG</Description>
-<ClassMethod>1</ClassMethod>
-<FormalSpec><![CDATA[Tekst:%String,&GevondenGetallen:%String]]></FormalSpec>
-<Implementation><![CDATA[
-	#dim Einde As %Integer
-	#dim Waarde As %String
-	#Dim Start As %Integer = 0
-	#Dim Getal As %String = ""
-	#dim VorigWasCijfer, HuidigIsCijfer As %Boolean = ""
-	For i=0:1:$Length(Tekst) {
-		Set Karakter = $Extract(Tekst, i,i)
-		Set HuidigIsCijfer = Karakter?1N
-		If VorigWasCijfer {
-			If HuidigIsCijfer {
-				Set Getal = Getal _ Karakter
-			} Else {
-				Set GevondenGetallen(Getal) = "1"
-				Set Getal = ""
-			}
-		} Else {
-			If HuidigIsCijfer {
-				Set Getal = Karakter
-			}
-		}		
-		
-		Set VorigWasCijfer = HuidigIsCijfer
-	}
-	If ("" '= Getal) {
-		Set GevondenGetallen(Getal) = "1"
-	}
-]]></Implementation>
-</Method>
-
 <Storage name="VHOpslag">
 <Type>%CacheSQLStorage</Type>
 <StreamLocation>^vhLib.LoggingGetalIndexS</StreamLocation>