[LON-CAPA-cvs] cvs: loncom /interface/statistics lonstudentassessment.pm

[matthew]

matthew		Fri Dec 10 11:52:53 2004 EDT

  Modified files:              
    /loncom/interface/statistics	lonstudentassessment.pm 
  Log:
  Excel output: now use the proper formula for computation of the maximum 
  points per student instead of using the same formula over and over.
  
  
Index: loncom/interface/statistics/lonstudentassessment.pm
diff -u loncom/interface/statistics/lonstudentassessment.pm:1.106 loncom/interface/statistics/lonstudentassessment.pm:1.107
--- loncom/interface/statistics/lonstudentassessment.pm:1.106	Tue Dec  7 10:48:29 2004
+++ loncom/interface/statistics/lonstudentassessment.pm	Fri Dec 10 11:52:53 2004
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstudentassessment.pm,v 1.106 2004/12/07 15:48:29 matthew Exp $
+# $Id: lonstudentassessment.pm,v 1.107 2004/12/10 16:52:53 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1219,7 +1219,7 @@
         if ($chosen_output->{'grand_maximum'}) {
             $excel_sheet->repeat_formula($maximum_data_row,$cols_output++,
                                          $maximum_formula,undef,
-                                         %total_cell_translation);
+                                         %maximum_cell_translation);
         }
     } # End of MAXIMUM row output  if ($chosen_output->{'maximum_row'}) {
     $rows_output = $first_data_row;
@@ -1334,6 +1334,10 @@
         $total_cell_translation{$seq->{'Excel:scorecell'}} = 
             &Spreadsheet::WriteExcel::Utility::xl_rowcol_to_cell
                         ($rows_output,$seq->{'Excel:scorecol'});
+        # and maximum cell
+        $maximum_cell_translation{$seq->{'Excel:maxcell'}} = 
+            &Spreadsheet::WriteExcel::Utility::xl_rowcol_to_cell
+            ($rows_output,$seq->{'Excel:maxcol'});
         #
         my ($performance,$performance_length,$score,$seq_max,$rawdata);
         if ($chosen_output->{'tries'} || $chosen_output->{'correct'}){
@@ -1404,7 +1408,7 @@
     if ($chosen_output->{'grand_maximum'}) {
         $excel_sheet->repeat_formula($rows_output,$cols_output++,
                                      $maximum_formula,undef,
-                                     %total_cell_translation);
+                                     %maximum_cell_translation);
     }
     #
     # Bookkeeping