|
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 |
- |
|
|