动态拆分时间段并插入数据到网格部件

原创 2016年05月30日 16:09:55
业务描述:
 
如上图所示,根据起始时间、截止时间、租赁期限、租金总额、付款期数自动生成期数、应付款时间、应付款金额到网格中;

实现方法:

网格部件1.RefreshData()
dim dt=网格部件1.DataTable

if isnull(记录部件1.GetFieldValue("起始时间")) = false and isnull(记录部件1.GetFieldValue("截止时间")) = false and isnull(记录部件1.GetFieldValue("租金总额")) = false and isnull(记录部件1.GetFieldValue("付款期数")) = false and isnull(记录部件1.GetFieldValue("租赁期限")) = false then
        '计算应付款金额
        dim yfk =记录部件1.GetFieldValue("租金总额")/ 记录部件1.GetFieldValue("付款期数")
        '根据付款期数计算每期间隔多少月
        dim ys = 记录部件1.GetFieldValue("租赁期限") * 12/记录部件1.GetFieldValue("付款期数")
        dim dr
        For i=1 to 记录部件1.GetFieldValue("付款期数") 
                dr= dt.NewRow()
                dt.Rows.Add(dr)
                dr["ID"]=guid()
                dr["期数"]=i
                dr["应付款时间"] =  DateAdd(记录部件1.GetFieldValue("起始时间"),(i-1)*ys,"M")
                dr["应付款金额"] = yfk 
                dr["实收金额"] = 0
                dr["未收金额"] = yfk
        next
else
        msgbox("起始时间、截止时间、租金总额、租赁期限、付款期数不能为空")
end if
效果展示:
 

原文地址:http://bbs.delit.cn/thread-1017-1-1.html

转载请注明出处;

撰写人:度量科技www.delit.cn

数据库建表 —— 静态数据 和 动态数据 的 拆分

背景 表

vtk动态显示多边形网格数据

近期老板要求做一个人的dongtai

jQuery EasyUI使用教程之动态改变数据网格列

jQuery EasyUI最新试用版免费下载> 使用'columns'属性可以很容易地定义数据网格列。如果您想要动态地改变列,这也非常容易。为了更改列,您可以重新调用datagrid方法并传递一...

excel大数据拆分

  • 2016年01月11日 17:47
  • 54KB
  • 下载

【读书笔记】抓取深圳或上海股市,或香港美国等有关股市某时间段内全部股票行情数据,进行主成分分析构造你个人的股市指数

抓取深圳或上海股市,或香港美国等有关股市某时间段内全部股票行情数据,按照课程里的思路进行主成分分析构造你个人的股市指数,然后分析你的私家指数和该股市常用官方股票指数的相关性,判断主成分分析在构造股市指...

字节的数据拆分

  • 2015年11月03日 14:05
  • 28KB
  • 下载

sql2000数据拆分

  • 2012年08月22日 15:12
  • 1KB
  • 下载

100道动态规划——39 hihoCoder 1475 数组拆分 前缀和 DP

#1475 : 数组分拆 Time Limit:10000ms Case Time Limit:1000ms Memory Limit:256MB Description 小Ho得...

百度Echarts+JQuery 一页多图动态加载实现(可拆分)

大概的发一下一页多图的加载方法,可以拆分,可以合并。动态取数据显示。...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:动态拆分时间段并插入数据到网格部件
举报原因:
原因补充:

(最多只允许输入30个字)