| Lines 106-112
          my @test_data = (
      
      
        Link Here | 
        
          | 106 |     { amount => -5    , days_ago => $days + 1 , description =>'purge_zero_balance_fees should not delete fees with negative amout owed after threshold day'  , delete => 0 } | 106 |     { amount => -5    , days_ago => $days + 1 , description =>'purge_zero_balance_fees should not delete fees with negative amout owed after threshold day'  , delete => 0 } | 
        
          | 107 | ); | 107 | ); | 
        
          | 108 |  | 108 |  | 
          
            
              | 109 | my $borrower = Koha::Patron->new( { firstname => 'Test', surname => 'Patron', categorycode => 'PT', branchcode => 'MPL' } )->store(); | 109 | my $borrower = Koha::Patron->new( { firstname => 'Test', surname => 'Patron', categorycode => 'PT', branchcode => $branchcode } )->store(); | 
        
          | 110 |  | 110 |  | 
        
          | 111 | for my $data ( @test_data ) { | 111 | for my $data ( @test_data ) { | 
        
          | 112 |     $sth->execute($borrower->borrowernumber, $data->{amount}, $data->{days_ago}, $data->{description}); | 112 |     $sth->execute($borrower->borrowernumber, $data->{amount}, $data->{days_ago}, $data->{description}); | 
            
              | 113 | -  |  |  |