|
Lines 54-59
if ( $selectview eq "full" ) {
Link Here
|
| 54 |
); |
54 |
); |
| 55 |
my $subscriptions = GetFullSubscriptionsFromBiblionumber($biblionumber); |
55 |
my $subscriptions = GetFullSubscriptionsFromBiblionumber($biblionumber); |
| 56 |
my $subscriptioninformation=PrepareSerialsData($subscriptions); |
56 |
my $subscriptioninformation=PrepareSerialsData($subscriptions); |
|
|
57 |
# PrepareSerialsData does some bogus stuff that the template could handle |
| 58 |
# But at least it sorts the array by the year field so we dont have to |
| 59 |
# find 'manage' if its there |
| 60 |
if ($subscriptioninformation->[0]->{year} eq 'manage') { |
| 61 |
shift @{$subscriptioninformation}; |
| 62 |
} |
| 63 |
|
| 57 |
# now, check is there is an alert subscription for one of the subscriptions |
64 |
# now, check is there is an alert subscription for one of the subscriptions |
| 58 |
foreach (@$subscriptions) { |
65 |
foreach (@$subscriptions) { |
| 59 |
if (getalert($loggedinuser,'issue',$_->{subscriptionid})) { |
66 |
if (getalert($loggedinuser,'issue',$_->{subscriptionid})) { |
|
Lines 61-69
if ( $selectview eq "full" ) {
Link Here
|
| 61 |
} |
68 |
} |
| 62 |
} |
69 |
} |
| 63 |
|
70 |
|
| 64 |
my $title = $subscriptions->[0]{bibliotitle}; |
71 |
my $title = $subscriptions->[0]->{bibliotitle}; |
| 65 |
my $yearmin = $subscriptions->[0]{year}; |
72 |
my $yearmin = $subscriptions->[0]->{year}; |
| 66 |
my $yearmax = $subscriptions->[ scalar(@$subscriptions) - 1 ]{year}; |
73 |
my $yearmax = $subscriptions->[ -1 ]->{year}; |
| 67 |
|
74 |
|
| 68 |
|
75 |
|
| 69 |
# replace CR by <br> in librarian note |
76 |
# replace CR by <br> in librarian note |
| 70 |
- |
|
|