Revision e0f5deea
Von Martin Helmling martin.helmling@octosoft.eu vor etwa 8 Jahren hinzugefügt
| bin/mozilla/gl.pl | ||
|---|---|---|
| 78 | 78 |
sub add {
|
| 79 | 79 |
$main::lxdebug->enter_sub(); |
| 80 | 80 |
|
| 81 |
$main::auth->assert('general_ledger');
|
|
| 81 |
$main::auth->assert('gl_transactions');
|
|
| 82 | 82 |
|
| 83 | 83 |
my $form = $main::form; |
| 84 | 84 |
my %myconfig = %main::myconfig; |
| ... | ... | |
| 118 | 118 |
sub prepare_transaction {
|
| 119 | 119 |
$main::lxdebug->enter_sub(); |
| 120 | 120 |
|
| 121 |
$main::auth->assert('general_ledger');
|
|
| 121 |
$main::auth->assert('gl_transactions');
|
|
| 122 | 122 |
|
| 123 | 123 |
my $form = $main::form; |
| 124 | 124 |
my %myconfig = %main::myconfig; |
| ... | ... | |
| 189 | 189 |
sub edit {
|
| 190 | 190 |
$main::lxdebug->enter_sub(); |
| 191 | 191 |
|
| 192 |
$main::auth->assert('general_ledger');
|
|
| 192 |
$main::auth->assert('gl_transactions');
|
|
| 193 | 193 |
|
| 194 | 194 |
my $form = $main::form; |
| 195 | 195 |
my %myconfig = %main::myconfig; |
| ... | ... | |
| 210 | 210 |
|
| 211 | 211 |
sub search {
|
| 212 | 212 |
$::lxdebug->enter_sub; |
| 213 |
$::auth->assert('general_ledger');
|
|
| 213 |
$::auth->assert('gl_transactions');
|
|
| 214 | 214 |
|
| 215 | 215 |
$::form->all_departments(\%::myconfig); |
| 216 | 216 |
$::form->get_lists( |
| ... | ... | |
| 249 | 249 |
sub generate_report {
|
| 250 | 250 |
$main::lxdebug->enter_sub(); |
| 251 | 251 |
|
| 252 |
$main::auth->assert('general_ledger');
|
|
| 252 |
$main::auth->assert('gl_transactions');
|
|
| 253 | 253 |
|
| 254 | 254 |
my $form = $main::form; |
| 255 | 255 |
my %myconfig = %main::myconfig; |
| ... | ... | |
| 513 | 513 |
sub update {
|
| 514 | 514 |
$main::lxdebug->enter_sub(); |
| 515 | 515 |
|
| 516 |
$main::auth->assert('general_ledger');
|
|
| 516 |
$main::auth->assert('gl_transactions');
|
|
| 517 | 517 |
|
| 518 | 518 |
my $form = $main::form; |
| 519 | 519 |
my %myconfig = %main::myconfig; |
| ... | ... | |
| 621 | 621 |
my ($init) = @_; |
| 622 | 622 |
$main::lxdebug->enter_sub(); |
| 623 | 623 |
|
| 624 |
$main::auth->assert('general_ledger');
|
|
| 624 |
$main::auth->assert('gl_transactions');
|
|
| 625 | 625 |
|
| 626 | 626 |
my $form = $main::form; |
| 627 | 627 |
my %myconfig = %main::myconfig; |
| ... | ... | |
| 644 | 644 |
my ($init) = @_; |
| 645 | 645 |
$main::lxdebug->enter_sub(); |
| 646 | 646 |
|
| 647 |
$main::auth->assert('general_ledger');
|
|
| 647 |
$main::auth->assert('gl_transactions');
|
|
| 648 | 648 |
|
| 649 | 649 |
my $form = $main::form; |
| 650 | 650 |
my %myconfig = %main::myconfig; |
| ... | ... | |
| 848 | 848 |
|
| 849 | 849 |
sub form_header {
|
| 850 | 850 |
$::lxdebug->enter_sub; |
| 851 |
$::auth->assert('general_ledger');
|
|
| 851 |
$::auth->assert('gl_transactions');
|
|
| 852 | 852 |
|
| 853 | 853 |
my ($init) = @_; |
| 854 | 854 |
|
| ... | ... | |
| 896 | 896 |
|
| 897 | 897 |
sub form_footer {
|
| 898 | 898 |
$::lxdebug->enter_sub; |
| 899 |
$::auth->assert('general_ledger');
|
|
| 899 |
$::auth->assert('gl_transactions');
|
|
| 900 | 900 |
|
| 901 | 901 |
my ($follow_ups, $follow_ups_due); |
| 902 | 902 |
|
| ... | ... | |
| 1147 | 1147 |
sub post {
|
| 1148 | 1148 |
$main::lxdebug->enter_sub(); |
| 1149 | 1149 |
|
| 1150 |
$main::auth->assert('general_ledger');
|
|
| 1150 |
$main::auth->assert('gl_transactions');
|
|
| 1151 | 1151 |
|
| 1152 | 1152 |
my $form = $main::form; |
| 1153 | 1153 |
my $locale = $main::locale; |
| ... | ... | |
| 1172 | 1172 |
sub post_as_new {
|
| 1173 | 1173 |
$main::lxdebug->enter_sub(); |
| 1174 | 1174 |
|
| 1175 |
$main::auth->assert('general_ledger');
|
|
| 1175 |
$main::auth->assert('gl_transactions');
|
|
| 1176 | 1176 |
|
| 1177 | 1177 |
my $form = $main::form; |
| 1178 | 1178 |
|
| ... | ... | |
| 1185 | 1185 |
sub storno {
|
| 1186 | 1186 |
$main::lxdebug->enter_sub(); |
| 1187 | 1187 |
|
| 1188 |
$main::auth->assert('general_ledger');
|
|
| 1188 |
$main::auth->assert('gl_transactions');
|
|
| 1189 | 1189 |
|
| 1190 | 1190 |
my $form = $main::form; |
| 1191 | 1191 |
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