- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]唯一编号 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=79050)
-- 发布时间：2015/12/23 13:04:00
-- [求助]唯一编号
老师，每次交易生成唯一一个号码，这样可以吗？我要把编号列的数字也加进去。望老师修改。
此主题相关图片如下：图像 1.png
If e.DataCol.Name = "交易日期" OrElse e.DataCol.Name = "股票代码" Then
If e.DataRow.IsNull("交易日期") OrElse e.DataRow.isnull("股票代码") Then
e.DataRow("交易码") = Nothing
Else
e.DataRow("交易码") = format(e.DataRow("交易日期"), "yyMMdd") & e.DataRow("股票代码")
End If
End If
-- 发布时间：2015/12/23 14:22:00
--
If e.DataCol.Name = "交易日期" OrElse e.DataCol.Name = "股票代码" OrElse e.DataCol.Name = "编号" Then
If e.DataRow.IsNull("交易日期") OrElse e.DataRow.isnull("股票代码") OrElse e.DataRow.IsNull("编号") Then
e.DataRow("交易码") = Nothing
Else
e.DataRow("交易码") = format(e.DataRow("交易日期"), "yyMMdd") & e.DataRow("股票代码") & e.DataRow("编号")
End If
End If
-- 发布时间：2015/12/24 9:19:00
--
此主题相关图片如下：狐表.png
老师，又要烦你了。
买入明细表：九阳股份买入数量100股、价格23.05元
我在卖出明细表输入九阳股份时在该表的买入价列中显示买入明细表保本价的金额。卖出量不能超出本批次买入量，价格计算也限定在本批次中。每次买入为一个批次每批次单独计算盈亏。买入明细编号的数据是否可以做批次号。老师谢谢你帮我。
-- 发布时间：2015/12/24 9:26:00
--
编号，直接用【买入明细编号】，两表做父子表关系。
父表加入，剩余数列，公式统计子表卖出数量，和买入数量相减
子表直接引用父表数据。
-- 发布时间：2015/12/24 9:27:00
--
控制卖出数量，就在datacolchanging事件，比较 最后仓储数。
-- 发布时间：2015/12/24 10:25:00
--
谢谢老师给我思路，不用关联表可以吗？我记得易表有这样的一个表。
[此贴子已经被作者于2015/12/24 10:31:05编辑过]
-- 发布时间：2015/12/24 10:35:00
--
那就跨表统计
http://www.foxtable.com/help/topics/1454.htm
-- 发布时间：2015/12/24 10:35:00
--
跨表引用
http://www.foxtable.com/help/topics/1451.htm
-- 发布时间：2015/12/24 14:29:00
--
Dim rk As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "买入价","卖出价","卖出数量"
rk("盈亏") =( rk("卖出价") - rk("买入价")) * rk("卖出数量")
Case "卖出价","卖出数量"
rk("卖出金额") = rk("卖出价") * rk("卖出数量")
End Select
老师，卖出金额列没有数据
-- 发布时间：2015/12/24 14:39:00
--
Dim rk As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "买入价"
rk("盈亏") =( rk("卖出价") - rk("买入价")) * rk("卖出数量")
Case "卖出价","卖出数量"
rk("盈亏") =( rk("卖出价") - rk("买入价")) * rk("卖出数量")
rk("卖出金额") = rk("卖出价") * rk("卖出数量")
End Select