Foxtable(狐表)用户栏目专家坐堂 → 关于跨表自动算值代码的问题


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

主题:关于跨表自动算值代码的问题

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


加好友 发短信
等级:婴狐 帖子:48 积分:521 威望:0 精华:0 注册:2016/8/31 14:03:00
关于跨表自动算值代码的问题  发帖心情 Post By:2016/10/4 12:02:00 [只看该作者]

 两个表,库存表,消费表,在库存表有列"库存余额",消费表有列"消费金额",当消费金额列输入数值时,库存表的库存余额列>0,消费表的消费金额列正常显示输入的数值,当库存余额<0时,消费金额列能显示库存余额列的数值

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


加好友 发短信
等级:婴狐 帖子:48 积分:521 威望:0 精华:0 注册:2016/8/31 14:03:00
  发帖心情 Post By:2016/10/4 12:21:00 [只看该作者]

 if e.datacol.name="消费金额" then
if e.newvalue=isnot nothing then
dim dr as datarow
dr=datatables("库存表").find("库存余额="&e.newvalue&"")
if dr<0then
e.datarow("消费金额")=dr("库存余额")
else e.datarow("消费金额")=nothing
end if
endif
endif



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


加好友 发短信
等级:管理员 帖子:47477 积分:251256 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2016/10/5 6:54:00 [只看该作者]

两个表是通过什么对应起来的? 消费表中的一行,通过什么找出库存表中对应的一行。

建议您看看:
http://www.foxtable.com/webhelp/scr/1451.htm

还有合成表达式:
http://www.foxtable.com/webhelp/scr/1284.htm


还有这个好东西:

[此贴子已经被作者于2016/10/5 7:41:17编辑过]

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


加好友 发短信
等级:婴狐 帖子:48 积分:521 威望:0 精华:0 注册:2016/8/31 14:03:00
  发帖心情 Post By:2016/10/5 9:58:00 [只看该作者]

库存余额=IsNull([初始金额],0) + IsNull([充值金额],0) - IsNull([消费金额],0)

 

消费金额=IsNull(Sum(Child(消费表).消费金额),0)

 

 

两个表,库存表,消费表,在库存表有列"库存余额",消费表有列"消费金额",当消费金额列输入数值时,库存表的库存余额列>0,消费表的消费金额列正常显示输入的数值,当库存余额<0时,消费金额列能显示库存余额列的数值 或者输不进值,意思表示怅号已欠费,请充费


 if e.datacol.name="消费金额" then
if e.newvalue=isnot nothing then
dim dr as datarow
dr=datatables("库存表").find("库存余额="&e.newvalue&"")
if dr<0then
e.datarow("消费金额")=dr("库存余额")
else e.datarow("消费金额")=nothing
end if
endif
endif


请老师帮改一下


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


加好友 发短信
等级:婴狐 帖子:48 积分:521 威望:0 精华:0 注册:2016/8/31 14:03:00
  发帖心情 Post By:2016/10/5 10:05:00 [只看该作者]

库存表的库存余额=IsNull([初始金额],0) + IsNull([充值金额],0) - IsNull([消费金额],0)

 

库存表的消费金额=IsNull(Sum(Child(消费表).消费金额),0)

 

 

两个表,库存表,消费表,在库存表有列"库存余额"、"消费金额",消费表有列"消费金额",当消费表的“消费金额”列输入数值时,库存表的“库存余额”列>0,消费表的“消费金额”列正常显示输入的数值,当“库存余额”<0时,“消费金额”列能显示库存余额列的数值 或者输不进值,意思表示怅号已欠费,请充值
 if e.datacol.name="消费金额" then
if e.newvalue=isnot nothing then
dim dr as datarow
dr=datatables("库存表").find("库存余额="&e.newvalue&"")
if dr<0then
e.datarow("消费金额")=dr("库存余额")
else e.datarow("消费金额")=nothing
end if
endif
endif


重发一下,请老师帮改一下,


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


加好友 发短信
等级:管理员 帖子:47477 积分:251256 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2016/10/5 11:20:00 [只看该作者]

你并没有回答我在3楼提出的问题:

 

两个表是通过什么对应起来的? 消费表中的一行,通过什么找出库存表中对应的一行?

 

这个不确定,怎么写代码呢?

 

个人建议你还是看一下视频教程:

http://pan.baidu.com/s/1mhILvwW

 

特别是开发指南中<编程基础><基本类型><事件编程>这三章


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


加好友 发短信
等级:婴狐 帖子:48 积分:521 威望:0 精华:0 注册:2016/8/31 14:03:00
  发帖心情 Post By:2016/10/5 14:08:00 [只看该作者]

好的


 回到顶部