Lines 234-240
sub calculate {
Link Here
|
234 |
my @loopfilter; |
234 |
my @loopfilter; |
235 |
for ( my $i = 0 ; $i <= @$filters ; $i++ ) { |
235 |
for ( my $i = 0 ; $i <= @$filters ; $i++ ) { |
236 |
my %cell; |
236 |
my %cell; |
237 |
if ( defined @$filters[$i] and @$filters[$i] ne '' ) { |
237 |
if ( defined @$filters[$i] and @$filters[$i] ne '' and $i != 16 ) { |
238 |
if ( ( ( $i == 1 ) or ( $i == 3 ) or ( $i == 5 ) or ( $i == 9 ) ) and ( @$filters[ $i - 1 ] ) ) { |
238 |
if ( ( ( $i == 1 ) or ( $i == 3 ) or ( $i == 5 ) or ( $i == 9 ) ) and ( @$filters[ $i - 1 ] ) ) { |
239 |
$cell{err} = 1 if ( @$filters[$i] < @$filters[ $i - 1 ] ); |
239 |
$cell{err} = 1 if ( @$filters[$i] < @$filters[ $i - 1 ] ); |
240 |
} |
240 |
} |
Lines 256-266
sub calculate {
Link Here
|
256 |
: ( $i == 13 ) ? "Status" |
256 |
: ( $i == 13 ) ? "Status" |
257 |
: ( $i == 14 ) ? "Materials" |
257 |
: ( $i == 14 ) ? "Materials" |
258 |
: ( $i == 15 ) ? "Statistic value" |
258 |
: ( $i == 15 ) ? "Statistic value" |
|
|
259 |
: ( $i == 17 and $filters->[16] == 0 ) ? "Barcode (not like)" |
260 |
: ( $i == 17 and $filters->[16] == 1 ) ? "Barcode (like)" |
259 |
: ( $i == 18 ) ? "Acquired date from" |
261 |
: ( $i == 18 ) ? "Acquired date from" |
260 |
: ( $i == 19 ) ? "Acquired date to" |
262 |
: ( $i == 19 ) ? "Acquired date to" |
261 |
: ( $i == 20 ) ? "Removed date from" |
263 |
: ( $i == 20 ) ? "Removed date from" |
262 |
: ( $i == 21 ) ? "Removed date to" |
264 |
: ( $i == 21 ) ? "Removed date to" |
263 |
: ''; |
265 |
: ''; |
|
|
266 |
|
264 |
push @loopfilter, \%cell; |
267 |
push @loopfilter, \%cell; |
265 |
} |
268 |
} |
266 |
} |
269 |
} |
267 |
- |
|
|