|
Lines 267-283
sub GetReserve {
Link Here
|
| 267 |
|
267 |
|
| 268 |
=head2 GetReservesFromBiblionumber |
268 |
=head2 GetReservesFromBiblionumber |
| 269 |
|
269 |
|
| 270 |
($count, $title_reserves) = GetReservesFromBiblionumber($biblionumber); |
270 |
my $reserves = GetReservesFromBiblionumber({ |
|
|
271 |
biblionumber => $biblionumber, |
| 272 |
itemnumber => $itemnumber, |
| 273 |
all_dates => 1|0 |
| 274 |
}); |
| 271 |
|
275 |
|
| 272 |
This function gets the list of reservations for one C<$biblionumber>, returning a count |
276 |
This function gets the list of reservations for one C<$biblionumber>, |
| 273 |
of the reserves and an arrayref pointing to the reserves for C<$biblionumber>. |
277 |
returning an arrayref pointing to the reserves for C<$biblionumber>. |
| 274 |
|
278 |
|
| 275 |
=cut |
279 |
=cut |
| 276 |
|
280 |
|
| 277 |
sub GetReservesFromBiblionumber { |
281 |
sub GetReservesFromBiblionumber { |
| 278 |
my ($biblionumber) = shift or return (0, []); |
282 |
my ( $params ) = @_; |
| 279 |
my ($all_dates) = shift; |
283 |
my $biblionumber = $params->{biblionumber} or return []; |
| 280 |
my ($itemnumber) = shift; |
284 |
my $itemnumber = $params->{itemnumber}; |
|
|
285 |
my $all_dates = $params->{all_dates} // 0; |
| 281 |
my $dbh = C4::Context->dbh; |
286 |
my $dbh = C4::Context->dbh; |
| 282 |
|
287 |
|
| 283 |
# Find the desired items in the reserves |
288 |
# Find the desired items in the reserves |
|
Lines 352-358
sub GetReservesFromBiblionumber {
Link Here
|
| 352 |
} |
357 |
} |
| 353 |
push @results, $data; |
358 |
push @results, $data; |
| 354 |
} |
359 |
} |
| 355 |
return ( $#results + 1, \@results ); |
360 |
return \@results; |
| 356 |
} |
361 |
} |
| 357 |
|
362 |
|
| 358 |
=head2 GetReservesFromItemnumber |
363 |
=head2 GetReservesFromItemnumber |