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

[matthew]

matthew		Thu Feb 12 09:47:55 2004 EDT

  Modified files:              
    /loncom/interface/statistics	lonstudentassessment.pm 
  Log:
  More accurately count the columns of the spreadsheet.
  
  
Index: loncom/interface/statistics/lonstudentassessment.pm
diff -u loncom/interface/statistics/lonstudentassessment.pm:1.87 loncom/interface/statistics/lonstudentassessment.pm:1.88
--- loncom/interface/statistics/lonstudentassessment.pm:1.87	Wed Feb 11 16:15:01 2004
+++ loncom/interface/statistics/lonstudentassessment.pm	Thu Feb 12 09:47:55 2004
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstudentassessment.pm,v 1.87 2004/02/11 21:15:01 matthew Exp $
+# $Id: lonstudentassessment.pm,v 1.88 2004/02/12 14:47:55 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -833,9 +833,13 @@
     undef ($total_formula);
     #
     my $total_columns = scalar(&get_student_fields_to_show());
+    
     foreach my $seq (&Apache::lonstatistics::Sequences_with_Assess()) {
+        if ($chosen_output->{'every_problem'}) {
+            $total_columns += $seq->{'num_assess_parts'};
+        }
         # Add 2 because we need a 'sequence_sum' and 'total' column for each
-        $total_columns += $seq->{'num_assess_parts'}+2;
+        $total_columns += 2;
     }
     if ($chosen_output->{'base'} eq 'tries' && $total_columns > 255) {
         $r->print(<<END);