|
Lines 35-40
$selectview = C4::Context->preference("SubscriptionHistory") unless $selectview;
Link Here
|
| 35 |
# my $id; |
35 |
# my $id; |
| 36 |
my ( $template, $loggedinuser, $cookie ); |
36 |
my ( $template, $loggedinuser, $cookie ); |
| 37 |
my $biblionumber = $query->param('biblionumber'); |
37 |
my $biblionumber = $query->param('biblionumber'); |
|
|
38 |
my $small_subscriptions = GetSubscriptionsFromBiblionumber($biblionumber); |
| 38 |
if ( $selectview eq "full" ) { |
39 |
if ( $selectview eq "full" ) { |
| 39 |
( $template, $loggedinuser, $cookie ) = get_template_and_user( |
40 |
( $template, $loggedinuser, $cookie ) = get_template_and_user( |
| 40 |
{ |
41 |
{ |
|
Lines 65-76
if ( $selectview eq "full" ) {
Link Here
|
| 65 |
my $title = $subscriptions->[0]->{bibliotitle}; |
66 |
my $title = $subscriptions->[0]->{bibliotitle}; |
| 66 |
my $yearmin = $subscriptions->[0]->{year}; |
67 |
my $yearmin = $subscriptions->[0]->{year}; |
| 67 |
my $yearmax = $subscriptions->[ -1 ]->{year}; |
68 |
my $yearmax = $subscriptions->[ -1 ]->{year}; |
|
|
69 |
my $location = $small_subscriptions->[0]->{location}; |
| 68 |
|
70 |
|
| 69 |
$template->param( |
71 |
$template->param( |
| 70 |
biblionumber => scalar $query->param('biblionumber'), |
72 |
biblionumber => scalar $query->param('biblionumber'), |
| 71 |
years => $subscriptioninformation, |
73 |
years => $subscriptioninformation, |
| 72 |
yearmin => $yearmin, |
74 |
yearmin => $yearmin, |
| 73 |
yearmax => $yearmax, |
75 |
yearmax => $yearmax, |
|
|
76 |
location => $location, |
| 74 |
bibliotitle => $title, |
77 |
bibliotitle => $title, |
| 75 |
suggestion => C4::Context->preference("suggestion"), |
78 |
suggestion => C4::Context->preference("suggestion"), |
| 76 |
virtualshelves => C4::Context->preference("virtualshelves"), |
79 |
virtualshelves => C4::Context->preference("virtualshelves"), |
|
Lines 87-93
else {
Link Here
|
| 87 |
} |
90 |
} |
| 88 |
); |
91 |
); |
| 89 |
|
92 |
|
| 90 |
my $subscriptions = GetSubscriptionsFromBiblionumber($biblionumber); |
93 |
my $subscriptions = $small_subscriptions; |
| 91 |
# now, check is there is an alert subscription for one of the subscriptions |
94 |
# now, check is there is an alert subscription for one of the subscriptions |
| 92 |
if ($loggedinuser) { |
95 |
if ($loggedinuser) { |
| 93 |
foreach (@$subscriptions) { |
96 |
foreach (@$subscriptions) { |
| 94 |
- |
|
|