当前位置: 首页 > 图文教程 > 网络编程 > ASP > 水晶报表打印单据时增加空行或空白行的示例脚本

ASP
网络寻呼机数据库版删除选中的消息deletemessage.asp
网络寻呼机数据库版隐藏文件watch.asp
网络寻呼机数据库版总结
一种在线人数统计方法(只用1个APPLICATION)
用ASP.NET构建完整E-mail发送系统
用ASP.NET建立简单的Web Form
为你的ASP程序制作一个编译组件(上)
为你的ASP程序制作一个编译组件(中)
为你的ASP程序制作一个编译组件(下)
利用ASP将HTML格式数据传输给Excel(1)
利用ASP将HTML格式数据传输给Excel(2)
利用ASP将HTML格式数据传输给Excel(3)
利用ASP将HTML格式数据传输给Excel(4)
磁盘ID在ASP源码防拷贝中的应用
WEB环境下打印报表的crystal的解决方案
如何把存储在数据库中的图片根据自己的需要的大小显示出来
客户端用ASP+rds+VBA参生报表
利用ASP.NET设计FTP文件上传(上)
利用ASP.NET设计FTP文件上传(中)
利用ASP.NET设计FTP文件上传(下)

ASP 中的 水晶报表打印单据时增加空行或空白行的示例脚本


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 118 ::
收藏到网摘: n/a

 

假设我们的单据每张共打印五行,则最多会增加空白行4行,
在重复出现的表体中定义四个空白节。
我们首要的任务是根据记录数来确定这四个节什么时候显示,什么时候不显示。
我们定义的节的抑制显示脚本为:
节1,只有当记录数等于1时才需要显示第一个空白节。
if onlastrecord=false then
    FORMULA = TRUE
else

if (COUNT({销售单表体.商品代码}) mod 5 > 1) then
    FORMULA = TRUE
else
    if (COUNT({销售单表体.商品代码}) mod 5 = 0) then
     FORMULA = TRUE
    else   
    FORMULA = FALSE
end if
end if
end if

节2,只有当记录数等于1或等于2时才需要显示第二个空白节。
if onlastrecord=false then
    FORMULA = TRUE
else
if (COUNT({销售单表体.商品代码}) mod 5 > 2) then
    FORMULA = TRUE
else
    if (COUNT({销售单表体.商品代码}) mod 5 = 0) then
     FORMULA = TRUE
    else   
    FORMULA = FALSE
end if
end if
end if

其它两个节,以此类推是很简单的。
注意的是分界条件是 完全求模后 返回 0 和记录数本身就为零的情况的处理。