Lines 42-48
use Koha::DateUtils;
Link Here
|
42 |
use C4::HTML5Media; |
42 |
use C4::HTML5Media; |
43 |
use C4::CourseReserves qw(GetItemCourseReservesInfo); |
43 |
use C4::CourseReserves qw(GetItemCourseReservesInfo); |
44 |
use C4::Acquisition qw(GetOrdersByBiblionumber); |
44 |
use C4::Acquisition qw(GetOrdersByBiblionumber); |
45 |
|
|
|
46 |
use Koha::Virtualshelves; |
45 |
use Koha::Virtualshelves; |
47 |
|
46 |
|
48 |
my $query = CGI->new(); |
47 |
my $query = CGI->new(); |
Lines 220-226
foreach my $item (@items) {
Link Here
|
220 |
$item->{'ccode'} = $collections->{$ccode} if ( defined( $ccode ) && defined($collections) && exists( $collections->{$ccode} ) ); |
219 |
$item->{'ccode'} = $collections->{$ccode} if ( defined( $ccode ) && defined($collections) && exists( $collections->{$ccode} ) ); |
221 |
my $copynumber = $item->{'copynumber'}; |
220 |
my $copynumber = $item->{'copynumber'}; |
222 |
$item->{'copynumber'} = $copynumbers->{$copynumber} if ( defined($copynumber) && defined($copynumbers) && exists( $copynumbers->{$copynumber} ) ); |
221 |
$item->{'copynumber'} = $copynumbers->{$copynumber} if ( defined($copynumber) && defined($copynumbers) && exists( $copynumbers->{$copynumber} ) ); |
223 |
foreach (qw(ccode enumchron copynumber stocknumber itemnotes uri)) { |
222 |
foreach (qw(ccode enumchron copynumber stocknumber itemnotes itemnotes_nonpublic uri)) { |
224 |
$itemfields{$_} = 1 if ( $item->{$_} ); |
223 |
$itemfields{$_} = 1 if ( $item->{$_} ); |
225 |
} |
224 |
} |
226 |
|
225 |
|
Lines 254-260
foreach my $item (@items) {
Link Here
|
254 |
$item->{nocancel} = 1; |
253 |
$item->{nocancel} = 1; |
255 |
} |
254 |
} |
256 |
|
255 |
|
257 |
# item has a host number if its biblio number does not match the current bib |
256 |
foreach my $f (qw( itemnotes )) { |
|
|
257 |
if ($item->{$f}) { |
258 |
$item->{$f} =~ s|\n|<br />|g; |
259 |
$itemfields{$f} = 1; |
260 |
} |
261 |
} |
262 |
|
263 |
#item has a host number if its biblio number does not match the current bib |
264 |
|
258 |
if ($item->{biblionumber} ne $biblionumber){ |
265 |
if ($item->{biblionumber} ne $biblionumber){ |
259 |
$item->{hostbiblionumber} = $item->{biblionumber}; |
266 |
$item->{hostbiblionumber} = $item->{biblionumber}; |
260 |
$item->{hosttitle} = GetBiblioData($item->{biblionumber})->{title}; |
267 |
$item->{hosttitle} = GetBiblioData($item->{biblionumber})->{title}; |
Lines 319-325
$template->param(
Link Here
|
319 |
itemdata_copynumber => $itemfields{copynumber}, |
326 |
itemdata_copynumber => $itemfields{copynumber}, |
320 |
itemdata_stocknumber => $itemfields{stocknumber}, |
327 |
itemdata_stocknumber => $itemfields{stocknumber}, |
321 |
volinfo => $itemfields{enumchron}, |
328 |
volinfo => $itemfields{enumchron}, |
322 |
itemdata_itemnotes => $itemfields{itemnotes}, |
329 |
itemdata_itemnotes => $itemfields{itemnotes}, |
|
|
330 |
itemdata_nonpublicnotes => $itemfields{itemnotes_nonpublic}, |
323 |
z3950_search_params => C4::Search::z3950_search_args($dat), |
331 |
z3950_search_params => C4::Search::z3950_search_args($dat), |
324 |
hostrecords => $hostrecords, |
332 |
hostrecords => $hostrecords, |
325 |
analytics_flag => $analytics_flag, |
333 |
analytics_flag => $analytics_flag, |