vfox简单问题 谢谢大家

[zhiks]

有一个vf的prg文件 用文本文件打开内容是：
clos data
sele 1
use ds
inde on dwdm to 1
sele 2
use gs
reca all
set rela to dwdm into a
*repl all en with a->en for dwdm=a.dwdm
dele for dwdm=a.dwdm
clos data

大家能不能帮忙解释一下 谢谢了！

[zhiks]

还有没有人知道？

[yesyesyes]

将gs表中en字段的值用ds表中相应的en字段值替换,然后将这些记录做删除标记

[JohnShen]

clos data &&关闭当前数据库
sele 1
use ds
inde on dwdm to 1
sele 2
use gs
reca all &&恢复gs中作删除标记的所有记录
set rela to dwdm into a &&对gs和ds中的记录中dwdm字段相同的记录建立关联
*repl all en with a->en for dwdm=a.dwdm
dele for dwdm=a.dwdm &&删除gs中所有能在ds中找到相同dwdm的记录
clos data

以上实际上是一个gs相对于ds求差的运算