View | Details | Raw Unified | Return to bug 24295
Collapse All | Expand All

(-)a/catalogue/detail.pl (-8 / +6 lines)
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 GetMarcBiblio );
35
use C4::Biblio qw( GetBiblioData GetFrameworkCode GetMarcBiblio );
36
use C4::Items qw( GetAnalyticsCount GetHostItemsInfo GetItemsInfo );
36
use C4::Items qw( GetAnalyticsCount GetHostItemsInfo GetItemsInfo );
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 42-48 use C4::External::Amazon qw( get_amazon_tld ); Link Here
42
use C4::Search qw( z3950_search_args enabled_staff_search_views new_record_from_zebra );
41
use C4::Search qw( z3950_search_args enabled_staff_search_views new_record_from_zebra );
43
use C4::Tags qw( get_tags );
42
use C4::Tags qw( get_tags );
44
use C4::XSLT qw( XSLTParse4Display );
43
use C4::XSLT qw( XSLTParse4Display );
45
use Koha::DateUtils qw( format_sqldatetime );
44
use Koha::DateUtils qw( format_sqldatetime output_pref );
46
use C4::HTML5Media;
45
use C4::HTML5Media;
47
use C4::CourseReserves qw( GetItemCourseReservesInfo );
46
use C4::CourseReserves qw( GetItemCourseReservesInfo );
48
use Koha::AuthorisedValues;
47
use Koha::AuthorisedValues;
Lines 345-355 foreach my $item (@items) { Link Here
345
    }
344
    }
346
345
347
    # Check the transit status
346
    # Check the transit status
348
    my ( $transfertwhen, $transfertfrom, $transfertto ) = GetTransfers($item->{itemnumber});
347
    my $transfer = $item_object->get_transfer;
349
    if ( defined( $transfertwhen ) && ( $transfertwhen ne '' ) ) {
348
    if ( $transfer && $transfer->in_transit ) {
350
        $item->{transfertwhen} = $transfertwhen;
349
        $item->{transfertwhen} = output_pref({ dt => dt_from_string($transfer->datesent) });
351
        $item->{transfertfrom} = $transfertfrom;
350
        $item->{transfertfrom} = $transfer->frombranch;
352
        $item->{transfertto}   = $transfertto;
351
        $item->{transfertto} = $transfer->tobranch;
353
        $item->{nocancel} = 1;
352
        $item->{nocancel} = 1;
354
    }
353
    }
355
354
356
- 

Return to bug 24295