From 71c6815326776fe0df37c4a5d36c4d4b32071c6c 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 Signed-off-by: Kathy Lussier --- 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