Revision 49f5b7f7
Von Kivitendo Admin vor etwa 10 Jahren hinzugefügt
SL/DB/Invoice.pm | ||
---|---|---|
330 | 330 |
} |
331 | 331 |
|
332 | 332 |
sub abbreviation { |
333 |
my $self = shift;
|
|
333 |
my ($self) = @_;
|
|
334 | 334 |
|
335 |
return t8('AR Transaction (abbreviation)') if !$self->invoice;
|
|
336 |
return t8('Credit note (one letter abbreviation)') if $self->type eq 'credit_note' && $self->amount < 0 && !$self->storno;
|
|
337 |
return t8('Invoice (one letter abbreviation)') . "(" . t8('Storno (one letter abbreviation)') . ")" if $self->type ne 'credit_note' && $self->amount < 0 && $self->storno;
|
|
338 |
return t8('Credit note (one letter abbreviation)') . "(" . t8('Storno (one letter abbreviation)') . ")" if $self->type eq 'credit_note' && $self->amount > 0 && $self->storno;
|
|
335 |
return t8('AR Transaction (abbreviation)') if $self->invoice_type eq 'ar_transaction';
|
|
336 |
return t8('Credit note (one letter abbreviation)') if $self->invoice_type eq 'credit_note';
|
|
337 |
return t8('Invoice (one letter abbreviation)') . "(" . t8('Storno (one letter abbreviation)') . ")" if $self->invoice_type eq 'invoice_storno';
|
|
338 |
return t8('Credit note (one letter abbreviation)') . "(" . t8('Storno (one letter abbreviation)') . ")" if $self->invoice_type eq 'credit_note_storno';
|
|
339 | 339 |
return t8('Invoice (one letter abbreviation)'); |
340 |
|
|
341 | 340 |
} |
342 | 341 |
|
343 | 342 |
sub date { |
Auch abrufbar als: Unified diff
SL/DB/Invoice->abbreviation prüft jetzt invoice_type