Lines 512-531
sub UpdateFine {
Link Here
|
512 |
|
512 |
|
513 |
my $offset = 0; |
513 |
my $offset = 0; |
514 |
if ($fine) { |
514 |
if ($fine) { |
515 |
if ( |
515 |
if ( $fine->accruing() ) { # Don't update or recreate fines no longer accruing |
516 |
sprintf( "%.6f", $fine->amount_original() ) |
516 |
if ( |
517 |
ne |
517 |
sprintf( "%.6f", $fine->amount_original() ) |
518 |
sprintf( "%.6f", $amount ) ) |
518 |
ne |
519 |
{ |
519 |
sprintf( "%.6f", $amount ) ) |
520 |
my $difference = $amount - $fine->amount_original(); |
520 |
{ |
|
|
521 |
my $difference = $amount - $fine->amount_original(); |
521 |
|
522 |
|
522 |
$fine->amount_original( $fine->amount_original() + $difference ); |
523 |
$fine->amount_original( $fine->amount_original() + $difference ); |
523 |
$fine->amount_outstanding( $fine->amount_outstanding() + $difference ); |
524 |
$fine->amount_outstanding( $fine->amount_outstanding() + $difference ); |
524 |
$fine->amount_last_increment($difference); |
525 |
$fine->amount_last_increment($difference); |
525 |
$fine->updated_on($timestamp); |
526 |
$fine->updated_on($timestamp); |
526 |
$fine->update(); |
527 |
$fine->update(); |
527 |
|
528 |
|
528 |
$offset = 1; |
529 |
$offset = 1; |
|
|
530 |
} |
529 |
} |
531 |
} |
530 |
} |
532 |
} |
531 |
else { |
533 |
else { |
532 |
- |
|
|