From 94bb8dd2dbfc0fb47e803bdfca10928e610f03d8 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Mon, 3 Nov 2014 17:55:00 -0500 Subject: [PATCH] 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 --- .../OpenILS/Application/Storage/Publisher/asset.pm | 40 ---------------------- 1 file changed, 40 deletions(-) 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, -- 2.11.0