--- loncom/interface/statistics/lonstudentassessment.pm 2003/03/07 18:46:38 1.40
+++ loncom/interface/statistics/lonstudentassessment.pm 2003/03/12 20:53:53 1.42
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lonstudentassessment.pm,v 1.40 2003/03/07 18:46:38 matthew Exp $
+# $Id: lonstudentassessment.pm,v 1.42 2003/03/12 20:53:53 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -224,7 +224,7 @@ sub CreateInterface {
$Str .= '
';
$Str .= 'Sections | ';
$Str .= 'Student Data | ';
- $Str .= 'Problem Sets | ';
+ $Str .= 'Sequences and Folders | ';
$Str .= 'Output Format | ';
$Str .= '
'."\n";
#
@@ -596,8 +596,13 @@ sub StudentAverageTotal {
$Str .= ''."\n";
$Str .= "Title | Average | Maximum |
\n";
foreach my $seq (&Apache::lonstatistics::Sequences_with_Assess()) {
- my $ave = int(100*($Statistics->{$seq->{'symb'}}->{'score'}/
- ($num_students-$nodata_count)))/100;
+ my $ave;
+ if ($num_students > $nodata_count) {
+ $ave = int(100*($Statistics->{$seq->{'symb'}}->{'score'}/
+ ($num_students-$nodata_count)))/100;
+ } else {
+ $ave = 0;
+ }
$total_ave += $ave;
my $max = $seq->{'num_assess_parts'};
$total_max += $max;