Search code examples
visual-foxproreplaceall

FoxPro convert currency to numeric

I'm using Visual FoxPro and I need to convert currency amount into numeric. The 2 columns in the table are tranamt(numeric,12,2) and tranamt2(character)

Here's my example:

tranamt2=-$710,000.99

I've tried

replace all tranamt with val(tranamt2)

and

replace all tranamt with val(strtran(tranamt2, ",",""))

both results give me zero. I know it has something to do with the negative sign but I can't figure it out. Any help is appreciated.

Solution

  • Try this:

    replace all tranamt with VAL(STRTRAN(STRTRAN(tranamt2, "$", ""), ",", ""))

    This removes the dollar sign and comma in one shot.