| Lines 6-12
          use t::lib::Mocks;
      
      
        Link Here | 
        
          | 6 | use C4::Context; | 6 | use C4::Context; | 
        
          | 7 | use C4::Branch; | 7 | use C4::Branch; | 
        
          | 8 |  | 8 |  | 
          
            
              | 9 | use Test::More tests => 51; | 9 | use Test::More tests => 56; | 
        
          | 10 | use MARC::Record; | 10 | use MARC::Record; | 
        
          | 11 | use C4::Biblio; | 11 | use C4::Biblio; | 
        
          | 12 | use C4::Items; | 12 | use C4::Items; | 
  
    | Lines 70-76
          foreach my $borrowernumber ( @borrowernumbers ) {
      
      
        Link Here | 
        
          | 70 |         $borrowernumber, | 70 |         $borrowernumber, | 
        
          | 71 |         $biblionumber, | 71 |         $biblionumber, | 
        
          | 72 |         my $bibitems = q{}, | 72 |         my $bibitems = q{}, | 
          
            
              | 73 |         my $priority, | 73 |         my $priority = 1, | 
        
          | 74 |         my $resdate, | 74 |         my $resdate, | 
        
          | 75 |         my $expdate, | 75 |         my $expdate, | 
        
          | 76 |         my $notes = q{}, | 76 |         my $notes = q{}, | 
  
    | Lines 80-89
          foreach my $borrowernumber ( @borrowernumbers ) {
      
      
        Link Here | 
        
          | 80 |     ); | 80 |     ); | 
        
          | 81 | } | 81 | } | 
        
          | 82 |  | 82 |  | 
            
              | 83 |  |  |  | 
        
          | 84 | my $reserves = GetReservesFromBiblionumber({ biblionumber => $biblionumber }); | 83 | my $reserves = GetReservesFromBiblionumber({ biblionumber => $biblionumber }); | 
        
          | 85 | is( scalar(@$reserves), $borrowers_count, "Test GetReserves()" ); | 84 | is( scalar(@$reserves), $borrowers_count, "Test GetReserves()" ); | 
        
          | 86 |  | 85 |  | 
            
              |  |  | 86 | is( $reserves->[0]->{priority}, 1, "Reserve 1 has a priority of 1" ); | 
            
              | 87 | is( $reserves->[1]->{priority}, 2, "Reserve 2 has a priority of 2" ); | 
            
              | 88 | is( $reserves->[2]->{priority}, 3, "Reserve 3 has a priority of 3" ); | 
            
              | 89 | is( $reserves->[3]->{priority}, 4, "Reserve 4 has a priority of 4" ); | 
            
              | 90 | is( $reserves->[4]->{priority}, 5, "Reserve 5 has a priority of 5" ); | 
        
          | 87 |  | 91 |  | 
        
          | 88 | my ( $reservedate, $borrowernumber, $branchcode, $reserve_id ) = GetReservesFromItemnumber($itemnumber); | 92 | my ( $reservedate, $borrowernumber, $branchcode, $reserve_id ) = GetReservesFromItemnumber($itemnumber); | 
        
          | 89 | is( $reservedate, output_pref({ dt => dt_from_string, dateformat => 'iso', dateonly => 1 }), "GetReservesFromItemnumber should return a valid reserve date"); | 93 | is( $reservedate, output_pref({ dt => dt_from_string, dateformat => 'iso', dateonly => 1 }), "GetReservesFromItemnumber should return a valid reserve date"); | 
            
              | 90 | -  |  |  |