Foxtable(狐表)用户栏目专家坐堂 → 统计报表车号不显示


  共有2650人关注过本帖树形打印复制链接

主题:统计报表车号不显示

帅哥哟,离线,有人找我吗?
sf020cf
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:412 积分:2665 威望:0 精华:0 注册:2015/10/2 23:48:00
统计报表车号不显示  发帖心情 Post By:2016/4/18 17:25:00 [显示全部帖子]

 


图片点击可在新窗口打开查看此主题相关图片如下:2016-04-18_172503.jpg
图片点击可在新窗口打开查看
这是明细表.

 


图片点击可在新窗口打开查看此主题相关图片如下:2016-04-18_172555.jpg
图片点击可在新窗口打开查看
生成报表后无车号,无费用合计

这是报表模板

 


图片点击可在新窗口打开查看此主题相关图片如下:2016-04-18_172631.jpg
图片点击可在新窗口打开查看

报表事件:

Select Case e.Book.TempLate
    Case "货物运输确认"
        Dim str1 As String = ""
        Dim str2 As String = ""
        Dim Filter As String = "协议号 = '" & e.DataRow("协议号") & "'"
        For Each dw As String In e.DataRow.DataTable.GetValues("收货单位", filter)
            str1 &= dw &  e.DataRow.DataTable.compute("sum(送货吨位)", filter & " and 收货单位 = '" & dw & "'") & "T,"
        Next
      
        For Each dr As String In e.DataRow.DataTable.GetValues("送货单号", filter)          
                str2 &= dr & ","
        Next
        e.Book.Marks("收货单位") = str1.trim(",")
        e.Book.Marks("送货单号") = str2.trim(",")
        e.Book.Marks("送货费用") = DataTables("金发科技").Compute("Sum(送货费用)",Filter)
        e.Book.Marks("回货费用") = DataTables("金发科技").Compute("Sum(回货费用)",Filter)
        e.Book.Marks("装卸费") = DataTables("金发科技").Compute("Sum(装卸费)",Filter)
        e.Book.Marks("多点配送费") = DataTables("金发科技").Compute("Sum(多点配送费)",Filter)
        e.Book.Marks("其它费用") = DataTables("金发科技").Compute("Sum(其它费用)",Filter)
        e.Book.Marks("送货吨位") = DataTables("金发科技").Compute("Sum(送货吨位)",Filter)
       
End Select

 

我发现只有收货单位为字母的就不显示车号和费用合计


 回到顶部
帅哥哟,离线,有人找我吗?
sf020cf
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:412 积分:2665 威望:0 精华:0 注册:2015/10/2 23:48:00
  发帖心情 Post By:2016/4/18 17:32:00 [显示全部帖子]

这不应该啊

 

 


 回到顶部
帅哥哟,离线,有人找我吗?
sf020cf
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:412 积分:2665 威望:0 精华:0 注册:2015/10/2 23:48:00
  发帖心情 Post By:2016/4/18 17:40:00 [显示全部帖子]

不是所有的都不显示,我还是做个实例吧

 回到顶部
帅哥哟,离线,有人找我吗?
sf020cf
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:412 积分:2665 威望:0 精华:0 注册:2015/10/2 23:48:00
  发帖心情 Post By:2016/4/18 17:57:00 [显示全部帖子]

.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2016.4.6.1
错误所在事件:Excel报表,BuildGroupHeader
详细错误信息:
无效的聚合函数 Sum()和类型 String 的用法。
现在车号可以了,但又多了个上面的报错
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:paiche.zip


 回到顶部
帅哥哟,离线,有人找我吗?
sf020cf
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:412 积分:2665 威望:0 精华:0 注册:2015/10/2 23:48:00
  发帖心情 Post By:2016/4/18 18:17:00 [显示全部帖子]

我另一个版本是数值类,但是生成报表时就是少195和203这两个车号

 


图片点击可在新窗口打开查看此主题相关图片如下:2016-04-18_182037.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
sf020cf
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:412 积分:2665 威望:0 精华:0 注册:2015/10/2 23:48:00
  发帖心情 Post By:2016/4/19 14:38:00 [显示全部帖子]

一样的数据,导出到新实例 生成报表无问题,在旧的项目上生成就是少了195和203这两个车号

一样的报表事件,一样的模板 数据格式也是一样的

 


 回到顶部
帅哥哟,离线,有人找我吗?
sf020cf
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:412 积分:2665 威望:0 精华:0 注册:2015/10/2 23:48:00
  发帖心情 Post By:2016/4/21 17:10:00 [显示全部帖子]

测试后还是一样,在新项目正常,旧的就不行,后来我在报表事件里用了

 For Each dr2 As String In e.DataRow.DataTable.GetValues("车号", filter)
            str4 &= dr2 & ","
        Next
e.Book.Marks("车号") = str4.trim(",")
 模板[车号]换成<车号>是可以显示了 但合计不显示,

那我又写了  e.Book.Marks("费用合计") = DataTables("金发科技").Compute("Sum(费用合计)",Filter)

合计显示了,自动转大写又不行了<CUMoney(<费用合计>)>      用<>不行,用[]可以 但等于没sum


 回到顶部
帅哥哟,离线,有人找我吗?
sf020cf
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:412 积分:2665 威望:0 精华:0 注册:2015/10/2 23:48:00
  发帖心情 Post By:2016/4/21 17:25:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:1~ynhucbtz21(b`w($37pal.png
图片点击可在新窗口打开查看
这是个怎么错误

 


 回到顶部