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

matthew lon-capa-cvs@mail.lon-capa.org
Tue, 06 Apr 2004 21:42:26 -0000


matthew		Tue Apr  6 17:42:26 2004 EDT

  Modified files:              (Branch: version_1_1_X)
    /loncom/interface/statistics	lonstudentassessment.pm 
  Log:
  Bug: 2905: Heading missing in excel output of scores summary.
  
  
Index: loncom/interface/statistics/lonstudentassessment.pm
diff -u loncom/interface/statistics/lonstudentassessment.pm:1.81.2.2 loncom/interface/statistics/lonstudentassessment.pm:1.81.2.3
--- loncom/interface/statistics/lonstudentassessment.pm:1.81.2.2	Tue Apr  6 15:09:10 2004
+++ loncom/interface/statistics/lonstudentassessment.pm	Tue Apr  6 17:42:26 2004
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstudentassessment.pm,v 1.81.2.2 2004/04/06 19:09:10 albertel Exp $
+# $Id: lonstudentassessment.pm,v 1.81.2.3 2004/04/06 21:42:26 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -992,9 +992,9 @@
     $cols_output = 0;
     $excel_sheet->write($rows_output++,$cols_output++,$datadescription);
     #
-    if ($data eq 'tries' || $data eq 'scores') {
-        $rows_output++;
-    }
+#    if ($data eq 'tries' || $data eq 'scores') {
+        $rows_output+=2;
+#    }
     #
     # Add the student headers
     $cols_output = 0;
@@ -1002,9 +1002,9 @@
         $excel_sheet->write($rows_output,$cols_output++,$field);
     }
     my $row_offset = 0;
-    if ($data eq 'tries' || $data eq 'scores') {
+#    if ($data eq 'tries' || $data eq 'scores') {
         $row_offset = -1;
-    }
+#    }
     #
     # Add the remaining column headers
     my $total_formula_string = '=0';
@@ -1067,11 +1067,11 @@
     $total_formula = $excel_sheet->store_formula($total_formula_string);
     #
     # Bookkeeping
-    if ($data eq 'sum and total' || $data eq 'parts correct total') {
-        $rows_output += 2;
-    } else {
+#    if ($data eq 'sum and total' || $data eq 'parts correct total') {
+#        $rows_output += 1;
+#    } else {
         $rows_output += 1;
-    }
+#    }
     #
     # Output a row for MAX
     $cols_output = 0;