--- loncom/interface/statistics/lonstudentassessment.pm	2004/12/07 15:48:29	1.106
+++ loncom/interface/statistics/lonstudentassessment.pm	2005/01/05 20:01:46	1.108
@@ -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.108 2005/01/05 20:01:46 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -357,6 +357,9 @@ sub CreateInterface {
     $Str .= '<input type="submit" name="ClearCache" value="'.
         &mt('Clear Caches').'" />';
     $Str .= '&nbsp;'x5;
+    $Str .= 
+        &mt('Status [_1]',
+            '<input type="text" name="stats_status" size="60" value="" />');
     $Str .= '<br />';
     return $Str;
 }
@@ -1219,7 +1222,7 @@ sub excel_initialize {
         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;
@@ -1291,7 +1294,8 @@ sub excel_initialize {
     # Initialize progress window
     %prog_state=&Apache::lonhtmlcommon::Create_PrgWin
         ($r,'Excel File Compilation Status',
-         'Excel File Compilation Progress', $studentcount);
+         'Excel File Compilation Progress', $studentcount,
+         'inline',undef,'Statistics','stats_status');
     #
     &Apache::lonhtmlcommon::Update_PrgWin($r,\%prog_state,
                                           'Processing first student');
@@ -1334,6 +1338,10 @@ sub excel_outputstudent {
         $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 +1412,7 @@ sub excel_outputstudent {
     if ($chosen_output->{'grand_maximum'}) {
         $excel_sheet->repeat_formula($rows_output,$cols_output++,
                                      $maximum_formula,undef,
-                                     %total_cell_translation);
+                                     %maximum_cell_translation);
     }
     #
     # Bookkeeping
@@ -1488,7 +1496,8 @@ END
     my $studentcount = scalar(@Apache::lonstatistics::Students);
     %prog_state=&Apache::lonhtmlcommon::Create_PrgWin
         ($r,'CSV File Compilation Status',
-         'CSV File Compilation Progress', $studentcount);
+         'CSV File Compilation Progress', $studentcount,
+         'inline',undef,'Statistics','stats_status');
     #
     # Open a file
     $filename = '/prtspool/'.