From 2fbde16abe26afaa4d551dda8447fce31bf30a80 Mon Sep 17 00:00:00 2001 From: Dan Wells Date: Fri, 14 Dec 2012 13:39:21 -0500 Subject: [PATCH] LP#1526547 Prevent bogus notes when adjusting lost/lod overdues If you void/adjust an overdue, but don't supply a reason, the code automatically adds "VOIDED FOR BACKDATE" to the billing note. This is obviously wrong for overdues adjusted or voided due to lost (or long overdue) processing. This commit simply adds a more appropriate note. Signed-off-by: Dan Wells --- Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm index 626595ba9b..50a4fc3262 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm @@ -815,7 +815,7 @@ sub set_item_lost_or_lod { # --------------------------------------------------------------------- # zero out overdue fines on this circ if configured if( $void_overdue ) { - my $evt = OpenILS::Application::Circ::CircCommon->void_or_zero_overdues($e, $circ, {force_zero => 1}); + my $evt = OpenILS::Application::Circ::CircCommon->void_or_zero_overdues($e, $circ, {force_zero => 1, note => "System: OVERDUE REVERSED for " . $args{bill_note} . " Processing"}); return $evt if $evt; } -- 2.11.0