Revision 0abce1b8
Von Kivitendo Admin vor etwa 8 Jahren hinzugefügt
| SL/DB/GLTransaction.pm | ||
|---|---|---|
|
|
||
|
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;
|
||
| ... | ... | |
|
|
||
|
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 {
|
||
| SL/DB/Invoice.pm | ||
|---|---|---|
|
sub oneline_summary {
|
||
|
my $self = shift;
|
||
|
|
||
|
return sprintf("%s: %s %s (%s)", $self->abbreviation, $self->invnumber, $self->customer->name, $self->transdate->to_kivitendo);
|
||
|
return sprintf("%s: %s %s %s (%s)", $self->abbreviation, $self->invnumber, $self->customer->name,
|
||
|
$::form->format_amount(\%::myconfig, $self->amount,2), $self->transdate->to_kivitendo);
|
||
|
}
|
||
|
|
||
|
sub date {
|
||
| SL/DB/PurchaseInvoice.pm | ||
|---|---|---|
|
sub oneline_summary {
|
||
|
my $self = shift;
|
||
|
|
||
|
return sprintf("%s: %s %s (%s)", $self->abbreviation, $self->invnumber, $self->vendor->name, $self->transdate->to_kivitendo);
|
||
|
return sprintf("%s: %s %s %s (%s)", $self->abbreviation, $self->invnumber, $self->vendor->name,
|
||
|
$::form->format_amount(\%::myconfig, $self->amount,2), $self->transdate->to_kivitendo);
|
||
|
}
|
||
|
|
||
|
sub link {
|
||
Auch abrufbar als: Unified diff
oneline_summary mit Rechnungsbeträgen
Bei Belegen wird der Bruttobetrag angezeigt.
Bei Dialogbuchungen wird die Summe aller Haben-Buchungen als Betrag
angezeigt.