|
Lines 61-76
my $library;
Link Here
|
| 61 |
if($ok){ |
61 |
if($ok){ |
| 62 |
# get biblio information.... |
62 |
# get biblio information.... |
| 63 |
my $biblionumber = $subs->{'bibnum'}; |
63 |
my $biblionumber = $subs->{'bibnum'}; |
|
|
64 |
|
| 65 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
| 66 |
my $items = $biblio->items->search_ordered; |
| 67 |
my $branch = |
| 68 |
$items->count |
| 69 |
? $items->next->holding_branch->branchcode |
| 70 |
: $subs->{branchcode}; |
| 71 |
$library = Koha::Libraries->find($branch); |
| 72 |
|
| 64 |
if (C4::Context->preference('RoutingListAddReserves')){ |
73 |
if (C4::Context->preference('RoutingListAddReserves')){ |
| 65 |
# get existing reserves ..... |
74 |
# get existing reserves ..... |
| 66 |
|
75 |
|
| 67 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
|
|
| 68 |
my $items = $biblio->items->search_ordered; |
| 69 |
my $branch = |
| 70 |
$items->count |
| 71 |
? $items->next->holding_branch->branchcode |
| 72 |
: $subs->{branchcode}; |
| 73 |
$library = Koha::Libraries->find($branch); |
| 74 |
my $holds = $biblio->current_holds; |
76 |
my $holds = $biblio->current_holds; |
| 75 |
my $count = $holds->count; |
77 |
my $count = $holds->count; |
| 76 |
while ( my $hold = $holds->next ) { |
78 |
while ( my $hold = $holds->next ) { |
| 77 |
- |
|
|