X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FGLTransaction.pm;h=2ad8e0c0dd24c7da90f220c1b354585e7590a6ee;hb=9e7789427199403eb560fe817f0f281fe47d6f3b;hp=3b9612e9e1d9ac8905be7d39189dedd6f01bda3d;hpb=a5e4f9ca835489c2250db39f2c3abe6ac4ba04e6;p=kivitendo-erp.git diff --git a/SL/DB/GLTransaction.pm b/SL/DB/GLTransaction.pm index 3b9612e9e..2ad8e0c0d 100644 --- a/SL/DB/GLTransaction.pm +++ b/SL/DB/GLTransaction.pm @@ -3,7 +3,8 @@ package SL::DB::GLTransaction; use strict; use SL::DB::MetaSetup::GLTransaction; - +use SL::Locale::String qw(t8); +use List::Util qw(sum); # Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. __PACKAGE__->meta->make_manager_class; @@ -30,9 +31,15 @@ sub abbreviation { return $abbreviation; } +sub displayable_type { + return t8('GL Transaction'); +} + sub oneline_summary { my ($self) = @_; - return sprintf("%s: %s %s (%s)", $self->abbreviation, $self->description, $self->reference, $_->transdate->to_kivitendo); + my $amount = sum map { $_->amount if $_->amount > 0 } @{$self->transactions}; + $amount = $::form->format_amount(\%::myconfig, $amount, 2); + return sprintf("%s: %s %s %s (%s)", $self->abbreviation, $self->description, $self->reference, $amount, $self->transdate->to_kivitendo); } sub link {