version 1.167, 2003/01/30 21:35:13
|
version 1.168, 2003/02/13 19:07:46
|
Line 1744 sub calcsheet {
|
Line 1744 sub calcsheet {
|
$self->sett(); |
$self->sett(); |
my $result = $self->{'safe'}->reval('&calc();'); |
my $result = $self->{'safe'}->reval('&calc();'); |
%{$self->{'values'}} = %{$self->{'safe'}->varglob('sheet_values')}; |
%{$self->{'values'}} = %{$self->{'safe'}->varglob('sheet_values')}; |
|
# $self->logthis($self->get_errorlog()); |
return $result; |
return $result; |
} |
} |
|
|
Line 2540 sub export_sheet_as_excel {
|
Line 2541 sub export_sheet_as_excel {
|
} |
} |
next if ($row_is_empty); |
next if ($row_is_empty); |
} |
} |
|
$worksheet->write($rows_output,$cols_output++,$rownum); |
$worksheet->write($rows_output,$cols_output++,$label); |
$worksheet->write($rows_output,$cols_output++,$label); |
if (ref($label)) { |
if (ref($label)) { |
$cols_output = (scalar(@$label)); |
$cols_output = (scalar(@$label)); |
Line 3131 sub loadstudent{
|
Line 3133 sub loadstudent{
|
my %formulas = $self->formulas(); |
my %formulas = $self->formulas(); |
$cachedassess = $self->{'uname'}.':'.$self->{'udom'}; |
$cachedassess = $self->{'uname'}.':'.$self->{'udom'}; |
# Get ALL the student preformance data |
# Get ALL the student preformance data |
my @tmp = &Apache::lonnet::currentdump($self->{'cid'}, |
my @tmp = &Apache::lonnet::currentdump($self->{'uname'}, |
$self->{'udom'}, |
$self->{'udom'}, |
$self->{'uname'}); |
$self->{'cid'}); |
if ((scalar @tmp > 0) && ($tmp[0] !~ /^error:/)) { |
if ((scalar @tmp > 0) && ($tmp[0] !~ /^error:/)) { |
%cachedstores = @tmp; |
%cachedstores = @tmp; |
} |
} |