报表单元格的合并(续)

0 篇文章 0 订阅
        续接上文。仔细想了想报表单元格的合并。我发现上次的那种合并单元格的写法,是不支持分页查询的。可当报表数据量足够大的时候,分页查询又是难以避免的。

所以我不得不做出一些改变来适应。


        首先修改查询语句如下:


<pre class="sql" name="code">select (case when t.yj_id is not null then (select  f.title_name  from report_table f where f.yj_id = t.yj_id and f.ej_id is null and f.sj_id is null) end) as yj,
       (case when t.ej_id is not null then (select  f.title_name  from report_table f where f.ej_id = t.ej_id and f.sj_id is null) end) as ej,
       (case when t.sj_id is not null then t.title_name end) as sj from report_table t

 

      查出来的数据形式如图一。

图一

      

      浏览器显示的样式如图二。

图二

     

     这个时候采用如下代码合并单元格则可以实现分页效果。而且就算法的优劣而言,这个算法要比之前的那个要合算许多。

var ie = document.all?true:false;//判断当前浏览器是不是ie  

var firstStartLoc = [];  
var fisrtEndLoc = [];  
  
var secondStartLoc = [];  
var secondEndLoc = [];  
  
//找到第一列每个单元格所要纵向合并的开始位置和结束位置  
function findLoc(flag,startLoc,endLoc){  
    var table = document.getElementById("dataTable");  
    if(table.rows.length > 0){  
        for(var i = 0;i < table.rows.length;i++){
        	for(var j = table.rows.length-1;j >= i;j--){
        		if(table.rows[i].cells[flag].innerText != ""){
	        		if(table.rows[i].cells[flag].innerText == table.rows[j].cells[flag].innerText){
	        			startLoc.push(i);
	        			endLoc.push(j);
	        			i = j;
	        			break;	
	        		}
        		}else{
        			break;
        		}
        	}
        }
    }
} 

//合并单元格的方法  
function hbCell(flag,startLoc,endLoc){  
    var table = document.getElementById("dataTable");  
    if(startLoc.length > 0){  
        for(var i = 0;i < startLoc.length;i++){  
            if(startLoc.length > 1){  
                for(var j = startLoc[i] + 1;j <= endLoc[i];j++){  
                    if(ie){  
                        table.rows[j].cells[flag].removeNode(true);  
                    }else{  
                        table.rows[j].cells[flag].remove();  
                    }  
                }  
                table.rows[startLoc[i]].cells[flag].setAttribute("rowspan",endLoc[i]-startLoc[i]+1);  
            }  
        }  
    }  
}  
//添加小计的方法  
function addXj(){  
    var table = document.getElementById("dataTable");  
    if(secondStartLoc.length > 0){  
        for(var i = 0;i < secondStartLoc.length;i++){  
            table.rows[secondStartLoc[i]].cells[1].innerHTML = table.rows[secondStartLoc[i]].cells[0].innerHTML+"小计";  
        }  
    }  
    if(firstStartLoc.length > 0){  
        for(var i = 0;i < firstStartLoc.length;i++){  
            if(ie){  
                table.rows[firstStartLoc[i]].cells[2].removeNode(true);  
            }else{  
                table.rows[firstStartLoc[i]].cells[2].remove();  
            }  
            table.rows[firstStartLoc[i]].cells[1].setAttribute("colspan",2);  
            table.rows[firstStartLoc[i]].cells[1].innerHTML = table.rows[firstStartLoc[i]].cells[0].innerHTML+"小计";  
        }  
    }  
}  

window.onload = function(){  
    findLoc(0,firstStartLoc,fisrtEndLoc);
    findLoc(1,secondStartLoc,secondEndLoc);
    hbCell(1,secondStartLoc,secondEndLoc); 
    hbCell(0,firstStartLoc,fisrtEndLoc); 
    addXj(); 
}   	


       

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
:首先是要分组,因为如果不分组,想合并的列与其它列会自动打印。这样,只能使用FR自带的隐藏重复数据的功能,但很多类似报表都是要求合并行居中的,这点FR就不能自动实现了。 2:要全并的列放在分组脚中,其它放在分组数据BAND中,这样,打印完分组数据BAND后,动态改变分组脚中要合并列的TOP和HEIGHT就可以了。而且这样打印,因为要合并的行实际上只打印了一遍,因此应该效率更高。所以这就需要在打印分组数据BAND后有一个可记录此分组已打印高度的功能。 3:代码解释 procedure MCOnAfterData(Sender: TfrxComponent); begin if =1 then MC.Tag:=Int(MC.Height) else MC.Tag:=MC.Tag+Int(MC.Height); end; 因为FR的在每次分组后重新计数,使用MC.Tag保存现在数据BAND上的所有不合并行的总高度。当然也可以使用一个变量,但放着这么多TAG不用,多浪费呀。况且使用TAG的语法也比使用变量简单,使用变量使程序看上去很难懂。 if >=1 then 这样的写法看起来多痛苦呀。 procedure MBBOnAfterData(Sender: TfrxComponent); begin MBB.Tag:=GetStandHeight(MBB.CalcHeight); //这一句是为了保持行高的一致性,如果不需要直接 MBB.Tag:=MBB.CalcHeight; //这样可能计算的行高不是标准行高的整数倍。 MBB.Visible:=False; end; procedure MD1OnBeforePrint(Sender: TfrxComponent); begin if =1 then MBB.Visible:=True; end; 上二句只是为了不多次统计CalcHeight,但不能直接设可视性为假,否则不会触发MBBOnAfterData事件。 计算此例中可能会很高的列的计算高度,这是在宽度已经确定的情况下计算的。 因为此例中的第二列单行高度可能大于其它列的总高度。如果没有此例中的特殊情况,可以省略。 4:如果此例中没有第二列单行高度可能大于其它列的总高度的话,MBB是不需要的。 5:如果不是要求空行为多行多列显示的话,GFOnBeforePrint也是不需要的,只需要在GF上放二个MEMOVIEW,宽高和左边距分别与上方的二个相同,调用我例子中注释掉的代码改变它们的TOP和HEIGHT即可。 6:TAG是所有Tcomponent的属性呀,这是我最常使用的一个属性。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值