Revision 0ca195cd
Von Bernd Bleßmann vor etwa 6 Jahren hinzugefügt
SL/Presenter/Part.pm | ||
---|---|---|
61 | 61 |
# |
62 | 62 |
sub type_abbreviation { |
63 | 63 |
my ($part_type) = @_; |
64 |
|
|
65 |
return '' if !$part_type; |
|
64 | 66 |
return $::locale->text('Assembly (typeabbreviation)') if $part_type eq 'assembly'; |
65 | 67 |
return $::locale->text('Part (typeabbreviation)') if $part_type eq 'part'; |
66 | 68 |
return $::locale->text('Assortment (typeabbreviation)') if $part_type eq 'assortment'; |
... | ... | |
87 | 89 |
# |
88 | 90 |
sub classification_abbreviation { |
89 | 91 |
my ($id) = @_; |
92 |
|
|
93 |
return '' if !$id; |
|
94 |
|
|
90 | 95 |
SL::DB::Manager::PartClassification->cache_all(); |
91 | 96 |
my $obj = SL::DB::PartClassification->load_cached($id); |
92 | 97 |
$obj && $obj->abbreviation ? t8($obj->abbreviation) : ''; |
... | ... | |
103 | 108 |
# |
104 | 109 |
sub separate_abbreviation { |
105 | 110 |
my ($id) = @_; |
111 |
|
|
112 |
return '' if !$id; |
|
113 |
|
|
106 | 114 |
SL::DB::Manager::PartClassification->cache_all(); |
107 | 115 |
my $obj = SL::DB::PartClassification->load_cached($id); |
108 | 116 |
$obj && $obj->abbreviation && $obj->report_separate ? t8($obj->abbreviation) : ''; |
Auch abrufbar als: Unified diff
Part-Presenter: Typ u. Klassifizierung: Abfangen, wenn kein Argument übergeben
behebt #332
"Bug: Bericht Lagerbestand gibt Fehler beim einschliessen leerer Lagerplätze"