Lines 37-43
use C4::Reserves qw( RevertWaitingStatus AlterPriority ToggleLowestPriority Togg
Link Here
|
37 |
use C4::Items qw( get_hostitemnumbers_of ); |
37 |
use C4::Items qw( get_hostitemnumbers_of ); |
38 |
use C4::Koha qw( getitemtypeimagelocation ); |
38 |
use C4::Koha qw( getitemtypeimagelocation ); |
39 |
use C4::Serials qw( CountSubscriptionFromBiblionumber ); |
39 |
use C4::Serials qw( CountSubscriptionFromBiblionumber ); |
40 |
use C4::Circulation qw( GetTransfers _GetCircControlBranch GetBranchItemRule ); |
40 |
use C4::Circulation qw( _GetCircControlBranch GetBranchItemRule ); |
41 |
use Koha::DateUtils qw( dt_from_string output_pref ); |
41 |
use Koha::DateUtils qw( dt_from_string output_pref ); |
42 |
use C4::Utils::DataTables::Members; |
42 |
use C4::Utils::DataTables::Members; |
43 |
use C4::Search qw( enabled_staff_search_views ); |
43 |
use C4::Search qw( enabled_staff_search_views ); |
Lines 545-557
if ( ( $findborrower && $borrowernumber_hold || $findclub && $club_hold )
Link Here
|
545 |
} |
545 |
} |
546 |
|
546 |
|
547 |
# Check the transit status |
547 |
# Check the transit status |
548 |
my ( $transfertwhen, $transfertfrom, $transfertto ) = |
548 |
my $transfer = $item_object->get_transfer; |
549 |
GetTransfers($itemnumber); |
549 |
if ( $transfer && $transfer->in_transit ) { |
550 |
|
550 |
$item->{transfertwhen} = output_pref({ dt => dt_from_string($transfer->datesent), dateonly => 1 }); |
551 |
if ( defined $transfertwhen && $transfertwhen ne '' ) { |
551 |
$item->{transfertfrom} = $transfer->frombranch; |
552 |
$item->{transfertwhen} = output_pref({ dt => dt_from_string( $transfertwhen ), dateonly => 1 }); |
552 |
$item->{transfertto} = $transfer->tobranch; |
553 |
$item->{transfertfrom} = $transfertfrom; |
|
|
554 |
$item->{transfertto} = $transfertto; |
555 |
$item->{nocancel} = 1; |
553 |
$item->{nocancel} = 1; |
556 |
} |
554 |
} |
557 |
|
555 |
|
558 |
- |
|
|