Lines 172-177
my @subscriptions = SearchSubscriptions({ biblionumber => $biblionumber, o
Link Here
|
172 |
my @subs; |
172 |
my @subs; |
173 |
|
173 |
|
174 |
foreach my $subscription (@subscriptions) { |
174 |
foreach my $subscription (@subscriptions) { |
|
|
175 |
warn $subscription->{price}; |
175 |
my %cell; |
176 |
my %cell; |
176 |
my $serials_to_display; |
177 |
my $serials_to_display; |
177 |
$cell{subscriptionid} = $subscription->{subscriptionid}; |
178 |
$cell{subscriptionid} = $subscription->{subscriptionid}; |
Lines 183-188
foreach my $subscription (@subscriptions) {
Link Here
|
183 |
$cell{callnumber} = $subscription->{callnumber}; |
184 |
$cell{callnumber} = $subscription->{callnumber}; |
184 |
$cell{location} = $subscription->{location}; |
185 |
$cell{location} = $subscription->{location}; |
185 |
$cell{closed} = $subscription->{closed}; |
186 |
$cell{closed} = $subscription->{closed}; |
|
|
187 |
$cell{price} = $subscription->{price}; |
186 |
#get the three latest serials. |
188 |
#get the three latest serials. |
187 |
$serials_to_display = $subscription->{staffdisplaycount}; |
189 |
$serials_to_display = $subscription->{staffdisplaycount}; |
188 |
$serials_to_display = C4::Context->preference('StaffSerialIssueDisplayCount') unless $serials_to_display; |
190 |
$serials_to_display = C4::Context->preference('StaffSerialIssueDisplayCount') unless $serials_to_display; |