Foxtable(狐表)用户栏目专家坐堂 → 大订单拆分


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

主题:大订单拆分

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


加好友 发短信
等级:幼狐 帖子:108 积分:824 威望:0 精华:0 注册:2018/11/23 15:18:00
大订单拆分  发帖心情 Post By:2018/11/24 9:16:00 [显示全部帖子]


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

如果一个大订单Y件工期X天,但是根据实际情况需要分几个供应商几个时间段分批完成这批数量,请问怎么设置呢

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


加好友 发短信
等级:幼狐 帖子:108 积分:824 威望:0 精华:0 注册:2018/11/23 15:18:00
  发帖心情 Post By:2018/11/24 13:23:00 [显示全部帖子]

接单员接到订单以后  会把订单拆分给几个批次分给供应商     然后有跟单员负责跟踪  现在就差在拆分这块
 如果做成分隔表的话有帮助文件参考吗



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


加好友 发短信
等级:幼狐 帖子:108 积分:824 威望:0 精华:0 注册:2018/11/23 15:18:00
  发帖心情 Post By:2018/11/24 14:35:00 [显示全部帖子]

最后效果我想做成窗口形式,就是订单数量出来,
跟单员选择供应商分配加工数量和批次,
每隔{(订单截止日期-订单开始日期)/批次}会提醒跟单员
对产品加工情况进行核查

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

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


加好友 发短信
等级:幼狐 帖子:108 积分:824 威望:0 精华:0 注册:2018/11/23 15:18:00
  发帖心情 Post By:2018/11/28 13:42:00 [显示全部帖子]

再请问一下 我想让相关负责人看见自己的提醒条  而总经理可以看见所有到期提醒怎么设置呢


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


加好友 发短信
等级:幼狐 帖子:108 积分:824 威望:0 精华:0 注册:2018/11/23 15:18:00
  发帖心情 Post By:2018/11/28 14:03:00 [显示全部帖子]


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

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


加好友 发短信
等级:幼狐 帖子:108 积分:824 威望:0 精华:0 注册:2018/11/23 15:18:00
  发帖心情 Post By:2018/11/28 15:22:00 [显示全部帖子]

哪位老师能帮忙改一下  正在模仿阶段还请大侠指教
图片点击可在新窗口打开查看
Dim dt As Date = Date.Today.AddDays(2)
Dim dr As DataRow = DataTables("报价阶段表").Find("报价_回函时间 <= #" & dt & "#")
If dr IsNot Nothing Then
    Dim drs As List(Of DataRow)
    drs = DataTables("报价阶段表").Select("[供应商报价_模具价格] Is Null or[供应商报价_铸造价格] Is Null or [供应商报价_加工价格] Is Null")
    For Each dra As DataRow In drs
        
        If dra Is null
            MessageBox.Show("有产品报价即将到期!请总经理确认","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
            Tables("报价阶段表").Filter = "报价_回函时间 <= #" & dt & "#"
            MainTable = Tables("报价阶段表")
        End If
    Next
End If

 回到顶部