Revision a5419c17
Von Werner Hahn vor 6 Monaten hinzugefügt
- ID a5419c17b2553d59cd1369ca322115015ac05252
- Vorgänger 86d460a0
SL/Controller/Part.pm | ||
---|---|---|
$search_term ||= $self->models->filtered->laundered->{all_with_customer_partnumber_substr_multi__ilike};
|
||
|
||
$_[0]->render('part/_multi_items_dialog', { layout => 0 },
|
||
all_partsgroups => SL::DB::Manager::PartsGroup->get_all,
|
||
all_partsgroups => SL::DB::Manager::PartsGroup->data_partsgroup_dropdown,
|
||
search_term => $search_term
|
||
);
|
||
}
|
||
... | ... | |
|
||
sub init_all_partsgroups {
|
||
my ($self) = @_;
|
||
SL::DB::Manager::PartsGroup->get_all_sorted(query => [ or => [ id => $self->part->partsgroup_id, obsolete => 0 ] ]);
|
||
SL::DB::Manager::PartsGroup->data_partsgroup_dropdown;
|
||
}
|
||
|
||
sub init_all_buchungsgruppen {
|
SL/DB/Manager/PartsGroup.pm | ||
---|---|---|
return \@list;
|
||
}
|
||
|
||
sub data_partsgroup_dropdown {
|
||
my ($name, %params);
|
||
my $partsgroup = get_hierarchy;
|
||
my $partsgroup_hierarchie;
|
||
foreach my $pg (@{$partsgroup}) {
|
||
next if $pg->{obsolete};
|
||
$pg->{partsgroup} = "| " x $pg->{level} . $pg->{partsgroup};
|
||
push @{$partsgroup_hierarchie}, $pg;
|
||
}
|
||
return $partsgroup_hierarchie;
|
||
}
|
||
1;
|
Auch abrufbar als: Unified diff
PartGroup: auch in deiversen Dropdown Partsgroup hierarchisch darstellen