Lines 274-287
See CanItemBeReserved() for possible return values.
Link Here
|
274 |
sub CanBookBeReserved{ |
274 |
sub CanBookBeReserved{ |
275 |
my ($borrowernumber, $biblionumber, $pickup_branchcode) = @_; |
275 |
my ($borrowernumber, $biblionumber, $pickup_branchcode) = @_; |
276 |
|
276 |
|
277 |
# Check if borrower already has reserved the same biblio. |
|
|
278 |
my $patron = Koha::Patrons->find($borrowernumber); |
277 |
my $patron = Koha::Patrons->find($borrowernumber); |
279 |
my $holds = $patron->holds; |
278 |
my $holds = $patron->holds; |
280 |
while (my $hold = $holds->next) { |
|
|
281 |
if ($hold->biblionumber == $biblionumber) { |
282 |
return { status => 'alreadyReserved' }; |
283 |
} |
284 |
} |
285 |
|
279 |
|
286 |
# Check if borrower has reached the maximum number of holds allowed |
280 |
# Check if borrower has reached the maximum number of holds allowed |
287 |
my $maxreserves = C4::Context->preference('maxreserves'); |
281 |
my $maxreserves = C4::Context->preference('maxreserves'); |