FoxPro/Visual FoxPro - problemas incremento de campo

hola :tengo un campo definido como numfac caracter 8 ,en el
cual cada vez que emito
una factura lo incremento en uno y lo actualizo.
el codigo es el siguiente:

sele tabparam &&la tabla que actualizo
set orde to tabparam &&ordeno por el indice
if seek("0001") && me posiciono en el registro (esta tabla tiene
un unico registro)

sumfac=val(numfac)+1 &&incremento numfac en 1 ,

var1=padl(str(sumfac),8,'0') && relleno con ceros adelante

repla tabparam.numfac with var1 &&reemplazo el valor del campo con el
valor incrementado

endif

el problema es que cuando ejecuto esto,no me da ningun error ,pero voy
a ver el campo numfac de la tabla y esta vacio.si alguien me puede decir la falla
desde ya gracias

if seek("0001") && Yo hubiese puesto GO TOP

sumfac=val(numfac)+1 &&incremento numfac en 1 ,

var1=padl(str(sumfac),8,'0') && relleno con ceros adelante

SELECT tabparam &&Te falta esto
repla tabparam.numfac with var1 &&reemplazo el valor del campo con el
valor incrementado

endif

gracias por la respuesta.pero sigo con el problema.

puse un par de wait wind paar hacer un seguimiento y lo que encontre es que despues de esta linea:
var1=padl(str(sumfac),8,'0')
var1 queda en blanco,pense que era esto, entonces a var1 directamente le asigne
str(sumfac),ahi si vi el contenido incrementado (sin los ceros delante),pero luego de poner la linea de:
sele tabparam y hacer el
repla tabparam.numfac with str(sumfac)
,puse un wait wind para ver como quedo tabparam.numfac y queda en blanco.la verdad no se que esta pasando ! gracias

Holas
Haber por lo que entiendo quieres un campo autoincremental.
Prueba colocando el puntero en el primer registro.

Go Top
repla tabparam.numfac with var1

x que mejor no poner el campo como autoincrement