以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]父表子表某列满足条件要求完成 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=145516) |
||||
-- 作者:ntqhj -- 发布时间:2020/1/27 17:05:00 -- [求助]父表子表某列满足条件要求完成 老师新年好!请帮写下代码
|
||||
-- 作者:有点蓝 -- 发布时间:2020/1/28 10:59:00 -- Select Case e.DataCol.Name Case "接单日期","托运合同号" If e.DataRow.IsNull("托运合同号") OrElse e.DataRow.IsNull("接单日期") Then e.DataRow("收款状态") = Nothing Else e.DataRow("发货状态") = "执行中" End If If DataTables("承运人明细表").Compute("sum(装车件数)","托运合同号=\'" & e.DataRow("托运合同号") & "\'") >= e.DataRow("件数") e.DataRow("发货状态") = "发货完成" End If End Select
|
||||
-- 作者:ntqhj -- 发布时间:2020/1/29 9:12:00 -- 测试运行提示出错呢,无效的聚合函数 Sum()和类型 String 的用法。 |
||||
-- 作者:有点蓝 -- 发布时间:2020/1/29 13:45:00 -- 件数列是字符列肯定就错咯,改为整数列 |
||||
-- 作者:ntqhj -- 发布时间:2020/1/30 9:53:00 -- 按要求修改了,似乎执行还是有问题。另请教:foxtabl里有的字段,在dbf库里怎就不显示呢? |
||||
-- 作者:有点蓝 -- 发布时间:2020/1/30 10:12:00 -- 表达式列来的吧,表达式列不存在数据库的。可以改为数据列 |
||||
-- 作者:ntqhj -- 发布时间:2020/1/30 13:33:00 -- 是打算改数据列,代码目前还不会写呢,只会复制加粘帖。前次代码已改数据列,运行好像还是有问题,帮我再看下呗,同时 “执行中” 及 “发货完成” 好像不能根据输入的相应内容自由变换。麻烦老师了! |
||||
-- 作者:有点蓝 -- 发布时间:2020/1/30 13:38:00 -- 1楼实例我测试没有问题。请上传有问题的实例说明 |
||||
-- 作者:ntqhj -- 发布时间:2020/1/30 14:17:00 -- 收款状态改成了发货状态,不知是否应该修改
|
||||
-- 作者:有点蓝 -- 发布时间:2020/1/30 14:30:00 -- 参考:http://www.foxtable.com/webhelp/topics/1472.htm |