Delphi + SQL 库存数量求和 ?

来源:百度知道 编辑:UC知道 时间:2024/06/22 16:00:13
我的SQL中有两张表:

[入库明细表]
------------------------------
商品ID 入库量
------------------------------
3 35
5 78
9 25
------------------------------

[库存表]
------------------------------
商品ID 库存量
------------------------------
1 0
2 0
3 0
4 0
5 0
6 0
7 0
8 0
9 0
------------------------------

请问怎么实现按下“入库”键以后,更新[库存表]中的数据为以下

[库存表]
------------------------------
商品ID 库存量
------------------------------
1 0
2 0
3 35
4 0
5 78
6 0
7 0
8 0
9 25
------------------------------

请问能用SQL语句实现?语句该如何编?谢谢。

procedure TForm1.Button1Click(Sender: TObject);
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('update 库存表 Set 库存量=入库明细表.库存量 where 库存表.商品ID=入库明细表.商品ID);
ADOQuery1.ExecSQL;
end;

update [库存表]。库存量=[库存表]。库存量+[入库明细表].入库量 where
[库存表].商品ID+入库明细表].商品ID