loncom/interface/spreadsheet/assesscalc.pm - diff

Return to assesscalc.pm CVS log

Up to [LON-CAPA] / loncom / interface / spreadsheet

version 1.59, 2012/10/12 13:56:38	version 1.60, 2014/02/11 19:11:30
Line 488 END	Line 488 END
$r->print($tableheader);	$r->print($tableheader);
#	#
# Print out template row	# Print out template row
$r->print('<tr><td>Template</td><td> </td>'.	$r->print('<tr><td>'.&mt('Template').'</td><td> </td>'.
$self->html_template_row($num_uneditable,$importcolor).	$self->html_template_row($num_uneditable,$importcolor).
"</tr>\n");	"</tr>\n");
#	#
# Print out summary/export row	# Print out summary/export row
$r->print('<tr><td>Export</td><td>0</td>'.	$r->print('<tr><td>'.&mt('Export').'</td><td>0</td>'.
$self->html_export_row($exportcolor)."</tr>\n");	$self->html_export_row($exportcolor)."</tr>\n");
#	#
# Prepare to output rows	# Prepare to output rows
$tableheader =<<"END";	$tableheader =
<table border="2">	'<table border="2">'.
<tr><th>row</th><th>Item</th>	'<tr><th>'.&mt('Row').'</th>'.
END	'<th>'.&mt('Item').'</th>';
foreach (split(//,'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz')){	foreach (split(//,'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz')){
if ($label_num<$num_uneditable) {	if ($label_num<$num_uneditable) {
$tableheader.='<th bgcolor="'.$importcolor.'">';	$tableheader.='<th bgcolor="'.$importcolor.'">';