| Lines 551-557
          sub UpdateFine {
      
      
        Link Here | 
        
          | 551 |     while (my $rec = $sth->fetchrow_hashref) { | 551 |     while (my $rec = $sth->fetchrow_hashref) { | 
        
          | 552 |         if ( $rec->{issue_id} == $issue_id && $rec->{accounttype} eq 'FU' ) { | 552 |         if ( $rec->{issue_id} == $issue_id && $rec->{accounttype} eq 'FU' ) { | 
        
          | 553 |             if ($data) { | 553 |             if ($data) { | 
          
            
              | 554 |                 warn "Not a unique accountlines record for issue_id $issue_id"; | 554 |                 $debug and warn "Not a unique accountlines record for issue_id $issue_id"; | 
        
          | 555 |                 #FIXME Should we still count this one in total_amount ?? | 555 |                 #FIXME Should we still count this one in total_amount ?? | 
        
          | 556 |             } | 556 |             } | 
        
          | 557 |             else { | 557 |             else { | 
  
    | Lines 566-572
          sub UpdateFine {
      
      
        Link Here | 
        
          | 566 |         if ($total_amount_other + $amount > $maxfine) { | 566 |         if ($total_amount_other + $amount > $maxfine) { | 
        
          | 567 |             my $new_amount = $maxfine - $total_amount_other; | 567 |             my $new_amount = $maxfine - $total_amount_other; | 
        
          | 568 |             return if $new_amount <= 0.00; | 568 |             return if $new_amount <= 0.00; | 
          
            
              | 569 |             warn "Reducing fine for item $itemnum borrower $borrowernumber from $amount to $new_amount - MaxFine reached"; | 569 |             $debug and warn "Reducing fine for item $itemnum borrower $borrowernumber from $amount to $new_amount - MaxFine reached"; | 
        
          | 570 |             $amount = $new_amount; | 570 |             $amount = $new_amount; | 
        
          | 571 |         } | 571 |         } | 
        
          | 572 |     } | 572 |     } | 
            
              | 573 | -  |  |  |