SELECT 临时处方表
LOCATE ALL FOR alltrim(药品名称)==药品名称_tmp
IF NOT found()
    appen from DBF('药品表')  for ALLTRIM(药品名称)==药品名称_tmp
ENDIF
SELECT 临时处方表
LOCATE ALL FOR alltrim(药品名称)==药品名称_tmp
REPLACE  药品数量 with 药品数量+thisform.text2.value IN 临时处方表

针对临时处方表进行操作

第一问：为何第一次sele临时处方表，下面又出现在sele临时处方表。我感觉开始的第一次打开的表又没有关闭。
第二问：replace一代码：上面不已打开了sele临时处方表,为何又in 临时处方表，不加in 临时处方表不还是替换临时处方表吗？前一处临时处方表与in处的临时处方表有什么不同吗？

脱裤子放屁——多此一举

有可能是我们没想到的问题。

[ 本帖最后由 jxwjlx 于 2014-1-15 16:33 编辑 ]

结贴吧

多余代码...

穩健寫法而已，沒什麽影響，嚴格說是一種好習慣，當然有潔癖的可以省一點。

這麽多人幫你做這個程序啊~

哈哈，这里不是编程的乐园吗？谢谢各位……