From 916aae37796feb1b4bf42eaf548cbea1f1f05de9 Mon Sep 17 00:00:00 2001 From: Niclas Zimmermann Date: Mon, 5 Aug 2013 14:25:17 +0200 Subject: [PATCH] =?utf8?q?Recht=20f=C3=BCr=20EK-/VK-Rechnungen=20funktioni?= =?utf8?q?erte=20nicht?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Man konnte sich bisher, auch ohne das Recht zu besitzen, eine Liste von Kreditoren-/Debitorenbelegen erstellen, indem man folgenden Link aufgerufen hat: ar.pl?action=search (dann auf weiter) oder direkt: ar.pl?action=ar_transactions Die Ursache hierfür war, dass das Recht "Dialogbuchen, Debitoren- rechnungen, Kreditorenrechnungen" ausreichte, um die oben ge- nannten actions aufzurufen. --- bin/mozilla/ap.pl | 4 ++-- bin/mozilla/ar.pl | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl index 4531e99a9..d0eeb4f9d 100644 --- a/bin/mozilla/ap.pl +++ b/bin/mozilla/ap.pl @@ -795,7 +795,7 @@ sub yes { sub search { $main::lxdebug->enter_sub(); - $main::auth->assert('general_ledger | vendor_invoice_edit'); + $main::auth->assert('vendor_invoice_edit'); my $form = $main::form; my %myconfig = %main::myconfig; @@ -847,7 +847,7 @@ sub ap_transactions { my %myconfig = %main::myconfig; my $locale = $main::locale; - $main::auth->assert('general_ledger | vendor_invoice_edit'); + $main::auth->assert('vendor_invoice_edit'); ($form->{vendor}, $form->{vendor_id}) = split(/--/, $form->{vendor}); diff --git a/bin/mozilla/ar.pl b/bin/mozilla/ar.pl index 038e59ea1..cec9db7a6 100644 --- a/bin/mozilla/ar.pl +++ b/bin/mozilla/ar.pl @@ -827,7 +827,7 @@ sub yes { sub search { $main::lxdebug->enter_sub(); - $main::auth->assert('general_ledger | invoice_edit'); + $main::auth->assert('invoice_edit'); my $form = $main::form; my %myconfig = %main::myconfig; @@ -880,7 +880,7 @@ sub create_subtotal_row { sub ar_transactions { $main::lxdebug->enter_sub(); - $main::auth->assert('general_ledger | invoice_edit'); + $main::auth->assert('invoice_edit'); my $form = $main::form; my %myconfig = %main::myconfig; -- 2.20.1