Revision c9dd5a95
Von Bernd Blessmann vor mehr als 14 Jahren hinzugefügt
| SL/WH.pm | ||
|---|---|---|
| 398 | 398 |
( grep( { !/qty$/ and /^l_/ and $form->{$_} eq 'Y' } keys %$form), qw(l_parts_id l_partunit l_itime) );
|
| 399 | 399 |
|
| 400 | 400 |
$where_clause = defined($where_clause) ? $where_clause : ''; |
| 401 |
$main::lxdebug->message(0, "where_clause = ".$where_clause); |
|
| 402 | 401 |
my $query = |
| 403 | 402 |
qq|SELECT DISTINCT $select{trans}
|
| 404 | 403 |
FROM inventory i1 |
Auch abrufbar als: Unified diff
Eine Debugmeldung zuviel. Entfernt.