From: Werner Hahn <wh@futureworldsearch.net>
Date: Tue, 11 Sep 2018 10:35:06 +0000 (+0200)
Subject: Kundenstatistik: Rechte abgefragt
X-Git-Tag: release-3.5.4~280
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=94ebf17421d5c36082909c1b01c7a6b8b1540493;p=kivitendo-erp.git

Kundenstatistik: Rechte abgefragt
---

diff --git a/SL/Controller/CustomerVendorTurnover.pm b/SL/Controller/CustomerVendorTurnover.pm
index 5356a73a0..102c27a09 100644
--- a/SL/Controller/CustomerVendorTurnover.pm
+++ b/SL/Controller/CustomerVendorTurnover.pm
@@ -9,6 +9,7 @@ use SL::DB::EmailJournal;
 use SL::DB::Letter;
 use SL::DB;
 
+__PACKAGE__->run_before('check_auth');
 
 sub action_list_turnover {
   my ($self) = @_;
@@ -95,7 +96,7 @@ sub action_count_open_items_by_month {
 
   my $cv = $::form->{id};
 
-  my $query = <<SQL
+  my $query = <<SQL;
    SELECT CONCAT(EXTRACT (MONTH FROM d.transdate),'/',EXTRACT (YEAR FROM d.transdate)) AS date_part,
           count(d.id),
           max(d.dunning_level)
@@ -440,6 +441,10 @@ sub action_get_letters {
     $self->render('customer_vendor_turnover/letter_statistic', { layout => 0 }, letters => $letters);
 }
 
+sub check_auth {
+  $::auth->assert('show_extra_record_tab_customer | show_extra_record_tab_vendor');
+}
+
 1;
 
 __END__