|
Lines 260-266
sub calculate {
Link Here
|
| 260 |
$linefield = $line; |
260 |
$linefield = $line; |
| 261 |
} |
261 |
} |
| 262 |
my $patron_categories = Koha::Patron::Categories->search({}, {order_by => ['categorycode']}); |
262 |
my $patron_categories = Koha::Patron::Categories->search({}, {order_by => ['categorycode']}); |
| 263 |
push @loopfilter, {debug=>1, crit=>"\%cathash", filter=>join(", ", map { $_->categorycode . ' (' . ( $_->description || 'NO_DESCRIPTION' ) . ')'} $patron_categories->as_list )}; |
263 |
push @loopfilter, |
|
|
264 |
{ |
| 265 |
debug => 1, |
| 266 |
crit => "Patron category", |
| 267 |
filter => join( ", ", map { $_->categorycode . ' (' . ( $_->description || 'NO_DESCRIPTION' ) . ')' } $patron_categories->as_list ), |
| 268 |
}; |
| 264 |
|
269 |
|
| 265 |
my $strsth; |
270 |
my $strsth; |
| 266 |
my @strparams; # bind parameters for the query |
271 |
my @strparams; # bind parameters for the query |
| 267 |
- |
|
|