[open-ils-commits] [GIT] Evergreen ILS branch master updated. ceeea809f0f5fedd694b8d18fc03dd1bcc1a174f

[Evergreen Git]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Evergreen ILS".

The branch, master has been updated
       via  ceeea809f0f5fedd694b8d18fc03dd1bcc1a174f (commit)
      from  1ad56082788211d91030f47147efbbfd3e4be77e (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit ceeea809f0f5fedd694b8d18fc03dd1bcc1a174f
Author: Bill Erickson <berick at esilibrary.com>
Date:   Tue Oct 18 16:22:25 2011 -0400

    Further support for "circ.collections.exempt" setting
    
    Added support for skipping users that have the
    "circ.collections.exempt" setting in the API call:
    
    open-ils.collections.users_of_interest.warning_penalty.retrieve
    
    This call is an alternate entry point for finding users to consider
    for collections processing
    
    Signed-off-by: Bill Erickson <berick at esilibrary.com>
    Signed-off-by: Mike Rylander <mrylander at gmail.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Collections.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Collections.pm
index 03b6b68..e5da73c 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Collections.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Collections.pm
@@ -209,14 +209,30 @@ sub users_of_interest_warning_penalty {
     my $start = time;
     my $query = {
         select => {ausp => ['usr']},
-        from => 'ausp',
+        from => {
+            ausp => {
+                au => {
+                    join => {
+                        aus => {
+                            type => 'left',
+                            filter => {name => 'circ.collections.exempt'}
+                        }
+                    }
+                }
+            }
+        },
         where => {
-            standing_penalty => 4, # PATRON_EXCEEDS_COLLECTIONS_WARNING
-            org_unit => [ map {$_->{id}} @$org_ids ],
-            '-or' => [
-                {stop_date => undef},
-                {stop_date => {'>' => 'now'}}
-            ]
+            '+ausp' => {
+                standing_penalty => 4, # PATRON_EXCEEDS_COLLECTIONS_WARNING
+                org_unit => [ map {$_->{id}} @$org_ids ],
+                '-or' => [
+                    {stop_date => undef},
+                    {stop_date => {'>' => 'now'}}
+                ]
+            },
+            # We are only interested in users that do not have the 
+            # circ.collections.exempt setting applied
+            '+aus' => {value => undef}
         }
     };
 

-----------------------------------------------------------------------

Summary of changes:
 .../lib/OpenILS/Application/Collections.pm         |   30 +++++++++++++++----
 1 files changed, 23 insertions(+), 7 deletions(-)


hooks/post-receive
-- 
Evergreen ILS