Foxtable(狐表)用户栏目专家坐堂 → 库存统计


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

主题:库存统计

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


加好友 发短信
等级:一尾狐 帖子:470 积分:3641 威望:0 精华:0 注册:2017/11/5 14:47:00
库存统计  发帖心情 Post By:2018/12/7 23:33:00 [只看该作者]


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

 

库存统计,我想这样实现,选择了本月之后,点查询出来库存统计结果,这个库存明细表分别从进货单、出货单、调拨单里提取数据,库存明细表内容包括进货、调入、出货、调出、期初、期末 ,点上个月、上上月查询出对应的数据。分类查询 包括库房、商品类别。这个库房、商品类别的代码,是全部写在查询代码里,还是待查询结果出来了,通过目录树筛选库存的统计结果。这个想了好长时间,也还没有做出来,请老师指点指点


 


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105487 积分:536426 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/12/8 8:41:00 [只看该作者]


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


加好友 发短信
等级:一尾狐 帖子:470 积分:3641 威望:0 精华:0 注册:2017/11/5 14:47:00
  发帖心情 Post By:2018/12/8 22:29:00 [只看该作者]

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("进货单明细表"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("收货仓库","库房名称")
bd1.Groups.AddDef("品牌名称")
bd1.Groups.AddDef("商品类别")
bd1.Groups.AddDef("商品编号")
bd1.Groups.AddDef("商品名称")
bd1.Groups.AddDef("规格")
bd1.Groups.AddDef("型号") '根据型号分组
bd1.Groups.AddDef("方向")
bd1.Groups.AddDef("色号")
bd1.Groups.AddDef("单位")
bd1.Totals.AddDef("数量","进货数量") '对数量进行统计
dt1 = bd1.BuildDataSource()

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("出货单明细表"))
Dim dt2  As fxDataSource
bd2.Groups.AddDef("出货仓库","库房名称")
bd2.Groups.AddDef("品牌名称")
bd2.Groups.AddDef("商品类别")
bd2.Groups.AddDef("商品编号")
bd2.Groups.AddDef("商品名称")
bd2.Groups.AddDef("规格")
bd2.Groups.AddDef("型号") '根据型号分组
bd2.Groups.AddDef("方向")
bd2.Groups.AddDef("色号")
bd2.Groups.AddDef("单位")
bd2.Totals.AddDef("数量","出货数量") '对数量进行统计
dt2 = bd2.BuildDataSource()
Dim bd3 As New GroupTableBuilder("统计表3",DataTables("调拨单明细表"))
Dim dt3 As fxDataSource
bd3.Groups.AddDef("源仓库","库房名称")
bd3.Groups.AddDef("收货仓库","库房名称")
bd3.Groups.AddDef("品牌名称")
bd3.Groups.AddDef("商品类别")
bd3.Groups.AddDef("商品编号")
bd3.Groups.AddDef("商品名称")
bd3.Groups.AddDef("规格")
bd3.Groups.AddDef("型号") '根据型号分组
bd3.Groups.AddDef("方向")
bd3.Groups.AddDef("色号")
bd3.Groups.AddDef("单位")
bd3.Totals.AddDef("数量","调入数量") '对数量进行统计
bd3.Totals.AddDef("数量","调出数量") '对数量进行统计
dt3 = bd3.BuildDataSource()
Dim nms As String() = {"库房名称","品牌名称","商品类别","商品编号","商品名称","规格","型号","方向","色号","单位"} '指定连接列
dt1.Combine(nms,dt2,nms) '将销售统计数据组合到进货统计数据
dt1.Combine(nms,dt3,nms)
Tables("库存统计_Table1").DataSource = dt1 '将统计结果绑定到Table
With DataTables("库存统计_Table1").DataCols  '用表达式列计算库存数据
'Dim d As Date = e.Form.Controls("StartDate").value
'If d = Nothing Then
    'd = Date.today
'End If
'Dim ds1 As New Date(d.year, d.month, 1)
'Dim ds2 As Date = dt1.adddays(-1)
'ds1 = ds1.addmonths(-1)
.Add("期初数量",Gettype(Integer))
    .Add("期末数量",Gettype(Integer), "IsNull([期初数量],0) + IsNull([进货数量],0) - ISNULL([出货数量],0) + ISNULL([调入数量],0) - ISNULL([调出数量],0)")
End With

 

 

老师,我想实现功能:库存统计表的“期初数量”等于上个月的“期末数量”,如果初次使用系统,“期初数量”= 0,还有就是调拨单,有 “源仓库”,“收货仓库”,可是现在的结果出来是一个仓库 “调入数量”,“调出数量”都显示出来,应该是比如 总库向商场调拨数据,那么总库数据行 显示调出数量,商场数据行显示调出 ,请教了


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/12/9 16:28:00 [只看该作者]


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


加好友 发短信
等级:一尾狐 帖子:470 积分:3641 威望:0 精华:0 注册:2017/11/5 14:47:00
  发帖心情 Post By:2018/12/13 11:51:00 [只看该作者]

 

老师,我想统计库存就上面这个效果,我采用临时统计表的方法,那个对单库房的统计结果可以,现在我这是多个库房,统计还有问题,那个例子代码还没有研究明白,现在的问题是仓库调拨单,要实现这个调入调出数量正确,我觉得应该是录入调拨保存的时候,同时生成仓库调入单、和仓库调出单,我想的这个逻辑对吗,


这个保存一张单据的时候,在同时生成别的的单据,这个怎么写代码,请老师给个例子吧



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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/12/13 11:59:00 [只看该作者]

 

对应的项目,你做一个可以测试的实例发上来。说明最后需要做到的效果。


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


加好友 发短信
等级:一尾狐 帖子:470 积分:3641 威望:0 精华:0 注册:2017/11/5 14:47:00
  发帖心情 Post By:2018/12/15 4:18:00 [只看该作者]

请老师看一下

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


加好友 发短信
等级:一尾狐 帖子:470 积分:3641 威望:0 精华:0 注册:2017/11/5 14:47:00
  发帖心情 Post By:2018/12/15 4:24:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文件夹.rar

 

请老师帮忙了


 回到顶部
帅哥,在线噢!
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105487 积分:536426 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/12/15 11:55:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:1.txt


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


加好友 发短信
等级:一尾狐 帖子:470 积分:3641 威望:0 精华:0 注册:2017/11/5 14:47:00
  发帖心情 Post By:2018/12/15 13:26:00 [只看该作者]

老师,很感谢你。可现在还要问题,就是库存的期初数没有,看12月份的时候,库存的期初数要取11月份的期末数,还得再麻烦你,这个怎么取呀

 回到顶部
总数 16 1 2 下一页