From: Bill Erickson Date: Mon, 3 Nov 2014 22:55:00 +0000 (-0500) Subject: LP#1203734 copy circ counts include anon. circs X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=94bb8dd2dbfc0fb47e803bdfca10928e610f03d8;p=evergreen%2Fpines.git LP#1203734 copy circ counts include anon. circs Circ counts displayed on "Show Last Few Circulations" (XUL) includes active, anonymized, and legacy circulations (via cstore) Signed-off-by: Bill Erickson --- diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/asset.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/asset.pm index f95338fb75..f5e3279a3b 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/asset.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/asset.pm @@ -13,46 +13,6 @@ my $log = 'OpenSRF::Utils::Logger'; use MARC::Record; use MARC::File::XML ( BinaryEncoding => 'UTF-8' ); -sub circ_count { - my $self = shift; - my $client = shift; - my $copy = shift; - my $granularity = shift; - - my $c_table = action::circulation->table; - - if (lc($granularity) eq 'year') { - $granularity = ", to_char(xact_start, 'YYYY') as when"; - } elsif (lc($granularity) eq 'month') { - $granularity = ", to_char(xact_start, 'YYYY-MM') as when"; - } elsif (lc($granularity) eq 'day') { - $granularity = ", to_char(xact_start, 'YYYY-MM-DD') as when"; - } else { - $granularity = ", 'total' as when"; - } - - my $SQL = <<" SQL"; - SELECT COUNT(*) as count $granularity - FROM $c_table - WHERE target_copy = ? - SQL - - - if ($granularity !~ /total/o) { - $SQL .= ' GROUP BY 2 ORDER BY 2'; - } - - $log->debug("Circ count SQL [$SQL]", DEBUG); - - return action::circulation->db_Main->selectall_hashref($SQL, 'when', {}, $copy); -} -__PACKAGE__->register_method( - method => 'circ_count', - api_name => 'open-ils.storage.asset.copy.circ_count', - argc => 1, -); - - #our $_default_subfield_map = { # call_number => $cn, # barcode => $bc,