当前位置: 代码迷 >> PB >> 哪位高手帮小弟我看看这段应该如何改
  详细解决方案

哪位高手帮小弟我看看这段应该如何改

热度:30   发布时间:2016-04-29 06:41:35.0
谁帮我看看这段应该怎么改
if dw_1.update() =1 and dw_2.update()=1 then
commit;
MessageBox('提示','数据保存成功。')
else   
rollback;
end if
string p1,p2,c1,c2,t1,t2
int n1,n2,n3,i
for i=1 to dw_2.rowcount()
p1=dw_2.getitemstring(i,"pro_code")
n1=dw_2.getitemnumber(i,"rksl")
c1=trim(dw_1.getitemstring(1,"ck_code"))
select pro_code,ck_code,kcl
into :t1,:t2,:n2
from kctj
using sqlca
if p1=t1 and c1=t2 then
n3=n1+n2
update kctj
set n1=:n3
using sqlca
else 
insert into kctj(pro_code,ck_code,kcl)
values(:p1,:c1,:n1)
using sqlca
end if 

谁帮我看看这段保存入库单 并更新库存的代码哪里错了,也应该怎么改

------解决方案--------------------
引用:
谁帮我看看这段保存入库单 并更新库存的代码哪里错了,也应该怎么改


建议不要在前台用代码去写,用触发器去处理,否则用户修改数据时不好处理

而且如果手工修改数据库里的数据,会造成很多问题
  相关解决方案