关于　＇record has been locked by this session', 如何解决？(100分)

我再编写一个报表程序是，有如下任务：
对于a表的数据的一列定义表达式比如a表的第二行三列的直等于b表的三列的12行，15行，
18行的和，和excel一样的功能．b表有个子段＇jj'来判断本次定义表达式是该行是否使用
所以每次定义表达式都要先请空上次jj子段的直，我用了如下函数，
procedure emptyjj(tn:string);
begin
with b_dm.table4 do
begin
tablename:=tn;
close;
open;
first;
while not eof do
begin
edit;
fieldbyname('jj').asstring:='无';
refresh;
next;
end;
close;
end;
end;
第一次可以，第二次使用就出现＇record has been locked by this session 的问题了，
是不是该函数有问题？

>>

谢谢该问题解决了

帮你up

解决了把分给我吧

谢谢

多人接受答案了。