Lines 93-98
if($op eq 'gennext' && @subscriptionid){
Link Here
|
93 |
print $query->redirect('/cgi-bin/koha/serials/serials-collection.pl?subscriptionid='.$subscriptionid); |
93 |
print $query->redirect('/cgi-bin/koha/serials/serials-collection.pl?subscriptionid='.$subscriptionid); |
94 |
} |
94 |
} |
95 |
|
95 |
|
|
|
96 |
my $subscriptioncount; |
96 |
my ($location, $callnumber); |
97 |
my ($location, $callnumber); |
97 |
if (@subscriptionid){ |
98 |
if (@subscriptionid){ |
98 |
my @subscriptioninformation=(); |
99 |
my @subscriptioninformation=(); |
Lines 123-128
if (@subscriptionid){
Link Here
|
123 |
@subscriptioninformation=(@$tmpsubscription,@subscriptioninformation); |
124 |
@subscriptioninformation=(@$tmpsubscription,@subscriptioninformation); |
124 |
} |
125 |
} |
125 |
$subscriptions=PrepareSerialsData(\@subscriptioninformation); |
126 |
$subscriptions=PrepareSerialsData(\@subscriptioninformation); |
|
|
127 |
$subscriptioncount = CountSubscriptionFromBiblionumber($subscriptiondescs->[0]{'biblionumber'}); |
126 |
} else { |
128 |
} else { |
127 |
$subscriptiondescs = GetSubscriptionsFromBiblionumber($biblionumber) ; |
129 |
$subscriptiondescs = GetSubscriptionsFromBiblionumber($biblionumber) ; |
128 |
my $subscriptioninformation = GetFullSubscriptionsFromBiblionumber($biblionumber); |
130 |
my $subscriptioninformation = GetFullSubscriptionsFromBiblionumber($biblionumber); |
Lines 157-162
$template->param(
Link Here
|
157 |
suggestion => C4::Context->preference("suggestion"), |
159 |
suggestion => C4::Context->preference("suggestion"), |
158 |
virtualshelves => C4::Context->preference("virtualshelves"), |
160 |
virtualshelves => C4::Context->preference("virtualshelves"), |
159 |
subscr=>$query->param('subscriptionid'), |
161 |
subscr=>$query->param('subscriptionid'), |
|
|
162 |
subscriptioncount => $subscriptioncount, |
160 |
location => $locationlib, |
163 |
location => $locationlib, |
161 |
callnumber => $callnumber, |
164 |
callnumber => $callnumber, |
162 |
); |
165 |
); |
163 |
- |
|
|