| Lines 8-14
          use POSIX qw(strftime);
      
      
        Link Here | 
        
          | 8 |  | 8 |  | 
        
          | 9 | use C4::Bookseller qw( GetBookSellerFromId ); | 9 | use C4::Bookseller qw( GetBookSellerFromId ); | 
        
          | 10 |  | 10 |  | 
          
            
              | 11 | use Test::More tests => 62; | 11 | use Test::More tests => 64; | 
        
          | 12 |  | 12 |  | 
        
          | 13 | BEGIN { | 13 | BEGIN { | 
        
          | 14 |     use_ok('C4::Acquisition'); | 14 |     use_ok('C4::Acquisition'); | 
  
    | Lines 223-226
          is($order3->{'quantityreceived'}, 2, 'Order not split up');
      
      
        Link Here | 
        
          | 223 | is($order3->{'quantity'}, 2, '2 items on order'); | 223 | is($order3->{'quantity'}, 2, '2 items on order'); | 
        
          | 224 | is($order3->{'budget_id'}, $budgetid2, 'Budget has changed'); | 224 | is($order3->{'budget_id'}, $budgetid2, 'Budget has changed'); | 
        
          | 225 |  | 225 |  | 
            
              |  |  | 226 | my $nonexistent_order = GetOrder(); | 
            
              | 227 | is( $nonexistent_order, undef, 'GetOrder returns undef if no ordernumber is given' ); | 
            
              | 228 | $nonexistent_order = GetOrder( 424242424242 ); | 
            
              | 229 | is( $nonexistent_order, undef, 'GetOrder return undef if a nonexistent ordernumber is given' ); | 
            
              | 230 |  | 
        
          | 226 | $dbh->rollback; | 231 | $dbh->rollback; | 
            
              | 227 | -  |  |  |