Epras汇总注意事项

Epras汇总注意事项

//1~34行的代码是建立一张综合汇总表的时候，通过点击Fx函数出来的代码模板。

经过测试发现以下代码好像有点问题。
1、依据经验29行代码应该是  test2[j,i] = x[i,j];
2、如果29行修改为上述的代码那么“初始化缓冲区”这段（14~22行）就不能要，否则就出现下标越界的错误
3、如果按照以下代码来写汇总表，程序能够正确运行，但是汇总表的数据就会错位。

第1行 main()
第2行   %unitscope={:};
第3行   //汇总表行数
第4行   var rowc = array(22);
第5行   //汇总表列数
第6行   var colc = array(22);
第7行   DoSummary
第8行     //关联基基表列表
第9行   To:
第10行   //汇总表
第11行     var test2= report "test2";
第12行     var x = null;
第13行   Begin
第14行     // 初始化缓冲区
第15行     if ( isnull(x) ) then
第16行     x = array( length(test2,1),length(test2,2) );
第17行       for I=1 to length(x,1) do
第18行         for j=1 to length(x,2) do
第19行           x[I,j] = 0;
第20行         endfor
第21行       endfor
第22行     endif
第23行     //行(列)条件
第24行     //执行灵活汇总计算
第25行   finally
第26行     if ( !isnull(x) ) then
第27行       for i=1 to length(x,1) do     //列
第28行         for j=1 to length(x,2) do   //行
第29行           test2[I,j] = x[i,j];
第30行         endfor
第31行       endfor
第32行     endif
第33行   end
第34行 end