共10 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：窗口表筛选
1楼
g1j2h3 发表于：2025/1/12 9:22:001、窗口表绑定的是normal型订单表正本，订单表中有个“是否完成”逻辑列，如何把订单表整表中未完成的行筛选出来并显示在窗口表，目前是用
table(“订单表”).filter="是否完成=false"只能筛选出当前页面的数据，窗口表是分面加载的
2、根据交叉统计表中的垂直分组（如：日期）形成筛选树，怎么弄
[此贴子已经被作者于2025/1/12 18:53:54编辑过]
2楼
有点蓝 发表于：2025/1/12 20:26:001、改为加载
datatable(“订单表”).loadfilter="是否完成=false"
datatable(“订单表”).loadtop = nothingdatatable(“订单表”).load
3楼
g1j2h3 发表于：2025/1/12 20:46:00麻烦大师看一下代码错在哪
4楼
g1j2h3 发表于：2025/1/12 20:54:001、改为加载
datatable(“订单表”).loadfilter="是否完成=false"
datatable(“订单表”).loadtop = nothing
datatable(“订单表”).load
这段代码写在哪里
[此贴子已经被作者于2025/1/12 21:02:14编辑过]
5楼
有点蓝 发表于：2025/1/12 20:57:00替换1楼的table(“订单表”).filter="是否完成=false"
6楼
有点蓝 发表于：2025/1/12 21:03:00列是无法做筛选的，3楼这种只能是把条件合并到sql里，然后按日期重新统计一次
节点代码：
Dim Filter As String = ""
If e.node.Name <> "显示所有行" Then '要用Name属性,不能用Text属性
Dim d1 As Date
Dim d2 As Date
Dim Year As Integer = e.Node.DataRow("年")
Dim Month As Integer = e.Node.DataRow("月")
Select Case e.Node.Level
Case 0
d1 = New Date(Year, 1, 1) '取得该年的第一天
d2 = New Date(Year, 12, 31) '取得该年的最后一天
Filter = "日期 >= #" & d1 & "# And 日期 <= #" & d2 & "#"
Case 1
d1 = New Date(Year, Month, 1) '取得该月的第一天
d2 = New Date(Year, Month, Date.DaysInMonth(Year, Month)) '取得该月的最后一天
Filter = "日期 >= #" & d1 & "# And 日期 <= #" & d2 & "#"
End Select
End If
Dim sql As String = "select * from (select 入库日期 As 日期,类别,库存编码,产品名称,规格,单位,商标,备注,入库数量,0 as 出库数量 from 入库明细 union select 出库日期 As 日期,类别,库存编码,产品名称,规格,单位,商标,备注,0 as 入库数量,出库数量 from 出库明细 ) as a where " & Filter
Dim bd1 As New CrossTableBuilder("统计表1", sql, "Sale")
Dim dt1 As fxDataSource
bd1.HGroups.AddDef("类别")
bd1.HGroups.AddDef("库存编码")
……后面补齐所有统计的代码按指定的日期重新统计
7楼
g1j2h3 发表于：2025/1/12 21:06:00谢谢大师，我试试
8楼
g1j2h3 发表于：2025/1/12 21:42:00麻烦老师再帮我看下4楼的问题
9楼
有点蓝 发表于：2025/1/12 21:44:00很简单的问题，你的手误导致我照抄的代码出错
datatables(“订单表”)
10楼
g1j2h3 发表于：2025/1/12 21:46:00不好意思，谢谢老师，这么晚还支持
共10 条记录, 每页显示 10 条, 页签:
[1]