|
Lines 160-165
sub calculate {
Link Here
|
| 160 |
my $grantotal =0; |
160 |
my $grantotal =0; |
| 161 |
my $dbh = C4::Context->dbh; |
161 |
my $dbh = C4::Context->dbh; |
| 162 |
|
162 |
|
|
|
163 |
|
| 163 |
# Checking filters |
164 |
# Checking filters |
| 164 |
my @loopfilter; |
165 |
my @loopfilter; |
| 165 |
my @cellmap = ( |
166 |
my @cellmap = ( |
|
Lines 362-367
sub calculate {
Link Here
|
| 362 |
} keys %patrons; |
363 |
} keys %patrons; |
| 363 |
foreach my $id (@ranked_ids) { |
364 |
foreach my $id (@ranked_ids) { |
| 364 |
my @loopcell; |
365 |
my @loopcell; |
|
|
366 |
|
| 365 |
foreach my $key (@cols_in_order) { |
367 |
foreach my $key (@cols_in_order) { |
| 366 |
if($column){ |
368 |
if($column){ |
| 367 |
push @loopcell, { |
369 |
push @loopcell, { |
|
Lines 381-388
sub calculate {
Link Here
|
| 381 |
'loopcell' => \@loopcell, |
383 |
'loopcell' => \@loopcell, |
| 382 |
'hilighted' => ($i%2), |
384 |
'hilighted' => ($i%2), |
| 383 |
}; |
385 |
}; |
|
|
386 |
# use a limit, if a limit is defined |
| 387 |
last if $i > $limit and $limit |
| 384 |
} |
388 |
} |
| 385 |
|
389 |
|
| 386 |
# the header of the table |
390 |
# the header of the table |
| 387 |
$globalline{loopfilter}=\@loopfilter; |
391 |
$globalline{loopfilter}=\@loopfilter; |
| 388 |
# the core of the table |
392 |
# the core of the table |
| 389 |
- |
|
|