以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  销售日期 >大于更新日期 ,销售日期 <下一次更新日期  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=87774)

--  作者:fubblyc
--  发布时间:2016/7/19 11:37:00
--  销售日期 >大于更新日期 ,销售日期 <下一次更新日期

更新日期 是指 商品的 调整位置 的调整时间。一个商品不同的时间放在不同的位置。

要统计 每个更新时间段的 销售数据。

销售日期 >=更新日期 ,销售日期 <下一次更新日期

现在是写了 销售日期 >=大于更新日期,

销售日期 <下一次更新日期 不知道怎么写。。。


图片点击可在新窗口打开查看此主题相关图片如下:6.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:7.jpg
图片点击可在新窗口打开查看

 

代码如下:

SELEC T
dbo.[库位信息].[更新时间],
dbo.[销售明细].[销售日期],
dbo.[库位信息].[货号],
dbo.[库位信息].[标记值],
dbo.[库位信息].[库位],
dbo.[库位信息].[陈列方式],
dbo.[销售明细].[销售数量]

FROM
dbo.[库位信息]
INNER JOIN dbo.[销售明细] ON dbo.[库位信息].[货号] = dbo.[销售明细].[货号]

[此贴子已经被作者于2016/7/19 11:39:34编辑过]

--  作者:大红袍
--  发布时间:2016/7/19 11:40:00
--  
 sql语句不能做到,要用代码处理才行。
--  作者:fubblyc
--  发布时间:2016/7/19 12:00:00
--  

哦,我这样写:

Dim bd1 As New SQLcrossTableBuilder("统计表1","库位销售分析")
Dim dt1 As fxDataSource
bd1.C
bd1.HGroups.AddDef("货号") \'添加客户列用于水平分组
bd1.HGroups.AddDef("更新时间",DateGroupEnum.none) \'添加客户列用于水平分组
bd1.HGroups.AddDef("库位") \'添加客户列用于水平分组
bd1.VGroups.AddDef("陈列方式") \'添加日期列用于垂直分组,按月分组
bd1.Totals.AddDef("销售数量") \'添加数量列用于统计

dt1 = bd1.BuildDataSource()
Tables(e.Form.Name & "_table1").DataSource = dt1


图片点击可在新窗口打开查看此主题相关图片如下:8.jpg
图片点击可在新窗口打开查看
但是这样 没有 销售时间< 下一次的更新时间 

 

加入条件: 

Dim bd1 As New SQLcrossTableBuilder("统计表1","库位销售分析")
Dim dt1 As fxDataSource
bd1.C
bd1.HGroups.AddDef("货号") \'添加客户列用于水平分组
bd1.HGroups.AddDef("更新时间",DateGroupEnum.none) \'添加客户列用于水平分组
bd1.HGroups.AddDef("库位") \'添加客户列用于水平分组
bd1.VGroups.AddDef("陈列方式") \'添加日期列用于垂直分组,按月分组
bd1.Totals.AddDef("销售数量") \'添加数量列用于统计
bd1.Filter = "销售日期 < 更新时间 "  这样不对,就会没有数据了。
dt1 = bd1.BuildDataSource()
Tables(e.Form.Name & "_table1").DataSource = dt1


--  作者:大红袍
--  发布时间:2016/7/19 12:22:00
--  
 如果要统计数据,那你就先生成表,然后循环每一行,分别统计填入数据。