diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm index a4c7c01a21..a8eb1d08f1 100644 --- a/C4/Reports/Guided.pm +++ b/C4/Reports/Guided.pm @@ -83,8 +83,12 @@ my $AREA_NAME_SQL_SNIPPET = "CASE report_area " . join (" ", map "WHEN '$_->[0]' THEN '$_->[1]'", @REPORT_AREA) . " END AS areaname"; + sub get_report_areas { - return \@REPORT_AREA + + my $report_areas = [ 'CIRC', 'CAT', 'PAT', 'ACQ', 'ACC' ]; + + return $report_areas; } my %table_areas = ( diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/reports/dictionary.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/reports/dictionary.tt index ee40dcf278..7ca9c82a46 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/reports/dictionary.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/reports/dictionary.tt @@ -8,6 +8,16 @@ [% INCLUDE 'header.inc' %] [% INCLUDE 'circ-search.inc' %] +[%- BLOCK area_name -%] + [%- SWITCH area -%] + [%- CASE 'CIRC' -%]Circulation + [%- CASE 'CAT' -%]Catalog + [%- CASE 'PAT' -%]Patrons + [%- CASE 'ACQ' -%]Acquisitions + [%- CASE 'ACC' -%]Accounts + [%- END -%] +[%- END -%] +