Revision 4bd1e2f8
Von Sven Schöling vor etwa 9 Jahren hinzugefügt
| SL/DO.pm | ||
|---|---|---|
| 119 | 119 |
} |
| 120 | 120 |
if (!$main::auth->assert('sales_all_edit', 1)) {
|
| 121 | 121 |
push @where, qq|dord.employee_id = (select id from employee where login= ?)|; |
| 122 |
push @values, $form->{login};
|
|
| 122 |
push @values, $::myconfig{login};
|
|
| 123 | 123 |
} |
| 124 | 124 |
|
| 125 | 125 |
foreach my $item (qw(donumber ordnumber cusordnumber transaction_description)) {
|
Auch abrufbar als: Unified diff
login nicht aus $::form nehmen. Teil 1