Foxtable(狐表)用户栏目专家坐堂 → [求助]代码求助!!


  共有2726人关注过本帖平板打印复制链接

主题:[求助]代码求助!!

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


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
  发帖心情 Post By:2015/9/17 10:24:00 [只看该作者]

逻辑陈述:

 

当收款明细中添加一条记录后,累加该客户的今年收款总额(SUM1),同时在“合同一览表”中找到该客户的今年合同记录并累加“合同价款”(SUM2),,同时找到该客户去年的历史结余的总金额(SUM3)。

定义SUM4=SUM1-SUM3,意思是:收款中先扣除历史结余部分,再计算实际今年收款总额

那么当:sum4 < SUM2(几年实收 小于 今年合同总额时)

     找到该客户今年的合同记录,按合同日期降序排列(降序的目的,也就是先满足之前的合同收款,剩下的合同视为没有执行完毕)

 

     倒着累加合同总价款

 

     一旦 累加合同总价款sum5  >  sum4(今年实际收款)时

 

      该条记录以及后面的记录的“执行完毕”=“否”

                       之前的记录的“执行完毕”=“是”

    

     而当 sum5  = sum4(今年实际收款)时

     后面的记录的“执行完毕”=“否”

    该条及之前的记录“执行完毕”=“是”

      

    ElseIf Sum4= Sum2 Then

     

 所有记录的“执行完毕”=“是”
        MessageBox.show("该客户货款已全部结清","提示")
   

Else(即:Sum4> Sum2)

        第一条记录的“执行完毕”=“否”
       其他行记录的 “执行完毕”=“是”
        MessageBox.show("该客户货款已全部结清,并有结余!","提示")

 

 

[此贴子已经被作者于2015/9/17 10:33:11编辑过]

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