Lines 477-483
lists of authorized values for certain item fields.
Link Here
|
477 |
minlocation => $minlocation, |
477 |
minlocation => $minlocation, |
478 |
maxlocation => $maxlocation, |
478 |
maxlocation => $maxlocation, |
479 |
location => $location, |
479 |
location => $location, |
480 |
itemtype => $itemtype, |
|
|
481 |
ignoreissued => $ignoreissued, |
480 |
ignoreissued => $ignoreissued, |
482 |
datelastseen => $datelastseen, |
481 |
datelastseen => $datelastseen, |
483 |
branchcode => $branchcode, |
482 |
branchcode => $branchcode, |
Lines 485-490
lists of authorized values for certain item fields.
Link Here
|
485 |
offset => $offset, |
484 |
offset => $offset, |
486 |
size => $size, |
485 |
size => $size, |
487 |
statushash => $statushash, |
486 |
statushash => $statushash, |
|
|
487 |
itemtypes => @itemsarray, |
488 |
} ); |
488 |
} ); |
489 |
|
489 |
|
490 |
Retrieve a list of title/authors/barcode/callnumber, for biblio inventory. |
490 |
Retrieve a list of title/authors/barcode/callnumber, for biblio inventory. |
Lines 517-522
sub GetItemsForInventory {
Link Here
|
517 |
my $size = $parameters->{'size'} // ''; |
517 |
my $size = $parameters->{'size'} // ''; |
518 |
my $statushash = $parameters->{'statushash'} // ''; |
518 |
my $statushash = $parameters->{'statushash'} // ''; |
519 |
my $ignore_waiting_holds = $parameters->{'ignore_waiting_holds'} // ''; |
519 |
my $ignore_waiting_holds = $parameters->{'ignore_waiting_holds'} // ''; |
|
|
520 |
my $items = $parameters->{'itemtypes'} // ''; |
520 |
|
521 |
|
521 |
my $dbh = C4::Context->dbh; |
522 |
my $dbh = C4::Context->dbh; |
522 |
my ( @bind_params, @where_strings ); |
523 |
my ( @bind_params, @where_strings ); |
Lines 576-582
sub GetItemsForInventory {
Link Here
|
576 |
push @where_strings, 'biblioitems.itemtype = ?'; |
577 |
push @where_strings, 'biblioitems.itemtype = ?'; |
577 |
push @bind_params, $itemtype; |
578 |
push @bind_params, $itemtype; |
578 |
} |
579 |
} |
579 |
|
|
|
580 |
if ( $ignoreissued) { |
580 |
if ( $ignoreissued) { |
581 |
$query .= "LEFT JOIN issues ON items.itemnumber = issues.itemnumber "; |
581 |
$query .= "LEFT JOIN issues ON items.itemnumber = issues.itemnumber "; |
582 |
push @where_strings, 'issues.date_due IS NULL'; |
582 |
push @where_strings, 'issues.date_due IS NULL'; |
Lines 587-592
sub GetItemsForInventory {
Link Here
|
587 |
push( @where_strings, q{(reserves.found != 'W' OR reserves.found IS NULL)} ); |
587 |
push( @where_strings, q{(reserves.found != 'W' OR reserves.found IS NULL)} ); |
588 |
} |
588 |
} |
589 |
|
589 |
|
|
|
590 |
if ( $items and @{$items} > 0 ){ |
591 |
my $joinedvals; |
592 |
for my $itemtype (@{$items}){ |
593 |
$joinedvals = join(',', @{$items}); |
594 |
} |
595 |
push @where_strings, "( biblioitems.itemtype IN (" . $joinedvals . ") OR items.itype IN (" . $joinedvals . ") )"; |
596 |
} |
597 |
|
590 |
if ( @where_strings ) { |
598 |
if ( @where_strings ) { |
591 |
$query .= 'WHERE '; |
599 |
$query .= 'WHERE '; |
592 |
$query .= join ' AND ', @where_strings; |
600 |
$query .= join ' AND ', @where_strings; |