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

[matthew]

matthew		Tue Apr 29 15:46:24 2003 EDT

  Modified files:              
    /loncom/interface/statistics	lonstudentassessment.pm 
  Log:
  Add output of 'Maximum' "student" to list the maximum scores available on
  the sequences when we output Excel.
  
  
Index: loncom/interface/statistics/lonstudentassessment.pm
diff -u loncom/interface/statistics/lonstudentassessment.pm:1.44 loncom/interface/statistics/lonstudentassessment.pm:1.45
--- loncom/interface/statistics/lonstudentassessment.pm:1.44	Thu Mar 27 14:22:31 2003
+++ loncom/interface/statistics/lonstudentassessment.pm	Tue Apr 29 15:46:24 2003
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstudentassessment.pm,v 1.44 2003/03/27 19:22:31 matthew Exp $
+# $Id: lonstudentassessment.pm,v 1.45 2003/04/29 19:46:24 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -820,6 +820,26 @@
         $rows_output += 2;
     } else {
         $rows_output += 1;
+    }
+    #
+    # Output a row for MAX
+    if ($show ne 'totals') {
+        $cols_output = 0;
+        foreach my $field (&get_student_fields_to_show()) {
+            if ($field eq 'username' || $field eq 'fullname' || 
+                $field eq 'id') {
+                $excel_sheet->write($rows_output,$cols_output++,'Maximum');
+            } else {
+                $excel_sheet->write($rows_output,$cols_output++,'');
+            }
+        }
+        #
+        # Add the Sequence Headers
+        foreach my $seq (&Apache::lonstatistics::Sequences_with_Assess()) {
+            $excel_sheet->write($rows_output,$cols_output++,
+                                $seq->{'num_assess_parts'});
+        }
+        $rows_output++;
     }
     #
     # Let the user know what we are doing