Lines 47-53
use C4::Biblio qw(
Link Here
|
47 |
GetMarcUrls |
47 |
GetMarcUrls |
48 |
); |
48 |
); |
49 |
use C4::Items qw( GetHiddenItemnumbers GetItemsInfo ); |
49 |
use C4::Items qw( GetHiddenItemnumbers GetItemsInfo ); |
50 |
use C4::Circulation qw( GetTransfers ); |
|
|
51 |
use C4::Tags qw( get_tags ); |
50 |
use C4::Tags qw( get_tags ); |
52 |
use C4::XISBN qw( get_xisbns ); |
51 |
use C4::XISBN qw( get_xisbns ); |
53 |
use C4::External::Amazon qw( get_amazon_tld ); |
52 |
use C4::External::Amazon qw( get_amazon_tld ); |
Lines 71-76
use C4::HTML5Media;
Link Here
|
71 |
use C4::CourseReserves qw( GetItemCourseReservesInfo ); |
70 |
use C4::CourseReserves qw( GetItemCourseReservesInfo ); |
72 |
|
71 |
|
73 |
use Koha::Biblios; |
72 |
use Koha::Biblios; |
|
|
73 |
use Koha::DateUtils qw( output_pref ); |
74 |
use Koha::RecordProcessor; |
74 |
use Koha::RecordProcessor; |
75 |
use Koha::AuthorisedValues; |
75 |
use Koha::AuthorisedValues; |
76 |
use Koha::CirculationRules; |
76 |
use Koha::CirculationRules; |
Lines 732-744
if ( not $viewallitems and @items > $max_items_to_display ) {
Link Here
|
732 |
my $reserve_status = C4::Reserves::GetReserveStatus($itm->{itemnumber}); |
732 |
my $reserve_status = C4::Reserves::GetReserveStatus($itm->{itemnumber}); |
733 |
if( $reserve_status eq "Waiting"){ $itm->{'waiting'} = 1; } |
733 |
if( $reserve_status eq "Waiting"){ $itm->{'waiting'} = 1; } |
734 |
if( $reserve_status eq "Reserved"){ $itm->{'onhold'} = 1; } |
734 |
if( $reserve_status eq "Reserved"){ $itm->{'onhold'} = 1; } |
735 |
|
735 |
|
736 |
my ( $transfertwhen, $transfertfrom, $transfertto ) = GetTransfers($itm->{itemnumber}); |
736 |
|
737 |
if ( defined( $transfertwhen ) && $transfertwhen ne '' ) { |
737 |
my $transfer = $item->get_transfer; |
738 |
$itm->{transfertwhen} = $transfertwhen; |
738 |
if ( $transfer && $transfer->in_transit ) { |
739 |
$itm->{transfertfrom} = $transfertfrom; |
739 |
$itm->{transfertwhen} = output_pref({ dt => dt_from_string($transfer->datesent) }); |
740 |
$itm->{transfertto} = $transfertto; |
740 |
$itm->{transfertfrom} = $transfer->frombranch; |
741 |
} |
741 |
$itm->{transfertto} = $transfer->tobranch; |
|
|
742 |
} |
742 |
|
743 |
|
743 |
if ( C4::Context->preference('OPACAcquisitionDetails') ) { |
744 |
if ( C4::Context->preference('OPACAcquisitionDetails') ) { |
744 |
$itm->{on_order} = 1 |
745 |
$itm->{on_order} = 1 |
745 |
- |
|
|