FoxPro/Visual FoxPro - INVERTIR UN VALOR

Hola amigos necesito de su ayuda, este es el problema tengo un campo llamado folio y es tipo caracter ejemplo "000001","000002" lo que se requiere es que este resultado se invierta si es "000001" se pase a "100000" y si es "000002" pase a "200000", agradesco de antemano.

cValor="000002"
cNewValor=""
FOR i=0 TO LEN(cValor)
cNewValor = cNewValor + SUBSTR(cValor,LEN(cValor)-i,1)
ENDFOR

En este caso cNewValor seria igual a: "200000"

Ese codigo te invierte el valor, tendrías q ajustarlo a tu programa, cualquier cosa me avisas!!

Saludos!

Voy hacer pruebas...yo creo que esto es ideal saludos

bye