|
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 ); |
41 |
use Koha::DateUtils qw( dt_from_string ); |
| 42 |
use C4::Search qw( enabled_staff_search_views ); |
42 |
use C4::Search qw( enabled_staff_search_views ); |
| 43 |
|
43 |
|
|
Lines 450-462
if ( ( $findborrower && $borrowernumber_hold || $findclub && $club_hold )
Link Here
|
| 450 |
} |
450 |
} |
| 451 |
|
451 |
|
| 452 |
# Check the transit status |
452 |
# Check the transit status |
| 453 |
my ( $transfertwhen, $transfertfrom, $transfertto ) = |
453 |
my $transfer = $item_object->get_transfer; |
| 454 |
GetTransfers($item_object->itemnumber); # FIXME replace with get_transfer |
454 |
if ( $transfer && $transfer->in_transit ) { |
| 455 |
|
455 |
$item->{transfertwhen} = $transfer->datesent; |
| 456 |
if ( defined $transfertwhen && $transfertwhen ne '' ) { |
456 |
$item->{transfertfrom} = $transfer->frombranch; |
| 457 |
$item->{transfertwhen} = $transfertwhen; |
457 |
$item->{transfertto} = $transfer->tobranch; |
| 458 |
$item->{transfertfrom} = $transfertfrom; |
|
|
| 459 |
$item->{transfertto} = $transfertto; |
| 460 |
$item->{nocancel} = 1; |
458 |
$item->{nocancel} = 1; |
| 461 |
} |
459 |
} |
| 462 |
|
460 |
|
| 463 |
- |
|
|