Revision e0f5deea
Von Martin Helmling martin.helmling@octosoft.eu vor etwa 8 Jahren hinzugefügt
bin/mozilla/ar.pl | ||
---|---|---|
81 | 81 |
sub add { |
82 | 82 |
$main::lxdebug->enter_sub(); |
83 | 83 |
|
84 |
$main::auth->assert('general_ledger');
|
|
84 |
$main::auth->assert('ar_transactions');
|
|
85 | 85 |
|
86 | 86 |
my $form = $main::form; |
87 | 87 |
my %myconfig = %main::myconfig; |
... | ... | |
108 | 108 |
sub edit { |
109 | 109 |
$main::lxdebug->enter_sub(); |
110 | 110 |
|
111 |
$main::auth->assert('general_ledger');
|
|
111 |
$main::auth->assert('ar_transactions');
|
|
112 | 112 |
|
113 | 113 |
my $form = $main::form; |
114 | 114 |
|
... | ... | |
127 | 127 |
sub display_form { |
128 | 128 |
$main::lxdebug->enter_sub(); |
129 | 129 |
|
130 |
$main::auth->assert('general_ledger');
|
|
130 |
$main::auth->assert('ar_transactions');
|
|
131 | 131 |
|
132 | 132 |
my $form = $main::form; |
133 | 133 |
|
... | ... | |
146 | 146 |
sub create_links { |
147 | 147 |
$main::lxdebug->enter_sub(); |
148 | 148 |
|
149 |
$main::auth->assert('general_ledger');
|
|
149 |
$main::auth->assert('ar_transactions');
|
|
150 | 150 |
|
151 | 151 |
my %params = @_; |
152 | 152 |
my $form = $main::form; |
... | ... | |
216 | 216 |
sub form_header { |
217 | 217 |
$main::lxdebug->enter_sub(); |
218 | 218 |
|
219 |
$main::auth->assert('general_ledger');
|
|
219 |
$main::auth->assert('ar_transactions');
|
|
220 | 220 |
|
221 | 221 |
my $form = $main::form; |
222 | 222 |
my %myconfig = %main::myconfig; |
... | ... | |
476 | 476 |
sub form_footer { |
477 | 477 |
$main::lxdebug->enter_sub(); |
478 | 478 |
|
479 |
$main::auth->assert('general_ledger');
|
|
479 |
$main::auth->assert('ar_transactions');
|
|
480 | 480 |
|
481 | 481 |
my $form = $main::form; |
482 | 482 |
my %myconfig = %main::myconfig; |
... | ... | |
513 | 513 |
sub mark_as_paid { |
514 | 514 |
$main::lxdebug->enter_sub(); |
515 | 515 |
|
516 |
$main::auth->assert('general_ledger');
|
|
516 |
$main::auth->assert('ar_transactions');
|
|
517 | 517 |
|
518 | 518 |
my $form = $main::form; |
519 | 519 |
my %myconfig = %main::myconfig; |
... | ... | |
526 | 526 |
sub update { |
527 | 527 |
$main::lxdebug->enter_sub(); |
528 | 528 |
|
529 |
$main::auth->assert('general_ledger');
|
|
529 |
$main::auth->assert('ar_transactions');
|
|
530 | 530 |
|
531 | 531 |
my $form = $main::form; |
532 | 532 |
my %myconfig = %main::myconfig; |
... | ... | |
616 | 616 |
sub post_payment { |
617 | 617 |
$main::lxdebug->enter_sub(); |
618 | 618 |
|
619 |
$main::auth->assert('general_ledger');
|
|
619 |
$main::auth->assert('ar_transactions');
|
|
620 | 620 |
|
621 | 621 |
my $form = $main::form; |
622 | 622 |
my %myconfig = %main::myconfig; |
... | ... | |
666 | 666 |
|
667 | 667 |
sub _post { |
668 | 668 |
|
669 |
$main::auth->assert('general_ledger');
|
|
669 |
$main::auth->assert('ar_transactions');
|
|
670 | 670 |
|
671 | 671 |
my $form = $main::form; |
672 | 672 |
|
... | ... | |
677 | 677 |
sub post { |
678 | 678 |
$main::lxdebug->enter_sub(); |
679 | 679 |
|
680 |
$main::auth->assert('general_ledger');
|
|
680 |
$main::auth->assert('ar_transactions');
|
|
681 | 681 |
|
682 | 682 |
my $form = $main::form; |
683 | 683 |
my %myconfig = %main::myconfig; |
... | ... | |
767 | 767 |
sub post_as_new { |
768 | 768 |
$main::lxdebug->enter_sub(); |
769 | 769 |
|
770 |
$main::auth->assert('general_ledger');
|
|
770 |
$main::auth->assert('ar_transactions');
|
|
771 | 771 |
|
772 | 772 |
my $form = $main::form; |
773 | 773 |
my %myconfig = %main::myconfig; |
... | ... | |
789 | 789 |
sub use_as_new { |
790 | 790 |
$main::lxdebug->enter_sub(); |
791 | 791 |
|
792 |
$main::auth->assert('general_ledger');
|
|
792 |
$main::auth->assert('ar_transactions');
|
|
793 | 793 |
|
794 | 794 |
my $form = $main::form; |
795 | 795 |
my %myconfig = %main::myconfig; |
... | ... | |
806 | 806 |
sub delete { |
807 | 807 |
$main::lxdebug->enter_sub(); |
808 | 808 |
|
809 |
$main::auth->assert('general_ledger');
|
|
809 |
$main::auth->assert('ar_transactions');
|
|
810 | 810 |
|
811 | 811 |
my $form = $main::form; |
812 | 812 |
my $locale = $main::locale; |
... | ... | |
845 | 845 |
sub yes { |
846 | 846 |
$main::lxdebug->enter_sub(); |
847 | 847 |
|
848 |
$main::auth->assert('general_ledger');
|
|
848 |
$main::auth->assert('ar_transactions');
|
|
849 | 849 |
|
850 | 850 |
my $form = $main::form; |
851 | 851 |
my %myconfig = %main::myconfig; |
... | ... | |
1187 | 1187 |
sub storno { |
1188 | 1188 |
$main::lxdebug->enter_sub(); |
1189 | 1189 |
|
1190 |
$main::auth->assert('general_ledger');
|
|
1190 |
$main::auth->assert('ar_transactions');
|
|
1191 | 1191 |
|
1192 | 1192 |
my $form = $main::form; |
1193 | 1193 |
my %myconfig = %main::myconfig; |
Auch abrufbar als: Unified diff
Verteilen der Rechte für Finanzbuchhaltung auf Dialogbuchung,Kreditoren-/Debitorenrechnungen
Es werden drei neue Rechte eingeführt, die den Zugriff auf Dialogbuchungen,Kreditoren-/Debitorenrechnungen verfeinern
Das Recht für Finanzbuchhaltung wird auf diese Rechte als default kopiert