>Oh, crud! Slight correction:
>Change
>
> lnNum = SUBSTR( lcString, lni )
>to
>
lnNum = VAL( SUBSTR( lcString, lni ) )
>
>Sorry, 'bout that.
I'll jump in here
lcNumber = ""
FOR lnCount = 1 TO LEN(lcOrigStr)
IF ISDIGIT(SUBSTR(OrigStr, lnCount, 1))
lcNumber = lcNumber + SUBSTR(OrigStr, lnCount, 1)
ENDIF
ENDFOR
Craig Berntson
MCSD, Microsoft .Net MVP, Grape City Community Influencer