version 1.66, 2003/09/03 18:23:10
|
version 1.67, 2003/09/10 15:06:34
|
Line 931 END
|
Line 931 END
|
# |
# |
# Add a worksheet |
# Add a worksheet |
my $sheetname = $ENV{'course.'.$ENV{'request.course.id'}.'.description'}; |
my $sheetname = $ENV{'course.'.$ENV{'request.course.id'}.'.description'}; |
if (length($sheetname) > 31) { |
$sheetname = &Apache::loncommon::clean_excel_name($sheetname); |
$sheetname = substr($sheetname,0,31); |
|
} |
|
$excel_sheet = $excel_workbook->addworksheet($sheetname); |
$excel_sheet = $excel_workbook->addworksheet($sheetname); |
# |
# |
# Put the course description in the header |
# Put the course description in the header |
Line 1514 sub StudentPerformanceOnSequence {
|
Line 1512 sub StudentPerformanceOnSequence {
|
my $awarded = 0; |
my $awarded = 0; |
if (exists($resource_data->{'resource.'.$part.'.awarded'})) { |
if (exists($resource_data->{'resource.'.$part.'.awarded'})) { |
$awarded = $resource_data->{'resource.'.$part.'.awarded'}; |
$awarded = $resource_data->{'resource.'.$part.'.awarded'}; |
|
$awarded = 0 if (! $awarded); |
} |
} |
# |
# |
$partscore = $weight*$awarded; |
$partscore = $weight*$awarded; |