Subject Re: erase non-numbers in a string?
From Bernard Mouille <bernard.mouille@free.fr>
Date Wed, 13 Apr 2022 18:00:15 -0400
Newsgroups dbase.getting-started


/*
   bd_StringOnlyNumbers.cc
   Récupérer les chiffres d'une chaîne.
*/


clear

? bd_StringOnlyNumbers( "B1er3a3r5d0357" )

// Récupérer les chiffres d'une chaîne.
function bd_StringOnlyNumbers( cstringe )

   local cReturn
   local i

   cReturn = ""

   for i = 1 to len( cstringe )
      if subs( cstringe, i, 1 ) $ "0123456789"
         cReturn += subs( cstringe, i, 1 )
      endif
   endfor

   return cReturn





Charlie Wrote:

> Say I have a string "s6589j77"
 > Is it possibke to erase everything except for the numbers?  Thus leaving 658977.
 >
> Thanks for any help.