Lines 45-51
use C4::Biblio qw(
Link Here
|
45 |
GetMarcSubjects |
45 |
GetMarcSubjects |
46 |
GetMarcUrls |
46 |
GetMarcUrls |
47 |
); |
47 |
); |
48 |
use C4::Circulation qw( GetTransfers ); |
|
|
49 |
use C4::Tags qw( get_tags ); |
48 |
use C4::Tags qw( get_tags ); |
50 |
use C4::XISBN qw( get_xisbns ); |
49 |
use C4::XISBN qw( get_xisbns ); |
51 |
use C4::External::Amazon qw( get_amazon_tld ); |
50 |
use C4::External::Amazon qw( get_amazon_tld ); |
Lines 734-745
else {
Link Here
|
734 |
if ( $reserve_status eq "Waiting" ) { $item_info->{'waiting'} = 1; } |
733 |
if ( $reserve_status eq "Waiting" ) { $item_info->{'waiting'} = 1; } |
735 |
if ( $reserve_status eq "Reserved" ) { $item_info->{'onhold'} = 1; } |
734 |
if ( $reserve_status eq "Reserved" ) { $item_info->{'onhold'} = 1; } |
736 |
|
735 |
|
737 |
my ( $transfertwhen, $transfertfrom, $transfertto ) = |
736 |
my $transfer = $item->get_transfer; |
738 |
GetTransfers( $item->itemnumber ); |
737 |
if ( $transfer && $transfer->in_transit ) { |
739 |
if ( defined($transfertwhen) && $transfertwhen ne '' ) { |
738 |
$item_info->{transfertwhen} = $transfer->datesent; |
740 |
$item_info->{transfertwhen} = $transfertwhen; |
739 |
$item_info->{transfertfrom} = $transfer->frombranch; |
741 |
$item_info->{transfertfrom} = $transfertfrom; |
740 |
$item_info->{transfertto} = $transfer->tobranch; |
742 |
$item_info->{transfertto} = $transfertto; |
|
|
743 |
} |
741 |
} |
744 |
|
742 |
|
745 |
if ( C4::Context->preference('OPACAcquisitionDetails') ) { |
743 |
if ( C4::Context->preference('OPACAcquisitionDetails') ) { |
746 |
- |
|
|