Evaluar Numeros y Caracteres 
Algunas veces necesitas evaluar una expresión o una cadena de texto y determinar los valores numéricos o caracteres que tiene esta. A continuación un pequeño de como hacerlo

cCadena = "512 96 m sd 7ecbx */ t553rdv"  

cAnchoCadena = len(cCadena)  

cNumeros = ""        

FOR nCnt = 1 TO cAnchoCadena  
    cCharacter = SUBSTR(cCadena, nCnt, 1) 
        IF ISDIGIT(cCharacter)   
                  cNumeros = cNumeros + cCharacter   
                  ? cNumeros
       ENDIF
ENDFOR 

El primer paso es tener la cadena de caracteres a evaluar. Luego determinamos el ancho de la cadena a través de la función LEN; Utilizamos una variable donde almacenaremos los caracteres que sean dígitos (de 0 - 9). Hacemos un ciclo hasta el numero de caracteres de la cadena y vamos evaluando numero por numero; si el carácter es digito entonces será agregado a la variable cNumeros.