|
Lines 40-45
my $borcatfilter = $input->param('borcat') || '';
Link Here
|
| 40 |
my $itemtypefilter = $input->param('itemtype') || ''; |
40 |
my $itemtypefilter = $input->param('itemtype') || ''; |
| 41 |
my $borflagsfilter = $input->param('borflag') || ''; |
41 |
my $borflagsfilter = $input->param('borflag') || ''; |
| 42 |
my $branchfilter = $input->param('branch') || ''; |
42 |
my $branchfilter = $input->param('branch') || ''; |
|
|
43 |
my $homebranchfilter = $input->param('homebranch') || ''; |
| 44 |
my $holdingbranchfilter = $input->param('holdingbranch') || ''; |
| 43 |
my $op = $input->param('op') || ''; |
45 |
my $op = $input->param('op') || ''; |
| 44 |
my $dateduefrom = format_date_in_iso($input->param( 'dateduefrom' )) || ''; |
46 |
my $dateduefrom = format_date_in_iso($input->param( 'dateduefrom' )) || ''; |
| 45 |
my $datedueto = format_date_in_iso($input->param( 'datedueto' )) || ''; |
47 |
my $datedueto = format_date_in_iso($input->param( 'datedueto' )) || ''; |
|
Lines 214-220
if (@patron_attr_filter_loop) {
Link Here
|
| 214 |
$template->param( |
216 |
$template->param( |
| 215 |
patron_attr_header_loop => [ map { { header => $_->{description} } } grep { ! $_->{isclone} } @patron_attr_filter_loop ], |
217 |
patron_attr_header_loop => [ map { { header => $_->{description} } } grep { ! $_->{isclone} } @patron_attr_filter_loop ], |
| 216 |
branchloop => GetBranchesLoop($branchfilter, $onlymine), |
218 |
branchloop => GetBranchesLoop($branchfilter, $onlymine), |
|
|
219 |
homebranchloop => GetBranchesLoop( $homebranchfilter, $onlymine ), |
| 220 |
holdingbranchloop => GetBranchesLoop( $holdingbranchfilter, $onlymine ), |
| 217 |
branchfilter => $branchfilter, |
221 |
branchfilter => $branchfilter, |
|
|
222 |
homebranchfilter => $homebranchfilter, |
| 223 |
holdingbranchfilter => $homebranchfilter, |
| 218 |
borcatloop=> \@borcatloop, |
224 |
borcatloop=> \@borcatloop, |
| 219 |
itemtypeloop => \@itemtypeloop, |
225 |
itemtypeloop => \@itemtypeloop, |
| 220 |
patron_attr_filter_loop => \@patron_attr_filter_loop, |
226 |
patron_attr_filter_loop => \@patron_attr_filter_loop, |
|
Lines 260-265
if ($noreport) {
Link Here
|
| 260 |
issues.itemnumber, |
266 |
issues.itemnumber, |
| 261 |
issues.issuedate, |
267 |
issues.issuedate, |
| 262 |
items.barcode, |
268 |
items.barcode, |
|
|
269 |
items.homebranch, |
| 270 |
items.holdingbranch, |
| 263 |
biblio.title, |
271 |
biblio.title, |
| 264 |
biblio.author, |
272 |
biblio.author, |
| 265 |
borrowers.borrowernumber, |
273 |
borrowers.borrowernumber, |
|
Lines 295-300
if ($noreport) {
Link Here
|
| 295 |
$strsth .= " AND borrowers.lost <> 0"; |
303 |
$strsth .= " AND borrowers.lost <> 0"; |
| 296 |
} |
304 |
} |
| 297 |
$strsth.=" AND borrowers.branchcode = '" . $branchfilter . "' " if $branchfilter; |
305 |
$strsth.=" AND borrowers.branchcode = '" . $branchfilter . "' " if $branchfilter; |
|
|
306 |
$strsth.=" AND items.homebranch = '" . $homebranchfilter . "' " if $homebranchfilter; |
| 307 |
$strsth.=" AND items.holdingbranch = '" . $holdingbranchfilter . "' " if $holdingbranchfilter; |
| 298 |
$strsth.=" AND date_due < '" . $datedueto . "' " if $datedueto; |
308 |
$strsth.=" AND date_due < '" . $datedueto . "' " if $datedueto; |
| 299 |
$strsth.=" AND date_due > '" . $dateduefrom . "' " if $dateduefrom; |
309 |
$strsth.=" AND date_due > '" . $dateduefrom . "' " if $dateduefrom; |
| 300 |
# restrict patrons (borrowers) to those matching the patron attribute filter(s), if any |
310 |
# restrict patrons (borrowers) to those matching the patron attribute filter(s), if any |
|
Lines 352-357
if ($noreport) {
Link Here
|
| 352 |
title => $data->{title}, |
362 |
title => $data->{title}, |
| 353 |
author => $data->{author}, |
363 |
author => $data->{author}, |
| 354 |
branchcode => $data->{branchcode}, |
364 |
branchcode => $data->{branchcode}, |
|
|
365 |
homebranchcode => $data->{homebranchcode}, |
| 366 |
holdingbranchcode => $data->{holdingbranchcode}, |
| 355 |
itemcallnumber => $data->{itemcallnumber}, |
367 |
itemcallnumber => $data->{itemcallnumber}, |
| 356 |
replacementprice => $data->{replacementprice}, |
368 |
replacementprice => $data->{replacementprice}, |
| 357 |
enumchron => $data->{enumchron}, |
369 |
enumchron => $data->{enumchron}, |