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

(-)a/catalogue/detail.pl (-7 / +5 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 347-357 foreach my $item (@items) { Link Here
347
    }
346
    }
348
347
349
    # Check the transit status
348
    # Check the transit status
350
    my ( $transfertwhen, $transfertfrom, $transfertto ) = GetTransfers($item->{itemnumber});
349
    my $transfer = $item_object->get_transfer;
351
    if ( defined( $transfertwhen ) && ( $transfertwhen ne '' ) ) {
350
    if ( $transfer->in_transit ) {
352
        $item->{transfertwhen} = $transfertwhen;
351
        $item->{transfertwhen} = output_pref({ dt => dt_from_string($transfer->datesent), dateonly => 1 });
353
        $item->{transfertfrom} = $transfertfrom;
352
        $item->{transfertfrom} = $transfer->frombranch;
354
        $item->{transfertto}   = $transfertto;
353
        $item->{transfertto} = $transfer->tobranch;
355
        $item->{nocancel} = 1;
354
        $item->{nocancel} = 1;
356
    }
355
    }
357
356
358
- 

Return to bug 24295