Revision 61567f5f
Von Bernd Bleßmann vor fast 5 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 2353 | 2353 |
$main::lxdebug->leave_sub(); |
| 2354 | 2354 |
} |
| 2355 | 2355 |
|
| 2356 |
#sub _get_groups {
|
|
| 2357 |
# $main::lxdebug->enter_sub(); |
|
| 2358 |
# |
|
| 2359 |
# my ($self, $dbh, $key) = @_; |
|
| 2360 |
# |
|
| 2361 |
# $key ||= "all_groups"; |
|
| 2362 |
# |
|
| 2363 |
# my $groups = $main::auth->read_groups(); |
|
| 2364 |
# |
|
| 2365 |
# $self->{$key} = selectall_hashref_query($self, $dbh, $query);
|
|
| 2366 |
# |
|
| 2367 |
# $main::lxdebug->leave_sub(); |
|
| 2368 |
#} |
|
| 2369 |
|
|
| 2370 | 2356 |
sub get_lists {
|
| 2371 | 2357 |
$main::lxdebug->enter_sub(); |
| 2372 | 2358 |
|
| ... | ... | |
| 2464 | 2450 |
$self->_get_warehouses($dbh, $params{warehouses});
|
| 2465 | 2451 |
} |
| 2466 | 2452 |
|
| 2467 |
# if ($params{groups}) {
|
|
| 2468 |
# $self->_get_groups($dbh, $params{groups});
|
|
| 2469 |
# } |
|
| 2470 |
|
|
| 2471 | 2453 |
if ($params{partsgroup}) {
|
| 2472 | 2454 |
$self->get_partsgroup(\%main::myconfig, { all => 1, target => $params{partsgroup} });
|
| 2473 | 2455 |
} |
Auch abrufbar als: Unified diff
SL::Form: Kosmetik: auskommentierten Code entfernt
der ist schon 12 Jahre auskommentiert.