Revision 4bd1e2f8
Von Sven Schöling vor etwa 9 Jahren hinzugefügt
| SL/OE.pm | ||
|---|---|---|
| 176 | 176 |
|
| 177 | 177 |
if (!$main::auth->assert('sales_all_edit', 1)) {
|
| 178 | 178 |
$query .= " AND o.employee_id = (select id from employee where login= ?)"; |
| 179 |
push @values, $form->{login};
|
|
| 179 |
push @values, $::myconfig{login};
|
|
| 180 | 180 |
} |
| 181 | 181 |
if ($form->{employee_id}) {
|
| 182 | 182 |
$query .= " AND o.employee_id = ?"; |
| ... | ... | |
| 325 | 325 |
my $dbh = $params{dbh} || $form->get_standard_dbh($myconfig);
|
| 326 | 326 |
|
| 327 | 327 |
my $query = qq|SELECT id FROM employee WHERE login = ?|; |
| 328 |
my ($e_id) = selectrow_query($form, $dbh, $query, $form->{login});
|
|
| 328 |
my ($e_id) = selectrow_query($form, $dbh, $query, $::myconfig{login});
|
|
| 329 | 329 |
|
| 330 | 330 |
$query = |
| 331 | 331 |
qq|SELECT oe.id, oe.transdate, oe.reqdate, oe.quonumber, oe.transaction_description, oe.amount, |
Auch abrufbar als: Unified diff
login nicht aus $::form nehmen. Teil 1