Revision 3e50ade5
Von Tamino Steinert vor 6 Tagen hinzugefügt
| SL/DB/Part.pm | ||
|---|---|---|
| 21 | 21 |
); |
| 22 | 22 |
use SL::DB::Helper::DisplayableNamePreferences ( |
| 23 | 23 |
title => t8('Article'),
|
| 24 |
options => [ {name => 'partnumber', title => t8('Part Number') },
|
|
| 25 |
{name => 'description', title => t8('Description') },
|
|
| 26 |
{name => 'notes', title => t8('Notes')},
|
|
| 27 |
{name => 'ean', title => t8('EAN') }, ],
|
|
| 24 |
options => [ |
|
| 25 |
{name => 'partnumber', title => t8('Part Number')},
|
|
| 26 |
{name => 'description', title => t8('Description')},
|
|
| 27 |
{name => 'variant_values', title => t8('Varaint Values')},
|
|
| 28 |
{name => 'notes', title => t8('Notes')},
|
|
| 29 |
{name => 'ean', title => t8('EAN')},
|
|
| 30 |
], |
|
| 28 | 31 |
); |
| 29 | 32 |
|
| 30 | 33 |
|
| ... | ... | |
| 632 | 635 |
return 1; |
| 633 | 636 |
} |
| 634 | 637 |
|
| 635 |
sub init_onhandqty{
|
|
| 638 |
sub variant_values {
|
|
| 639 |
my ($self) = @_; |
|
| 640 |
return unless $self->is_variant; |
|
| 641 |
return join(" ",
|
|
| 642 |
map {"[" . $_->variant_property->abbreviation . ":" . $_->abbreviation . "]"}
|
|
| 643 |
$self->variant_property_values); |
|
| 644 |
} |
|
| 645 |
|
|
| 646 |
sub init_onhandqty {
|
|
| 636 | 647 |
my ($self) = @_; |
| 637 | 648 |
my $qty = SL::Helper::Inventory::get_onhand(part => $self->id) || 0; |
| 638 | 649 |
return $qty; |
| 639 | 650 |
} |
| 640 | 651 |
|
| 641 |
sub init_stockqty{
|
|
| 652 |
sub init_stockqty {
|
|
| 642 | 653 |
my ($self) = @_; |
| 643 | 654 |
my $qty = SL::Helper::Inventory::get_stock(part => $self->id) || 0; |
| 644 | 655 |
return $qty; |
Auch abrufbar als: Unified diff
Varianten: Varianten Eigenschaften im Namen anzeigen