Foxtable(狐表)用户栏目专家坐堂 → 求助订单交付逐减的代码写法


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

主题:求助订单交付逐减的代码写法

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


加好友 发短信
等级:婴狐 帖子:62 积分:446 威望:0 精华:0 注册:2015/11/12 22:30:00
求助订单交付逐减的代码写法  发帖心情 Post By:2015/11/27 14:11:00 [显示全部帖子]

如:订单表里面有多行相同的产品订单,采购入库有多行相同的产品入库。要实现以下功能:
1.先对采购入库多行相同的产品进行汇总
2.再在订单表里面按照订单的排列顺序(也可以按照下单时间的先后顺序)逐步冲减,在最后一行反应出订单的交付结果。

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


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


加好友 发短信
等级:婴狐 帖子:62 积分:446 威望:0 精华:0 注册:2015/11/12 22:30:00
  发帖心情 Post By:2015/11/27 14:54:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:逐步冲减例子.table

请版主指导该怎么写这个代码。表1是订单明细,表2是入库明细,表3是需要的结果。
[此贴子已经被作者于2015/11/27 15:01:01编辑过]

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


加好友 发短信
等级:婴狐 帖子:62 积分:446 威望:0 精华:0 注册:2015/11/12 22:30:00
  发帖心情 Post By:2015/11/27 15:38:00 [显示全部帖子]

逻辑应该是这样的吧?
1.把表1的数据填充到表3
2.对表2的相同产品数量进行统计汇总
3.循环冲减


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


加好友 发短信
等级:婴狐 帖子:62 积分:446 威望:0 精华:0 注册:2015/11/12 22:30:00
  发帖心情 Post By:2015/11/27 16:49:00 [显示全部帖子]

还有一个问题:
For Each dr As DataRow In DataTables("订单明细").Select("D2C款号 = 'L00753020001'", "_Sortkey"),这个只针对一个款,如果是多款怎么写?

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


加好友 发短信
等级:婴狐 帖子:62 积分:446 威望:0 精华:0 注册:2015/11/12 22:30:00
  发帖心情 Post By:2015/11/27 17:08:00 [显示全部帖子]

报错,屏幕一直闪个不停,能上传个附件看一下吗?

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


加好友 发短信
等级:婴狐 帖子:62 积分:446 威望:0 精华:0 注册:2015/11/12 22:30:00
  发帖心情 Post By:2015/11/27 17:26:00 [显示全部帖子]

整明白了,谢谢!

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


加好友 发短信
等级:婴狐 帖子:62 积分:446 威望:0 精华:0 注册:2015/11/12 22:30:00
  发帖心情 Post By:2015/11/27 19:18:00 [显示全部帖子]

    If sumin >= dr("订单数量") Then
        nr("入库数量") = dr("订单数量")    如果这个数量等于采购入库冲减后的数量,要怎么写?
        nr("待交货数量") = 0

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


加好友 发短信
等级:婴狐 帖子:62 积分:446 威望:0 精华:0 注册:2015/11/12 22:30:00
  发帖心情 Post By:2015/11/28 10:55:00 [显示全部帖子]

这个写法计算出来的结果不是循环冲减,有问题

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


加好友 发短信
等级:婴狐 帖子:62 积分:446 威望:0 精华:0 注册:2015/11/12 22:30:00
  发帖心情 Post By:2015/11/28 11:00:00 [显示全部帖子]

只要在之前的代码上解决循环冲减后的最后一行,当入库数量大于订单数量时,入库数量等于循环冲减后的结存量。

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


加好友 发短信
等级:婴狐 帖子:62 积分:446 威望:0 精华:0 注册:2015/11/12 22:30:00
  发帖心情 Post By:2015/11/28 12:50:00 [显示全部帖子]

另外,假若计算要改成在订单明细里面做,要怎么写?

 回到顶部
总数 21 1 2 3 下一页