以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  统计问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=193084)

--  作者:lin98
--  发布时间:2024/8/15 11:08:00
--  统计问题

图片点击可在新窗口打开查看此主题相关图片如下:月未统计.png
图片点击可在新窗口打开查看

Dim g As New SubtotalGroup \'
g.Aggregate = AggregateEnum.Sum 
\'
g.GroupOn = 
"产品" \'
g.TotalOn = 
"入库,出库" \'
g.Caption = 
"{0} 小计" \'
With
 Tables("订单")
    .SubtotalGroups.Clear() 

    .SubtotalGroups.Add(g) 
\'
   
 .Subtotal() \'
End 
With

1.如何实现表A的摘要列为“本月合计”?库存=入库(合计数)-出库(合计数)?
2.如何实现表A的摘要列为“本月合计”?库存为每种产品最后库存数?

--  作者:有点蓝
--  发布时间:2024/8/15 13:46:00
--  
1、g.Caption = "本月合计\'

2、要么遍历所有行,取最大日期值的数据。要么使用sql获取最大日期值的数据

--  作者:lin98
--  发布时间:2024/8/15 14:11:00
--  
2、要么遍历所有行,取最大日期值的数据。要么使用sql获取最大日期值的数据,
问题1:如何实现?

Dim g As New SubtotalGroup \'
g.Aggregate = AggregateEnum.Sum 
\'
g.GroupOn = 
"产品" \'
g.TotalOn = 
"入库,出库" \'

g.TotalOn = "库存=入库-出库" \'如果这样实现,就是简单很多,如何实现类似?
g.Caption = 
"{0} 小计" \'
With
 Tables("订单")
    .SubtotalGroups.Clear() 

    .SubtotalGroups.Add(g) 
\'
   
 .Subtotal() \'
End 
With

--  作者:有点蓝
--  发布时间:2024/8/15 14:27:00
--  
比如SqlServer,

select a.* from 订单  as a inner join (select 产品,max(日期) as 日期 from 表A group by 产品) as b on a.产品=b.产品 and a.日期=b.日期

mysql自己试试能不能用

--  作者:lin98
--  发布时间:2024/8/15 16:07:00
--  
With Tables("窗口_Table2") \'
    .Cols("数量").GrandTotal = True \'
    .Cols("金额").GrandTotal = True
    .GrandTotal = True \'
End With


上面执行,只有数据统计,没有显示“合计”标识
如何在指定列实现加上“合计”?

--  作者:有点蓝
--  发布时间:2024/8/15 16:33:00
--  
合计模式只能有一行,且是最后一行:http://www.foxtable.com/webhelp/topics/2750.htm