function controlTsrBody(tsrBodyDivId,status){
	var body="";var bodyClose="";var bodyOpen="";
	if(document.getElementById){
		body=document.getElementById(tsrBodyDivId);
		bodyOpen=document.getElementById(tsrBodyDivId+'_open_ctrl');
		bodyClose=document.getElementById(tsrBodyDivId+'_close_ctrl');
		}
	else if(document.all){
		body=document.all[tsrBodyDivId];
		bodyOpen=document.all[tsrBodyDivId+'_open_ctrl'];
		bodyClose=document.all[tsrBodyDivId+'_close_ctrl'];
	}
	if(body==null||bodyOpen==null||bodyClose==null){return;}
	if(status=="open"){
		body.style.display="block";bodyClose.style.display="block";bodyOpen.style.display="none";
	}
	else if(status=="close"){
		body.style.display="none";
		bodyClose.style.display="none";
		bodyOpen.style.display="block";
	}
}

function expandAll(group){
	var layer;
	cnt=1;
	while(layer=document.getElementById(group+'_pr'+cnt)){controlTsrBody(group+'_pr'+cnt,'open');cnt++;}
	cnt=1;
	while(layer=document.getElementById(group+'_rc'+cnt)){controlTsrBody(group+'_rc'+cnt,'open');cnt++;}
	cnt=1;	
	while(layer=document.getElementById(group+'_pd'+cnt)){controlTsrBody(group+'_pd'+cnt,'open');cnt++;}	
	cnt=1;
	while(layer=document.getElementById(group+'_ph'+cnt)){controlTsrBody(group+'_ph'+cnt,'open');cnt++;}
	cnt=1;
	while(layer=document.getElementById(group+'_v'+cnt)){controlTsrBody(group+'_v'+cnt,'open');cnt++;}		
	cnt=1;	
	while(layer=document.getElementById(group+'_tec'+cnt)){controlTsrBody(group+'_tec'+cnt,'open');cnt++;}	
	layer=document.getElementById(group+'_a1');
	controlTsrBody(group+'_a1','open');
	layer=document.getElementById(group+'_t1');
	controlTsrBody(group+'_t1','open');
	cnt=20;
	while(layer=document.getElementById(group+'_fgm'+cnt)){controlTsrBody(group+'_fgm'+cnt,'open');cnt++;}		
}

function collapseAll(group){
	var layer;
	cnt=1;
	while(layer=document.getElementById(group+'_pr'+cnt)){controlTsrBody(group+'_pr'+cnt,'close');cnt++;}
	cnt=1;
	while(layer=document.getElementById(group+'_rc'+cnt)){controlTsrBody(group+'_rc'+cnt,'close');cnt++;}
	cnt=1;	
	while(layer=document.getElementById(group+'_pd'+cnt)){controlTsrBody(group+'_pd'+cnt,'close');cnt++;}
	cnt=1;
	while(layer=document.getElementById(group+'_ph'+cnt)){controlTsrBody(group+'_ph'+cnt,'close');cnt++;}	
	cnt=1;
	while(layer=document.getElementById(group+'_v'+cnt)){controlTsrBody(group+'_v'+cnt,'close');cnt++;}
	cnt=1;
	while(layer=document.getElementById(group+'_tec'+cnt)){controlTsrBody(group+'_tec'+cnt,'close');cnt++;}		
	layer=document.getElementById(group+'_a1');
	controlTsrBody(group+'_a1','close');
	layer=document.getElementById(group+'_t1');
	controlTsrBody(group+'_t1','close');
	cnt=20;
	while(layer=document.getElementById(group+'_fgm'+cnt)){controlTsrBody(group+'_fgm'+cnt,'close');cnt++;}		
}