|
Lines 60-72
my $subs = GetSubscription($subscriptionid);
Link Here
|
| 60 |
my ($tmp ,@serials) = GetSerials($subscriptionid); |
60 |
my ($tmp ,@serials) = GetSerials($subscriptionid); |
| 61 |
my ($template, $loggedinuser, $cookie); |
61 |
my ($template, $loggedinuser, $cookie); |
| 62 |
|
62 |
|
|
|
63 |
my $library; |
| 63 |
if($ok){ |
64 |
if($ok){ |
| 64 |
# get biblio information.... |
65 |
# get biblio information.... |
| 65 |
my $biblionumber = $subs->{'bibnum'}; |
66 |
my $biblionumber = $subs->{'bibnum'}; |
| 66 |
my ($count2,@bibitems) = GetBiblioItemByBiblioNumber($biblionumber); |
67 |
my ($count2,@bibitems) = GetBiblioItemByBiblioNumber($biblionumber); |
| 67 |
my @itemresults = GetItemsInfo( $biblionumber ); |
68 |
my @itemresults = GetItemsInfo( $biblionumber ); |
| 68 |
my $branch = @itemresults ? $itemresults[0]->{'holdingbranch'} : $subs->{branchcode}; |
69 |
my $branch = @itemresults ? $itemresults[0]->{'holdingbranch'} : $subs->{branchcode}; |
| 69 |
my $branchname = Koha::Libraries->find($branch)->branchname; |
70 |
$library = Koha::Libraries->find($branch); |
| 70 |
|
71 |
|
| 71 |
if (C4::Context->preference('RoutingListAddReserves')){ |
72 |
if (C4::Context->preference('RoutingListAddReserves')){ |
| 72 |
# get existing reserves ..... |
73 |
# get existing reserves ..... |
|
Lines 106-112
if($ok){
Link Here
|
| 106 |
flagsrequired => {serials => '*'}, |
107 |
flagsrequired => {serials => '*'}, |
| 107 |
debug => 1, |
108 |
debug => 1, |
| 108 |
}); |
109 |
}); |
| 109 |
$template->param("libraryname"=>$branchname); |
|
|
| 110 |
} else { |
110 |
} else { |
| 111 |
($template, $loggedinuser, $cookie) |
111 |
($template, $loggedinuser, $cookie) |
| 112 |
= get_template_and_user({template_name => "serials/routing-preview.tt", |
112 |
= get_template_and_user({template_name => "serials/routing-preview.tt", |
|
Lines 118-123
if($ok){
Link Here
|
| 118 |
}); |
118 |
}); |
| 119 |
} |
119 |
} |
| 120 |
|
120 |
|
|
|
121 |
$template->param( libraryname => $library->branchname ) if $library; |
| 122 |
|
| 121 |
my $memberloop = []; |
123 |
my $memberloop = []; |
| 122 |
for my $routing (@routinglist) { |
124 |
for my $routing (@routinglist) { |
| 123 |
my $member = GetMember( borrowernumber => $routing->{borrowernumber} ); |
125 |
my $member = GetMember( borrowernumber => $routing->{borrowernumber} ); |
| 124 |
- |
|
|