Sustituir 3 letras que están al principio de un numero de folio con ceros

Buenas Tardes y saludos desde Sonora, México

Mi problema es lo siguiente, como dice el titulo quiero sustituir 3 letras que se encuentran al principio de un numero de folio con ceros , ya lo intente de muchas maneras la que mas me he acercado a lo que quiero es con esta linea:

mFac_Co = Iif(Isalpha(Left(mFactura,3)), Padl(Left(mFactura,3),6,'0'), Padl(Left(mFactura,1), 6, '0'))

Pero me muestra los 3 ceros pero también las 3 letras, pondré un ejemplo de lo que quiero para que se entienda un poco mas.

Este seria un Folio de los que deseo modificar: OJA390, y lo que quiero hacer es que quede de esta manera: 000390.

Agradezco la ayuda que me puedan brindar, a lo mejor es fácil lo que pido pero apenas ando experimentando con Visual Foxpro.