Revision 73eb1f18
Von Tamino Steinert vor etwa 1 Jahr hinzugefügt
SL/DB/Reclamation.pm | ||
---|---|---|
128 | 128 |
} |
129 | 129 |
|
130 | 130 |
sub displayable_type { |
131 |
my $type = shift->type; |
|
132 |
|
|
133 |
return $::locale->text('Sales Reclamation') if $type eq SALES_RECLAMATION_TYPE(); |
|
134 |
return $::locale->text('Purchase Reclamation') if $type eq PURCHASE_RECLAMATION_TYPE(); |
|
135 |
|
|
136 |
die 'invalid type'; |
|
131 |
my ($self) = @_; |
|
132 |
return $self->type_data->text('type'); |
|
137 | 133 |
} |
138 | 134 |
|
139 | 135 |
sub displayable_name { |
Auch abrufbar als: Unified diff
TypeData: nutze richtige Übersetzung für Typ