主题：下面是出库表单中的出库命令,怎么有些不对阿?
冰河力行
[专家分：0] 发布于 2010-06-29 20:37:00
SELECT 库存表
LOCATE FOR bh=ALLTRIM(thisform.bh1.value) .AND. ;
fdh=ALLTRIM(thisform.fdh1.value) .and.;
cz=ALLTRIM(thisform.cz1.value) .and. ;
kcwz=ALLTRIM(thisform.kcwz1.value)
IF !FOUND()
MESSAGEBOX('库存中没有找到要出库的记录！','提示')
RETURN
ENDIF
DELETE
SELECT 出库表
APPEND BLANK
REPLACE bh WITH ALLTRIM(thisform.bh1.value),;
fdh WITH ALLTRIM(thisform.fdh1.value),;
cz WITH ALLTRIM(thisform.cz1.value),;
kcwz WITH ALLTRIM(thisform.kcwz1.value),;
ckdate with DATE()
thisform.Refresh
MESSAGEBOX('出库成功！','提示')
出库表单中有一个表格和四个标签及其文本框是:编号,分段号,材质,库存位置.
怎么在其中一个文本框中随意输入一个记录,其他三个文本框都不输入,结果是与之相对应的库存表单中的表格中的所有记录都出库了.而且此表单中的表格中的四个字段中只显示输入文本框的该记录,而我只想输入四个字段的相对应的一条记录才能出库.
回复列表 （共4个回复）
沙发
moke9 [专家分：30] 发布于 2010-09-02 09:50:00
你好.我是全职网赚工作者.
如果你有时间有电脑.
想在网络上创业.请联系我..
项目绝对真实.详情QQ空间资料
加盟请联系 QQ908889846
板凳
DannyFox [专家分：420] 发布于 2010-09-03 11:14:00
改成这样试试看
LOCATE FOR alltrim(bh)==ALLTRIM(thisform.bh1.value) .AND. ;
alltrim(fdh)==ALLTRIM(thisform.fdh1.value) .and.;
alltrim(cz)==ALLTRIM(thisform.cz1.value) .and. ;
alltrim(kcwz)==ALLTRIM(thisform.kcwz1.value)
3 楼
C易特联盟 [专家分：60] 发布于 2010-10-03 23:02:00
最新互助式项目。
这是一个互助的模式。
不推广人也有钱赚的。分A B两个网。
不推广的人在A网。推广的人 在B网。
B网推广的人帮助A网。
A网赚取6000元出局。
B网就多了。
详情了解加QQ919169870
http://blog.sina.com.cn/s/blog_6b19ec920100liv6.html
C易特奖励制度
http://blog.sina.com.cn/cyite6
C易特更多资料博客
4 楼
GEORGECHIN [专家分：440] 发布于 2010-10-28 22:23:00
先找這個出庫記錄,沒有找到則提示沒有找到,如果找到就刪除然后再新增一條只是時間不同但其它字段都一模一樣的記錄?
先不說這樣做的意義,僅以上代碼,其刪除的永遠是排在索引關鍵字最靠前的那一筆資料,而且如果DELE 設置為OFF的話,刪除的可能永遠是已被刪除的那一筆!這時如果數據表設置的主索引關鍵字且不正確,報錯的機會應該是相當的高.
問題在於:
1.如果允許數據庫表存在帶羅輯刪除的記錄,那麼請在當前會話的開始設置:SET DELE ON ,即讓系統不操作帶邏輯刪除標記的記錄.
2.在DELE后加上物理刪除命令PACK.
我来回复
您所在位置：