Lines 34-40
use C4::Serials qw( CountSubscriptionFromBiblionumber SearchSubscriptions GetLat
Link Here
|
34 |
use C4::Output qw( output_html_with_http_headers ); |
34 |
use C4::Output qw( output_html_with_http_headers ); |
35 |
use C4::Biblio qw( GetBiblioData GetFrameworkCode ); |
35 |
use C4::Biblio qw( GetBiblioData GetFrameworkCode ); |
36 |
use C4::Items qw( GetAnalyticsCount ); |
36 |
use C4::Items qw( GetAnalyticsCount ); |
37 |
use C4::Circulation qw( GetTransfers ); |
|
|
38 |
use C4::Reserves; |
37 |
use C4::Reserves; |
39 |
use C4::Serials qw( CountSubscriptionFromBiblionumber SearchSubscriptions GetLatestSerials ); |
38 |
use C4::Serials qw( CountSubscriptionFromBiblionumber SearchSubscriptions GetLatestSerials ); |
40 |
use C4::XISBN qw( get_xisbns ); |
39 |
use C4::XISBN qw( get_xisbns ); |
Lines 402-413
foreach my $item (@items) {
Link Here
|
402 |
$item_info->{checkout} = $item->checkout; |
401 |
$item_info->{checkout} = $item->checkout; |
403 |
|
402 |
|
404 |
# Check the transit status |
403 |
# Check the transit status |
405 |
my $transfer = $item->get_transfer; |
404 |
my $transfer = $item_object->get_transfer; |
406 |
if ( $transfer ) { |
405 |
if ( $transfer && $transfer->in_transit ) { |
407 |
$item_info->{transfertwhen} = $transfer->datesent; |
406 |
$item->{transfertwhen} = $transfer->datesent; |
408 |
$item_info->{transfertfrom} = $transfer->frombranch; |
407 |
$item->{transfertfrom} = $transfer->frombranch; |
409 |
$item_info->{transfertto} = $transfer->tobranch; |
408 |
$item->{transfertto} = $transfer->tobranch; |
410 |
$item_info->{nocancel} = 1; |
409 |
$item->{nocancel} = 1; |
411 |
} |
410 |
} |
412 |
|
411 |
|
413 |
foreach my $f (qw( itemnotes )) { |
412 |
foreach my $f (qw( itemnotes )) { |
414 |
- |
|
|