version 1.105, 2004/09/23 17:48:00
|
version 1.107, 2004/12/10 16:52:53
|
Line 1064 sub excel_initialize {
|
Line 1064 sub excel_initialize {
|
$cols_output++, |
$cols_output++, |
$res->{'title'}.' part '.$part, |
$res->{'title'}.' part '.$part, |
$format->{'bold'}); |
$format->{'bold'}); |
|
$count++; |
} |
} |
} else { |
} else { |
$excel_sheet->write($resource_name_row, |
$excel_sheet->write($resource_name_row, |
$cols_output++, |
$cols_output++, |
$res->{'title'},$format->{'bold'}); |
$res->{'title'},$format->{'bold'}); |
|
$count++; |
} |
} |
$count++; |
|
} |
} |
} |
} |
# Determine ending cell |
# Determine ending cell |
Line 1218 sub excel_initialize {
|
Line 1219 sub excel_initialize {
|
if ($chosen_output->{'grand_maximum'}) { |
if ($chosen_output->{'grand_maximum'}) { |
$excel_sheet->repeat_formula($maximum_data_row,$cols_output++, |
$excel_sheet->repeat_formula($maximum_data_row,$cols_output++, |
$maximum_formula,undef, |
$maximum_formula,undef, |
%total_cell_translation); |
%maximum_cell_translation); |
} |
} |
} # End of MAXIMUM row output if ($chosen_output->{'maximum_row'}) { |
} # End of MAXIMUM row output if ($chosen_output->{'maximum_row'}) { |
$rows_output = $first_data_row; |
$rows_output = $first_data_row; |
Line 1333 sub excel_outputstudent {
|
Line 1334 sub excel_outputstudent {
|
$total_cell_translation{$seq->{'Excel:scorecell'}} = |
$total_cell_translation{$seq->{'Excel:scorecell'}} = |
&Spreadsheet::WriteExcel::Utility::xl_rowcol_to_cell |
&Spreadsheet::WriteExcel::Utility::xl_rowcol_to_cell |
($rows_output,$seq->{'Excel:scorecol'}); |
($rows_output,$seq->{'Excel:scorecol'}); |
|
# and maximum cell |
|
$maximum_cell_translation{$seq->{'Excel:maxcell'}} = |
|
&Spreadsheet::WriteExcel::Utility::xl_rowcol_to_cell |
|
($rows_output,$seq->{'Excel:maxcol'}); |
# |
# |
my ($performance,$performance_length,$score,$seq_max,$rawdata); |
my ($performance,$performance_length,$score,$seq_max,$rawdata); |
if ($chosen_output->{'tries'} || $chosen_output->{'correct'}){ |
if ($chosen_output->{'tries'} || $chosen_output->{'correct'}){ |
Line 1403 sub excel_outputstudent {
|
Line 1408 sub excel_outputstudent {
|
if ($chosen_output->{'grand_maximum'}) { |
if ($chosen_output->{'grand_maximum'}) { |
$excel_sheet->repeat_formula($rows_output,$cols_output++, |
$excel_sheet->repeat_formula($rows_output,$cols_output++, |
$maximum_formula,undef, |
$maximum_formula,undef, |
%total_cell_translation); |
%maximum_cell_translation); |
} |
} |
# |
# |
# Bookkeeping |
# Bookkeeping |