From: miker Date: Thu, 29 Mar 2007 17:06:21 +0000 (+0000) Subject: checking for billing completeness as well as checkin completeness for SC display X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=dcc547b6c23b10de914164040958ff75aef036eb;p=Evergreen.git checking for billing completeness as well as checkin completeness for SC display git-svn-id: svn://svn.open-ils.org/ILS/trunk@7123 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/actor.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/actor.pm index 61b0c13c6c..ef9f28b102 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/actor.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/actor.pm @@ -70,7 +70,7 @@ sub usr_breakdown_out { my $lost_sql = <<" SQL"; SELECT id FROM action.circulation - WHERE usr = ? AND checkin_time IS NULL AND stop_fines = 'LOST' + WHERE usr = ? AND checkin_time IS NULL AND xact_finish IS NULL AND stop_fines = 'LOST' SQL my $lost = actor::user->db_Main->selectcol_arrayref($lost_sql, {}, $usr); @@ -78,7 +78,7 @@ sub usr_breakdown_out { my $cl_sql = <<" SQL"; SELECT id FROM action.circulation - WHERE usr = ? AND checkin_time IS NULL AND stop_fines = 'CLAIMSRETURNED' + WHERE usr = ? AND checkin_time IS NULL AND xact_finish IS NULL AND stop_fines = 'CLAIMSRETURNED' SQL my $cl = actor::user->db_Main->selectcol_arrayref($cl_sql, {}, $usr);