| Lines 23-29
          use CGI;
      
      
        Link Here | 
        
          | 23 | use JSON qw(to_json); | 23 | use JSON qw(to_json); | 
        
          | 24 |  | 24 |  | 
        
          | 25 | use C4::Auth qw(check_cookie_auth); | 25 | use C4::Auth qw(check_cookie_auth); | 
          
            
              | 26 | use C4::Biblio qw(GetMarcBiblio GetFrameworkCode GetRecordValue ); | 26 | use C4::Biblio qw(SplitSubtitle); | 
        
          | 27 | use C4::Charset; | 27 | use C4::Charset; | 
        
          | 28 | use C4::Circulation qw(GetTransfers); | 28 | use C4::Circulation qw(GetTransfers); | 
        
          | 29 | use C4::Context; | 29 | use C4::Context; | 
  
    | Lines 84-94
          while ( my $h = $holds_rs->next() ) {
      
      
        Link Here | 
        
          | 84 |     for my $library ( @$libraries ) { | 84 |     for my $library ( @$libraries ) { | 
        
          | 85 |         $library->{selected} = 1 if $library->{branchcode} eq $h->branchcode(); | 85 |         $library->{selected} = 1 if $library->{branchcode} eq $h->branchcode(); | 
        
          | 86 |     } | 86 |     } | 
            
              |  |  | 87 |  | 
            
              | 88 |     my $biblio = $h->biblio(); | 
        
          | 87 |     my $hold = { | 89 |     my $hold = { | 
        
          | 88 |         DT_RowId       => $h->reserve_id(), | 90 |         DT_RowId       => $h->reserve_id(), | 
        
          | 89 |         biblionumber   => $biblionumber, | 91 |         biblionumber   => $biblionumber, | 
          
            
              | 90 |         title          => $h->biblio()->title(), | 92 |         title          => $biblio->title(), | 
            
              | 91 |         author         => $h->biblio()->author(), | 93 |         subtitle       => C4::Biblio::SplitSubtitles($biblio->subtitle()), | 
            
              |  |  | 94 |         medium         => $biblio->medium(), | 
            
              | 95 |         part_number    => $biblio->part_number(), | 
            
              | 96 |         part_name      => $biblio->part_name(), | 
            
              | 97 |         author         => $biblio->author(), | 
        
          | 92 |         reserve_id     => $h->reserve_id(), | 98 |         reserve_id     => $h->reserve_id(), | 
        
          | 93 |         branchcode     => $h->branch()->branchname(), | 99 |         branchcode     => $h->branch()->branchname(), | 
        
          | 94 |         branches       => $libraries, | 100 |         branches       => $libraries, | 
  
    | Lines 102-112
          while ( my $h = $holds_rs->next() ) {
      
      
        Link Here | 
        
          | 102 |         waiting_here   => $h->branch()->branchcode() eq $branch, | 108 |         waiting_here   => $h->branch()->branchcode() eq $branch, | 
        
          | 103 |         priority       => $h->priority(), | 109 |         priority       => $h->priority(), | 
        
          | 104 |         itemtype_limit => $itemtype_limit, | 110 |         itemtype_limit => $itemtype_limit, | 
            
              | 105 |         subtitle       => GetRecordValue( |  |  | 
            
              | 106 |             'subtitle', | 
            
              | 107 |             GetMarcBiblio({ biblionumber => $biblionumber }), | 
            
              | 108 |             GetFrameworkCode($biblionumber) | 
            
              | 109 |         ), | 
        
          | 110 |         reservedate_formatted => $h->reservedate() ? output_pref( | 111 |         reservedate_formatted => $h->reservedate() ? output_pref( | 
        
          | 111 |             { dt => dt_from_string( $h->reservedate() ), dateonly => 1 } | 112 |             { dt => dt_from_string( $h->reservedate() ), dateonly => 1 } | 
        
          | 112 |           ) | 113 |           ) |