JasperReport报表开发之转置交叉表

使用Jasper或BIRT等报表工具时，常会碰到一些非常规的统计，用报表工具本身或SQL都难以处理，比如源数据不符合交叉表的要求，需要转置后再呈现。集算器具有结构化强计算引擎，集成简单，可以协助报表工具方便地实现此类需求。下面通过一个例子来说明转置交叉表的实现过程。

数据库表booking汇总着各年度商品的预定数据，有四个字段，包括年份和三种预定状态，部分数据如下：

报表要求呈现指定年份及上一年的预定情况，其中行组有三项，即三种预定状态，列组是年份，测度是当年的预定数据。此外要汇总出指定年份各预定状态的增长率。表样如下：

可以看到，这张报表的难点是：源数据无法直接用于交叉表，汇总列要用相对位置来动态计算。如果能将源数据转置，并将汇总列事先计算出来，则会显著降低难度，比如下面这样：

下面用集算器准备报表所需的数据，代码如下：

A1=yearBegin=yearEnd-1

yearEnd是来自报表的参数，表示用户指定的年份，比如2014。A1中的代码用来计算上一年（比如2013），为了方便引用，上一年定义为yearBegin。

A2=myDB1.query(“select * from booking where year between ? and ? order by year desc”,yearBegin,yearEnd)

这句代码用来从数据库查出指定年份及上一年的数据。myDB1是数据源名，指向MYSQL。函数query可执行SQL语句，也可以接受参数。假设yearEnd=2014，则A2的计算如下：

A3=create(row,col,value)

这句代码用来新建序表A3。A3有三个字段：row、col、value，将来可存储整理之后的数据。新建后的A3如下：

需要注意的是，序表类似数据库结果集，也是结构化二维表，但序表是泛型的，同一个字段可以存储不同的数据类型，序表也是有序的，可以按序号访问数据。利用序表的这些特点可以方便地实现本案例。

A4: for ["visits","bookings","successfulbookings"]

这句代码对集合["visits","bookings","successfulbookings"]进行循环访问，在循环中向A3追加数据，最终准备出报表需要的数据。for语句的作用范围是B4-C7，用自然的缩进就可以表示，无需括号或begin/end等标记。在作用范围里可以用A4来引用循环变量，即for语句所在单元格的格名。比如进行第一遍循环时，A4的值等于”visits”。

下面看循环体中的代码。

B4=endValue=eval(“A2(1).”+A4)

这句代码可从A2动态地取出第一条记录的预定状态数据。函数eval可将字符串解析为表达式，比如第一遍循环时，“A2(1).”+A4会被解析为A2(1).visits，计算结果是500。其中“A2(1)”表示第一条记录，“.visits”表示取出该记录的visits字段，即下图红框处：