| Lines 26-38
          use C4::Biblio qw(
      
      
        Link Here | 
        
          | 26 |     GetMarcSubjects | 26 |     GetMarcSubjects | 
        
          | 27 |     GetMarcUrls | 27 |     GetMarcUrls | 
        
          | 28 | ); | 28 | ); | 
            
              | 29 | use C4::Circulation qw( GetTransfers ); |  |  | 
        
          | 30 | use C4::Auth qw( get_template_and_user ); | 29 | use C4::Auth qw( get_template_and_user ); | 
        
          | 31 | use C4::Output qw( output_html_with_http_headers ); | 30 | use C4::Output qw( output_html_with_http_headers ); | 
        
          | 32 | use Koha::RecordProcessor; | 31 | use Koha::RecordProcessor; | 
        
          | 33 | use Koha::CsvProfiles; | 32 | use Koha::CsvProfiles; | 
        
          | 34 | use Koha::AuthorisedValues; | 33 | use Koha::AuthorisedValues; | 
        
          | 35 | use Koha::Biblios; | 34 | use Koha::Biblios; | 
            
              |  |  | 35 | use Koha::Items; | 
        
          | 36 |  | 36 |  | 
        
          | 37 | my $query = CGI->new; | 37 | my $query = CGI->new; | 
        
          | 38 |  | 38 |  | 
  
    | Lines 124-134
          foreach my $biblionumber ( @bibs ) {
      
      
        Link Here | 
        
          | 124 |         if ($itm->{'location'}){ | 124 |         if ($itm->{'location'}){ | 
        
          | 125 |             $itm->{'location_opac'} = $shelflocations->{$itm->{'location'} }; | 125 |             $itm->{'location_opac'} = $shelflocations->{$itm->{'location'} }; | 
        
          | 126 |         } | 126 |         } | 
          
            
              | 127 |         my ( $transfertwhen, $transfertfrom, $transfertto ) = GetTransfers($itm->{itemnumber}); | 127 |         my $item_object = Koha::Items->find($itm->{itemnumber}); | 
            
              | 128 |         if ( defined( $transfertwhen ) && $transfertwhen ne '' ) { | 128 |         my $transfer = $item_object->get_transfer; | 
            
              | 129 |              $itm->{transfertwhen} = $transfertwhen; | 129 |         if ( $transfer && $transfer->in_transit ) { | 
            
              | 130 |              $itm->{transfertfrom} = $transfertfrom; | 130 |             $itm->{transfertwhen} = $transfer->datesent; | 
            
              | 131 |              $itm->{transfertto}   = $transfertto; | 131 |             $itm->{transfertfrom} = $transfer->frombranch; | 
            
              |  |  | 132 |             $itm->{transfertto} = $transfer->tobranch; | 
        
          | 132 |         } | 133 |         } | 
        
          | 133 |     } | 134 |     } | 
        
          | 134 |     $num++; | 135 |     $num++; | 
            
              | 135 | -  |  |  |