X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FGLTransaction.pm;h=2ad8e0c0dd24c7da90f220c1b354585e7590a6ee;hb=e476a9df6d7b8794add9fe384a624817dc21c21b;hp=c9f436056b4b14a1b0ddc30f8b2fcadb9e7a7d95;hpb=bfb31bebd1bc46ab9ffab3955165c94fa17b08f1;p=kivitendo-erp.git diff --git a/SL/DB/GLTransaction.pm b/SL/DB/GLTransaction.pm index c9f436056..2ad8e0c0d 100644 --- a/SL/DB/GLTransaction.pm +++ b/SL/DB/GLTransaction.pm @@ -4,6 +4,7 @@ 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; @@ -36,7 +37,9 @@ sub displayable_type { 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 {