--- loncom/interface/spreadsheet/classcalc.pm 2003/06/23 16:06:11 1.9 +++ loncom/interface/spreadsheet/classcalc.pm 2003/06/23 19:58:18 1.10 @@ -1,5 +1,5 @@ # -# $Id: classcalc.pm,v 1.9 2003/06/23 16:06:11 matthew Exp $ +# $Id: classcalc.pm,v 1.10 2003/06/23 19:58:18 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -112,6 +112,8 @@ sub outsheet_html { ################################### # Determine table structure ################################### + my $importcolor = '#88FF88'; + my $exportcolor = '#BBBBFF'; my $num_uneditable = 26; my $num_left = 52-$num_uneditable; my $tableheader =<<"END"; @@ -119,7 +121,7 @@ sub outsheet_html { - @@ -128,7 +130,7 @@ END my $label_num = 0; foreach (split(//,'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz')){ if ($label_num<$num_uneditable) { - $tableheader.=''. - $self->html_template_row($num_uneditable)."\n"); + $self->html_template_row($num_uneditable,$importcolor). + "\n"); # # Print out summary/export row $r->print(''. - $self->html_export_row()."\n"); + $self->html_export_row($exportcolor)."\n"); # # Prepare to output rows $tableheader =<<"END"; @@ -157,7 +160,7 @@ END END foreach (split(//,'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz')){ if ($label_num<$num_uneditable) { - $tableheader.=''. ''. ''. - $self->html_row($num_uneditable,$rownum)."\n"); + $self->html_row($num_uneditable,$rownum,$exportcolor, + $importcolor). + "\n"); } $r->print("
Course + Import Calculations'; + $tableheader.=''; } else { $tableheader.=''; } @@ -141,11 +143,12 @@ END # # Print out template row $r->print('
Template 
Summary0
'; + $tableheader.=''; } else { $tableheader.=''; } @@ -180,7 +183,9 @@ END ''.$student->{'domain'} .''.$student->{'section'} .''.$student->{'status'} .'

\n"); return;