水晶报表分页汇总
建三个公式字段,第一个(公式1)输入下面的公式:
whileprintingrecords;
global numbervar ptotal;
ptotal:=0;
第二个(公式2)输入下面的公式:
whileprintingrecords;
global numbervar ptotal;
ptotal := ptotal + [要汇总的字段];
如果要汇总的字段不是数字,就用tonumber()函数转换;
第三个(公式3)输入下面的公式:
whileprintingrecords;
global numbervar ptotal;
把公式1放在页眉,公式2放在详细资料,并隐藏公式1和公式2;把公式3放在页脚,格式公式3,设置为你要显示的格式。这样就行了。
水晶报表分页并自动插入空白行
在论坛上经常会看到水晶报表分页的问题,这个很好解决。
但是自动插入空白行的问题却一直没有很好的答案,
经过研究找到一个变通的办法来实现了。
'分页
在详细资料上点格式化节,在后面页新建页打勾
公式中输入:
if onlastrecord then
FORMULA = FALSE
else
if RecordNumber mod 5 =0 then
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 语法)
---------------------------------------------------------------------
最后页不足,用空行填充:
新增一个空白详细资料行,格式化此节,在抑制显示(无深化)打勾
公式中输入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 1) then '第一个,1
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 语法)
...接着第二个[ 新增一个空白详细资料行,格式化此节,在抑制显示(无深化)打勾 ]:
公式中输入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 2) then '第二个,2
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
...接着第三个[ 新增一个空白详细资料行,格式化此节,在抑制显示(无深化)打勾 ]:
公式中输入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 3) then '第三个,3
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
在论坛上经常会看到水晶报表分页的问题,这个很好解决。
但是自动插入空白行的问题却一直没有很好的答案,
经过研究找到一个变通的办法来实现了。
'分页
在详细资料上点格式化节,在后面页新建页打勾
公式中输入:
if onlastrecord then
FORMULA = FALSE
else
if RecordNumber mod 5 =0 then
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 语法)
---------------------------------------------------------------------
最后页不足,用空行填充:
新增一个空白详细资料行,格式化此节,在抑制显示(无深化)打勾
公式中输入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 1) then '第一个,1
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 语法)
...接着第二个[ 新增一个空白详细资料行,格式化此节,在抑制显示(无深化)打勾 ]:
公式中输入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 2) then '第二个,2
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
...接着第三个[ 新增一个空白详细资料行,格式化此节,在抑制显示(无深化)打勾 ]:
公式中输入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 3) then '第三个,3
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
...(同理第四个,即最后5-1个)
(注:此方法适用于行数较少,上面是为5行为例,不过不觉得麻烦,对行数较多也可以用)...(同理第四个,即最后5-1个)
水晶报表 分页 的问题
2020-07-12 17:35编程技术网 编程技术
在论坛上经常会看到水晶报表分页的问题,这个很好解决。但是自动插入空白行的问题却一直没有很好的答案,经过研究找到一个变通的办法来实现了。
延伸 · 阅读
- 2022-03-08SpringBoot+Mybatis分页插件PageHelper实现分页效果
- 2022-02-28解析iReport自定义行数分页的操作方法
- 2022-02-23Android RecyclerView的刷新分页的实现
- 2022-02-23Django前端BootCSS实现分页的方法
- 2022-02-20vue项目实现分页效果
- 2022-02-13SQL实现分页查询方法总结
- 编程技术
面试官:说说你对堆的理解?如何实现?应用场景?
在计算机科学中,图是一种抽象的数据类型,在图中的数据元素通常称为结点,V是所有顶点的集合,E是所有边的集合。...
- 编程技术
Python“王者”地位不保!Julia和Swift后来居上
在过去的十年里,Python 一直统治着数据科学和机器学习,但是 Julia 和 Swift 后来居上,正准备超越Python。...
- 编程技术
IT工程师都需要掌握的容器技术之DockerCompose
今天我们继续来学习Docker技术之Docker Compose,本篇文章将是我们容器技术系列的最后一篇文章,读过我们容器技术全系列文章的小伙伴肯定有疑问,整个系...
- 编程技术
TIOBE4月编程语言排行榜出炉!涨幅最大的语言竟然是它?
TIOBE 近日发布的4 月编程语言排行榜。前十榜单中,C、Java、Python 仍分别占据前三位。涨幅最大的语言是Python。...
- 编程技术
如何成为专业的恶意软件研究员
当今社会,不管任何一门技术,或者你从事任何一种职业,都需要掌握相关的知识,现代的技术其实就是以前称的“手艺”,大多数的手艺的学习和入门其...
- 编程技术
解决Fiddler在win7系统下的安全证书问题
今天小编就为大家分享一篇关于解决Fiddler在win7系统下的安全证书问题,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起...
- 编程技术
在地址栏里显示logo的实现方法
在地址栏里显示logo,其实大家可以看一些网站的头部里面,下面的方法讲的更仔细。...
- 编程技术
拿高薪的程序员,都学习了什么编程语言?
人的一生从来不是从出生那一刻就注定的,总是会因为我们的选择不断的发生改变,小到一件衣服的色彩,大到未来人生的规划!选错一件衣服可以重来,...