以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 录入数据闪退 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=132406) |
||||
-- 作者:qqhealth -- 发布时间:2019/3/21 10:46:00 -- 录入数据闪退 老师您好,在发布后的表中输入数据(采购单价、销售单价)出现闪退,采购单价和销售单价由产品表带出,开发版没有出现。修改数量后下面采购金额和销售金额不变化?需要怎么修改?谢谢! Dim dr1 As DataRow = e.DataRow Select Case e.DataCol.Name Case "采购单价","数量","药品订单","加成","定价","折扣","销售单价","销售金额" dr1("采购金额") = dr1("采购单价")*dr1("数量") dr1("定价") = dr1("采购单价")*(1+dr1("加成")) dr1("销售金额") = dr1("销售单价")*dr1("数量")*(1-dr1("折扣")) End Select |
||||
-- 作者:qqhealth -- 发布时间:2019/3/21 10:53:00 -- 修改数量、采购单价、销售价格(三列的列属性均可以编辑),均出现闪退。谢谢! |
||||
-- 作者:有点蓝 -- 发布时间:2019/3/21 11:07:00 -- Case "采购单价","数量","加成","折扣","销售单价" |
||||
-- 作者:qqhealth -- 发布时间:2019/3/21 12:20:00 -- 老师您好,case修改后还是出现修改数量、销售单价、采购价格数据出现闪退。谢谢! |
||||
-- 作者:有点蓝 -- 发布时间:2019/3/21 13:36:00 -- 事件的完整代码发上来,或者上传实例说明 |
||||
-- 作者:qqhealth -- 发布时间:2019/3/21 13:50:00 -- 不知贴子怎么排版,完整事件代码见附件,谢谢!
[此贴子已经被作者于2019/3/21 13:53:08编辑过]
|
||||
-- 作者:qqhealth -- 发布时间:2019/3/21 14:08:00 -- 老师您好,我把下面代码删掉后好像就可以了,这段代码应该怎么调整呢?谢谢! Select Case e.DataCol.Name Case "采购金额","销售金额","已支付金额","已收款金额" Dim pr As DataRow pr = DataTables("药品订单").Find("药品订单编号 = \'" & e.DataRow("药品订单编号") & "\'") If pr IsNot Nothing Then DataTables("药品费结算").DataCols("药品订单编号").RaiseDataColChanged(pr) End If End Select |
||||
-- 作者:有点甜 -- 发布时间:2019/3/21 14:53:00 -- 1、你这段逻辑是什么?,改成这样?
Select Case e.DataCol.Name
2、去你表格【药品费结算】里面datacolchanged事件查看错误
http://www.foxtable.com/webhelp/scr/1522.htm
|
||||
-- 作者:qqhealth -- 发布时间:2019/3/21 17:07:00 -- 老师您好,按照您的修改后就可以了。【药品费结算】里面datacolchanged的事件检查了没有问题。这段代码的目的是【药品订单】表里的采购价格、销售价格或数量有变化,【药品费结算】表里的数据需要同步变化,不知有没有更好的办法?谢谢! |
||||
-- 作者:有点甜 -- 发布时间:2019/3/21 17:55:00 -- 以下是引用qqhealth在2019/3/21 17:07:00的发言:
老师您好,按照您的修改后就可以了。【药品费结算】里面datacolchanged的事件检查了没有问题。这段代码的目的是【药品订单】表里的采购价格、销售价格或数量有变化,【药品费结算】表里的数据需要同步变化,不知有没有更好的办法?谢谢!
重置列,是最好的方法了。
|