以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  一个主表对应多个关联表 怎么设计excel模板?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=176413)

--  作者:cnsjroom
--  发布时间:2022/4/12 16:25:00
--  一个主表对应多个关联表 怎么设计excel模板?

一个主表对应多个关联表 怎么设计excel模板?


图片点击可在新窗口打开查看此主题相关图片如下:21.png
图片点击可在新窗口打开查看
填报人信息是主表 

填报人信息  收入情况  一个对应的填报人只有一条记录

亲属信息  房产  车辆  投资 是对应关联的表 且数据有多条

怎么才能在excel模板中对应生成表格呢?

 

按照如图设计,会提示:子细节区必须嵌套在父表细节区之内

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:财产收入情况申报表.xlsx

麻烦老师们帮我看看 要怎么才能解决呢?


--  作者:有点蓝
--  发布时间:2022/4/12 16:30:00
--  
其它表必须都是填报人信息的子表
--  作者:cnsjroom
--  发布时间:2022/4/12 17:05:00
--  回复:(有点蓝)其它表必须都是填报人信息的子表


图片点击可在新窗口打开查看此主题相关图片如下:22.png
图片点击可在新窗口打开查看
红色框的细节区没有内容显示

实际对应的表有数据的  怎么解决呢?


--  作者:有点蓝
--  发布时间:2022/4/12 17:12:00
--  
要看关联表有没有数据,而不是看子表有没有数据
--  作者:cnsjroom
--  发布时间:2022/4/12 18:02:00
--  回复:(有点蓝)要看关联表有没有数据,而不是看子表...

我没有加载表创建关联的方式  是直接用如下代码关联的   麻烦老师指导下  谢谢!

 

运行代码:

Functions.Execute("财产收入情况申报表","fb91f7ee-bbe6-4f38-84f8-ea8532abc636")

得到三楼图片结果   其中亲属明细 房产 车辆  股票明细都没有显示出来

 

财产收入情况申报表内部函数代码:

Dim tbn As String = args(0) \'表名传参

Dim Book As New XLS.Book(ProjectPath & "Attachments\\财产收入情况申报表.xlsx")
Dim fl As String = ProjectPath & "Reports\\财产收入情况申报表.xlsx"
book.AddDataTable("填报人信息","user","Se lect * from {填报人信息} where uuid= \'" & tbn & "\'") \'添加父表
book.AddDataTable("亲属信息","user","Sel ect * from {亲属信息} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("收入情况","user","Sele ct * from {收入情况} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("存款情况","user","Sel ect * from {存款情况} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("其他投资","user","Sel ect * from {其他投资} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("债务情况","user","Sel ect * from {债务情况} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("私人借款","user","Sel ect * from {私人借款} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("债权情况","user","Sele ct * from {债权情况} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("其他说明","user","Sel ect * from {其他说明} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("经商办企业情况","user","Sel ect * from {经商办企业情况} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("车辆情况","user","Sel ect * from {车辆情况} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("房产情况","user","Sele ct * from {房产情况} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("投资情况","user","Sele ct * from {投资情况} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("持有基金情况","user","Se lect * from {持有基金情况} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("持有期货","user","Sel ect * from {持有期货} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("持有其他投资","user","Sel ect * from {持有其他投资} where uuid= \'" & tbn & "\'") \'添加子表
book.AddDataTable("投资公司企业情况","user","Se lect * from {投资公司企业情况} where uuid= \'" & tbn & "\'") \'添加子表
book.AddRelation("填报人信息","uuid","亲属信息","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","收入情况","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","存款情况","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","债务情况","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","私人借款","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","债权情况","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","其他说明","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","经商办企业情况","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","车辆情况","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","房产情况","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","投资情况","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","持有基金情况","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","持有期货","uuid") \'建立关联
book.AddRelation("填报人信息","uuid","持有其他投资","uuid")
book.AddRelation("填报人信息","uuid","投资公司企业情况","uuid") \'建立关联
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()

 

 

 三个表都有数据  且uuid都是相等的


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

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

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

--  作者:有点蓝
--  发布时间:2022/4/12 20:16:00
--  
对应的表格是不是没有加载?

更新Foxtable到最新版

--  作者:cnsjroom
--  发布时间:2022/4/12 20:39:00
--  回复:(有点蓝)对应的表格是不是没有加载?更新Foxt...
是代码添加的关联
是不是也还需要加载对应的表数据到狐表才行?
加载了如楼上的图  结果也是没有完整显示明细…

--  作者:有点蓝
--  发布时间:2022/4/12 20:55:00
--  
如果不加载的,旧版有bug,更新到最新版。
--  作者:cnsjroom
--  发布时间:2022/4/13 9:15:00
--  回复:(有点蓝)如果不加载的,旧版有bug,更新到最新...

新版的试用版 也是一样的  没有对应生成数据  麻烦老师帮忙看看  谢谢!

 

在命令窗口中使用Functions.Execute("财产收入情况申报表","4326ab0d-bd81-4b5a-b45d-1ddfc84026d8")可生成excel表

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:申报表.zip


--  作者:有点蓝
--  发布时间:2022/4/13 9:54:00
--  
哪个表数据无法显示?

我测试【亲属信息】没有,但是打开数据库看,里面的2行记录uuid列完全就是空的,当然无法显示了,给uuid列赋值后,版本就正常了。其它表格我没看,自己检查一下