Revision 152d10ef
Von Niclas Zimmermann vor mehr als 11 Jahren hinzugefügt
| SL/Auth.pm | ||
|---|---|---|
|
["email_bcc", $locale->text("May set the BCC field when sending emails")],
|
||
|
["config", $locale->text("Change kivitendo installation settings (all menu entries beneath 'System')")],
|
||
|
["admin", $locale->text("Administration (Used to access instance administration from user logins)")],
|
||
|
["productivity", $locale->text("Productivity")],
|
||
|
["display_admin_link", $locale->text("Show administration link")],
|
||
|
);
|
||
|
|
||
|
return @all_rights;
|
||
| bin/mozilla/fu.pl | ||
|---|---|---|
|
sub _collect_links {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $dest = shift;
|
||
|
|
||
|
my $form = $main::form;
|
||
| ... | ... | |
|
sub add {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
my %myconfig = %main::myconfig;
|
||
|
my $locale = $main::locale;
|
||
| ... | ... | |
|
sub edit {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
| ... | ... | |
|
sub display_form {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
|
||
|
$form->get_lists("employees" => "EMPLOYEES");
|
||
| ... | ... | |
|
sub save_follow_up {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
| ... | ... | |
|
sub finish {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
| ... | ... | |
|
sub delete {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
| ... | ... | |
|
sub search {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
| ... | ... | |
|
sub report {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
my %myconfig = %main::myconfig;
|
||
|
my $locale = $main::locale;
|
||
| ... | ... | |
|
sub report_for_todo_list {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
|
||
|
my @report_params = qw(created_for subject body reference follow_up_date_from follow_up_date_to itime_from itime_to due_only all_users done not_done);
|
||
| ... | ... | |
|
sub edit_access_rights {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
| ... | ... | |
|
sub save_access_rights {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
| ... | ... | |
|
}
|
||
|
|
||
|
sub save {
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
if ($main::form->{save_nextsub}) {
|
||
|
call_sub($main::form->{save_nextsub});
|
||
|
} else {
|
||
| bin/mozilla/login.pl | ||
|---|---|---|
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
my %myconfig = %main::myconfig;
|
||
|
$form->{todo_list} = create_todo_list('login_screen' => 1) if (!$form->{no_todo_list}) and ($main::auth->check_right($form->{login}, 'productivity'));
|
||
|
$form->{todo_list} = create_todo_list('login_screen' => 1) if (!$form->{no_todo_list});
|
||
|
|
||
|
$form->{stylesheet} = $myconfig{stylesheet};
|
||
|
$form->{title} = $::locale->text('kivitendo');
|
||
| bin/mozilla/todo.pl | ||
|---|---|---|
|
sub create_todo_list {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
|
||
|
my %params = @_;
|
||
| ... | ... | |
|
sub show_todo_list {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
| ... | ... | |
|
sub todo_list_follow_ups {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
require "bin/mozilla/fu.pl";
|
||
|
|
||
|
my $content = report_for_todo_list();
|
||
| ... | ... | |
|
sub todo_list_overdue_sales_quotations {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
|
||
|
$main::auth->assert('productivity');
|
||
|
|
||
|
require "bin/mozilla/oe.pl";
|
||
|
|
||
|
my $content = report_for_todo_list();
|
||
| doc/changelog | ||
|---|---|---|
|
|
||
|
Kleinere neue Features und Detailverbesserungen:
|
||
|
|
||
|
- Recht für Produktivität und für Anzeige des Links zum Administrationsmenü
|
||
|
Man kann den gesamten Produktivitätsbereich jetzt nur noch nutzen, wenn man die entsprechenden Rechte hat.
|
||
|
Auch der Link Unter dem Menü-Punkt Programm zum Administrationsmenü wird jetzt nur noch
|
||
|
angezeigt, wenn man entsprechendes Recht hat.
|
||
|
Durch ein Upgrade wird allerdings bei schon bestehenden Benutzern automatisch die oben genannten beiden Rechte
|
||
|
gesetzt, so dass alle die Produktivität vorher nutzen durften auch weiterhin nutzen dürfen, bzw. so dass
|
||
|
bei allen, bei denen der Link auf das Admin-Menü angezeigt wurde, er auch weiterhin angezeigt wird.
|
||
|
|
||
|
- Stückliste für Lieferschein ausdrucken
|
||
|
Stücklisten-Details (Haken bei Warenliste) für Erzeugnisse wurden seit 2009
|
||
|
(TEMPLATE_ARRAY Änderung) nicht mehr ausgedruckt,
|
||
| locale/de/all | ||
|---|---|---|
|
'Show Salesman' => 'Verkäufer anzeigen',
|
||
|
'Show TODO list' => 'Aufgabenliste anzeigen',
|
||
|
'Show Transfer via default' => 'Ein- / Auslagern über Standardlagerplatz anzeigen',
|
||
|
'Show administration link' => 'Link zur Administration anzeigen',
|
||
|
'Show by default' => 'Standardmäßig anzeigen',
|
||
|
'Show custom variable search inputs' => 'Suchoptionen für Benutzerdefinierte Variablen verstecken',
|
||
|
'Show delete button in purchase delivery orders?' => 'Soll der "Löschen"-Knopf bei Einkaufslieferscheinen angezeigt werden?',
|
||
| menu.ini | ||
|---|---|---|
|
|
||
|
|
||
|
[Productivity]
|
||
|
ACCESS=productivity
|
||
|
|
||
|
[Productivity--Show TODO list]
|
||
|
module=todo.pl
|
||
| ... | ... | |
|
action=config
|
||
|
|
||
|
[Program--Administration area]
|
||
|
ACCESS=display_admin_link
|
||
|
module=admin.pl
|
||
|
action=login
|
||
|
|
||
| sql/Pg-upgrade2/productivity_rights.pl | ||
|---|---|---|
|
# @tag: productivity_rights
|
||
|
# @description: Setzt das Recht die Produktivität einzusehen und das Recht den Link zum Admin-Menü anzuzeigen wieder wie vorher
|
||
|
# @depends: release_3_0_0
|
||
|
package SL::DBUpgrade2::productivity_rights;
|
||
|
|
||
|
use strict;
|
||
|
use utf8;
|
||
|
|
||
|
use parent qw(SL::DBUpgrade2::Base);
|
||
|
|
||
|
use SL::DBUtils;
|
||
|
|
||
|
sub run {
|
||
|
my ($self) = @_;
|
||
|
|
||
|
my $groups = $main::auth->read_groups();
|
||
|
|
||
|
foreach my $group (values %{$groups}) {
|
||
|
$group->{rights}->{productivity} = 1 unless defined $group->{rights}->{productivity};
|
||
|
$group->{rights}->{display_admin_link} = 1 unless defined $group->{rights}->{display_admin_link};
|
||
|
$main::auth->save_group($group);
|
||
|
}
|
||
|
|
||
|
return 1;
|
||
|
} # end run
|
||
|
|
||
|
1;
|
||
Auch abrufbar als: Unified diff
Revert "Recht für Anzeige der Produktivität"
This reverts commit a27cd427a2689b49a7642884edd2d24555305a4b.