From 98bc024609b97f870a710ddca9e77d6dee66a4e2 Mon Sep 17 00:00:00 2001 From: Ryan Higgins Date: Thu, 5 Jun 2008 12:15:06 -0500 Subject: [PATCH] Add Collection code limit to issues_stats report. Signed-off-by: Joshua Ferraro --- .../prog/en/modules/reports/issues_stats.tmpl | 36 ++++++++++++------- reports/issues_stats.pl | 7 ++++ 2 files changed, 31 insertions(+), 12 deletions(-) diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/reports/issues_stats.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/reports/issues_stats.tmpl index c657b2fece..43e9a03462 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/reports/issues_stats.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/reports/issues_stats.tmpl @@ -185,18 +185,6 @@ - - Patron Category - - - - - - Item Type - - - - Library @@ -209,6 +197,30 @@ + + Patron Category + + + + + + Item Type + + + + + + Collection + + + + + Shelving Location diff --git a/reports/issues_stats.pl b/reports/issues_stats.pl index 6147bb9134..4b2acfff9e 100755 --- a/reports/issues_stats.pl +++ b/reports/issues_stats.pl @@ -202,6 +202,12 @@ if ($do_it) { foreach (sort keys %$locations) { push @locations, { code => $_, description => "$_ - " . $locations->{$_} }; } + + my $ccodes = GetKohaAuthorisedValues("items.ccode"); + my @ccodes; + foreach (keys %$ccodes) { + push @ccodes, { code => $_, description => $ccodes->{$_} }; + } # various my @mime = ( C4::Context->preference("MIME") ); @@ -232,6 +238,7 @@ if ($do_it) { CGIextChoice => $CGIextChoice, CGIsepChoice => $CGIsepChoice, locationloop => \@locations, + ccodeloop => \@ccodes, branchloop => \@branchloop, ); output_html_with_http_headers $input, $cookie, $template->output; -- 2.20.1