FoxPro/Visual FoxPro - agregar a columna codigo

tengo una tabla con la columna codigo
quiero agregar con un programa a esa columna 1,2,3,4... hasta EOF y a asi sucesivamente pero no se como

use tabla1
go top
a=1
scan
replace columna1 with a
a=a+1
endscan