>Here´s the scenario:
>
>Reading a CSV/TXT file, I receive "1000","2.541","2000","2000.00"
>
>The rule says if the value of the string is a true integer (2000), divide it by 100, otherwise (2000.00) leave it as it is.
>
>Since VFP evaluates 1=1.000 to true, a simple ? INT(VAL(lcValue))=VAL(lcValue) is not very helpful.
>
>I´ve come up with
>
>lnValue=IIF("." $ lcValue,VAL(lcValue),VAL(lcValue)/100)
>
>Which works, of course, except it´s sooo sloooow!
>
>If there is a better (much much faster) way please let me know!
>
>TIA
IMHO any inline evaluation would be slow, ie:
lcValue # transform(val(lcValue)) && 2000.00
I would get contents into a temporary cursor as char type and have an extra field as numeric. After append I would populate numeric field with a replace all.
Cetin