按记录号给字段赋值?该怎么解决

按记录号给字段赋值?
DBF 表,有个字段是要按记录号赋值,格式如下:
如果第一条记录:赋值 0001
如果第10条记录:赋值 0010
如果为111条记录:赋值 0111
这条语句该怎么写啊?

[解决办法]
update tt set f1=right('0000'+trans(recn()),4)