FoxPro/Visual FoxPro - Valores Ceros

Hola a todos, mi problema es que tengo una variable alfabetica y una variable numerca, necesito transferir el valor de la variable numerica a la variable alfabetica, pero los espacios en blanco de la variable alfabetica deben de ser sustituido por 0 en la salida de la misma.
Ejamplo : codigo = space(11) valor - 4147
en la salida del reporte o pantalla codigo debe ser 00000004147 en ves de 4147, espero me puedan ayudar.

Angel

tu variable es 11 de longitud ?

entonces siempre será 11 de longitud, verdad?

ceros='00000000000'
var_num=1423.34
var_final=ceros+str(var_num)
* ahora tienes que tomar solamente los 11 de la derecha

inicia=len(var_final)-11
final= len(var_final)
var_final=Right(var_final,inicia,final)

Plinio, este procedimiento da un error en
var_final=Right(var_final,inicia,final)

Prueba esto en la linea de comandos.
x=4147 &&Suponiendo que x es la variable numerica
y = PADL(x, 11, '0')
? y &&Esto es para mostrar la salida, no lo ponga en el programa

Esto funciona perfectamente, pero si el valor numerico tiene 2 decimales necesito la misma salida pero omitiendo el punto decimal.
Ejemplo
vlor = 2374.25, alfa = space(11)

resultado = 00000237425

la solución con o sin decimales es:

e = 34545.44

y = iif((int(e)= e), PADL(INT(e), 11, '0'),PADL(INT(e*100), 11, '0'))

el valor te queda en y

Pruebalo!