天天看点

双区间交叉报表的制作

  使用Jasper或BIRT等报表工具时,常会碰到一些非常规的统计,用报表工具本身或SQL都难以处理,比如交叉表的行组和列组都是分段区间,测度(measurem)来自其他数据库表。集算器具有结构化强计算引擎,集成简单,可以协助报表工具方便地实现此类需求。下面通过一个例子来说明双区间交叉表的实现过程。

  表account_detail的主键为account_no,与表Paysoft_result和NAEDO都是1对多关系。Paysoft_result的外键是custno,NAEDO的外键是customer_code。报表要求将account_detail的字段empirica_score按照外部参数分段,作为行组,字段mfin_score同样按照外部参数分段,作为列组。测度的算法是:分组交叉处account_no对应的Paysoft_result表的记录数除以account_no对应的NAEDO表的记录数。

  下图是库表间关系,以及字段和报表的关系:

双区间交叉报表的制作

  先用集算器准备数据,代码如下:

双区间交叉报表的制作

   A1=myDB1.query(“select * from account_detail order by empirica_score,mfin_score”)

   上述代码可以从account_detail表取出数据。myDB1是数据源的名字,指向数据库。函数query执行SQL查询。A1的计算结果如下:

双区间交叉报表的制作

   A2=myDB1.query(“select * from paysoft_result”)

   B2=myDB1.query(“select * from NAEDO”)

   类似地,A2和B2分别从paysoft_result表和NAEDO表取出数据,结果如下:

双区间交叉报表的制作

  A3=rowList.array()

  B3=colList.array()

  这两句代码将来自报表的参数转为集算器序列。参数rowList表示行组,比如”560,575,585,595,605,615,625,635,645,654,665”是10个连续区间,参数colList表示列组,比如“39,66,91,116,137,155”是5个连续区间。函数array可将逗号分割的字符串转为序列,转换结果如下:

双区间交叉报表的制作

  A4=A1.select(empirica_score>=A3(1) && mfin_score>=B3(1))

  本案例的数据超出了区间范围,比如“No501”号客户的empirica_sore等于540,比区间下限560还要小。为了提高性能并简化表达式,可以在A4中过滤掉小于区间下限的数据。

  函数select可以进行数据查询或过滤,empirica_score是A1中的字段,A3(1)表示A3的第1个成员,即区间下限560,逻辑运算符“&&”表示“与”。A4的计算结果如下:

双区间交叉报表的制作

  A5=A4.group(A3.pselect(empirica_score<~[1]):row,

    B3.pselect(mfin_score<~[1]):col;~:accounts,

    A2.select(accounts.(account_no).pselect(~==custno)):p,

    B2.select(accounts.(account_no).pselect(~==customer_code)):n

    )    

  这句代码对A4(account_detail)按照A3(rowList)和B3(colList)中的区间进行分组,并找出各组数据在A2(paysoft_result)和B2(NAEDO)中对应的记录。

  函数group可对数据按照多个字段(或分组标准)进行分组,形如A.group(field1,field2…),也可对分组后的每组数据进行统计或再计算,形如A.group(field1,field2… ; subtotal1,subtotal2…)。分组后各字段可用“:new name”进行重命名,上述分组结果就有5个字段,分别为row,col,accounts,p,n。结果如下:

双区间交叉报表的制作

  分组标准row的算法:对A4中的empirica_score字段按照A3中的区间进行分组,代码为:A3.pselect(empirica_score<~[1])。函数pselect可以选出A3中符合条件的成员序号,其中符号“~”表示A3的当前成员,上一个成员用~[-1]来表示,下一个成员用~[1]来表示。当前区间应当是(empirica_score>=~ && empirica_score<~[1]),由于A4已经在区间下限之上,因此表达式可以简化为empirica_score<~[1]。比如”560,575,585,595,605,615,625,635,645,654,665”可以将A1分到10个区间:560-574,575-584,585-594,595-604,605-614,615-624,625-634,635-644,645-654,655-664,组号分别是1到10。

  分组标准col的算法类似:对A4中的mfin_score字段按照B3中的区间进行分组,代码为B3.pselect(mfin_score<~[1])。比如“39,66,91,116,137,155”可将A1分到5个区间:39-65,66-90,91-115,116-136,137-154,组号分别是1到5。

  汇总字段account直接取出分组后的各组数据,其中~表示当前组的成员。点击accounts列的蓝色字体可以看到组内成员,其中“row=1,col=1”表示双区间“560-574,39-65”,“row=2,col=5”表示双区间“575-584,137-154”,如下图:

双区间交叉报表的制作

  汇总字段P的算法:从A2中找出accounts里对应的记录,代码为:A2.select(accounts.(account_no).pselect(~==custno))。函数select可以按照条件对A2进行查询,找到符合条件的记录。其中“row=1,col=1”、“row=2,col=5”时p列对应的记录如下(accounts和A2是1对多的关系):

双区间交叉报表的制作

  汇总字段n的算法类似:从B2中找出accounts里对应的记录,代码为:B2.select(accounts.(account_no).pselect(~==customer_code))。其中“row=1,col=1”、“row=2,col=5”时n列对应的记录如下:

双区间交叉报表的制作

  A6=A5.derive(p.count():pCount,n.count():nCount)

  这句代码在A5中增加新列pCount,nCount,用来计算每组数据中p和n的记录数,计算结果如下:

双区间交叉报表的制作

  A7=A6.derive(pCount/nCount:rate)

  这句代码在A6中增加新列rate,算法是pCount除以nCount,计算结果如下:

双区间交叉报表的制作

  A8=A7.run(string(A3(row))+”-”+string(A3(row+1)-1):row,string(B3(col))+”-”+string(B3(col+1)-1):col)

  这句代码将row和col中的组号反显为区间,函数run表示对A6中的每个成员(比如row=1,col1=1这一行就是一个成员)进行相同的计算。函数string可将数字转为字符串。表达式“A3()”可以根据序号从A3中取出成员,比如A3(1)等于560。A7的计算结果如下:

双区间交叉报表的制作

  A8中已经包含了报表需要的三个字段,下面只需将row、col、rate组成新的二维表,并通过JDBC接口返回报表工具,即A9中的代码: result A8.new(row,col,rate)。

   函数new可以从A8取出指定的列或计算列,并组成新的二维表,A8.new(row,col,rate)的计算结果如下:

双区间交叉报表的制作

  值得注意的是:集算器具有括号运算符,可以对逗号分隔的表达式依次计算,并返回最后一个表达式的值。利用括号运算符,可以将A4-A7精简为一句代码:

    A4=A1.select(empirica_score>=A3(1) && mfin_score>=B3(1)).group(

             A3.pselect(empirica_score<~[1]):row,

             B3.pselect(mfin_score<~[1]):col;

             (accounts=~,A2.count(accounts.(account_no).pselect(~==custno)) /

           B2.count(accounts.(account_no).pselect(~==customer_code))):rate

    )

  计算结果如下:

双区间交叉报表的制作

  A9就是报表工具需要的数据集,接下来以JasperReport为例设计简单的交叉表,模板如下:

双区间交叉报表的制作

  有三点需要注意:交叉表不能放在detail band中,Data Pre Sorted属性需要设置为true,在报表中需要定义集算器对应的参数,比如pRowList,pColList。报表预览如下:

双区间交叉报表的制作

  报表调用集算器的方法和调用存储过程一样,比如将本脚本保存为unregul.dfx,则在的JasperReport的SQL设计器中可以用unregul $P{pRowList},$P{pColList}来调用。具体集成方案请参考相关文档。

继续阅读