version 1.44, 2005/05/15 02:40:26
|
version 1.45, 2005/05/15 02:49:07
|
Line 833 sub sett {
|
Line 833 sub sett {
|
while (my ($cell,$formula) = each(%{$self->{'formulas'}})) { |
while (my ($cell,$formula) = each(%{$self->{'formulas'}})) { |
next if ($cell =~ /template_/); |
next if ($cell =~ /template_/); |
if ($cell =~ /^A/ && $cell ne 'A0') { |
if ($cell =~ /^A/ && $cell ne 'A0') { |
if ($formula !~ /^\!/) { |
if ($formula !~ /^\!/ |
|
&& exists($self->{'constants'}->{$formula}) |
|
&& $self->{'constants'}->{$formula} ne '' |
|
) { |
$Apache::Spreadsheet::sheet_values{$cell}= |
$Apache::Spreadsheet::sheet_values{$cell}= |
eval($self->{'constants'}->{$formula}); |
eval($self->{'constants'}->{$formula}); |
} |
} |