Oneline summary for GLTransaction/Invoice/PurchaseInvoice

to be used e.g. in Fibu Quicksearch

diff --git a/SL/DB/GLTransaction.pm b/SL/DB/GLTransaction.pm
index 67a4d3acaa643261876a88f5be94f28f2320d87e..3b9612e9e1d9ac8905be7d39189dedd6f01bda3d 100644 (file)
--- a/SL/DB/GLTransaction.pm
+++ b/SL/DB/GLTransaction.pm
@@ -30,6 +30,11 @@ sub abbreviation {
   return $abbreviation;
 }
 
+sub oneline_summary {
+  my ($self) = @_;
+  return sprintf("%s: %s %s (%s)", $self->abbreviation, $self->description, $self->reference, $_->transdate->to_kivitendo);
+}
+
 sub link {
   my ($self) = @_;
 

diff --git a/SL/DB/Invoice.pm b/SL/DB/Invoice.pm
index 0ef8d614e842f68c3d7927c94ea8890e17ba916e..4caafc0b003267b3aded43d3bdf5297eaaecbd36 100644 (file)
--- a/SL/DB/Invoice.pm
+++ b/SL/DB/Invoice.pm
@@ -555,6 +555,12 @@ sub abbreviation {
   return t8('Invoice (one letter abbreviation)');
 }
 
+sub oneline_summary {
+  my $self = shift;
+
+  return sprintf("%s: %s %s (%s)", $self->abbreviation, $self->invnumber, $self->customer->name, $self->transdate->to_kivitendo);
+}
+
 sub date {
   goto &transdate;
 }

diff --git a/SL/DB/PurchaseInvoice.pm b/SL/DB/PurchaseInvoice.pm
index 08be07f3323de9979a2d037f3bb31124cf8954bd..102cd8a5244df16d6eb841bde7c2b7b15162fe03 100644 (file)
--- a/SL/DB/PurchaseInvoice.pm
+++ b/SL/DB/PurchaseInvoice.pm
@@ -88,6 +88,12 @@ sub abbreviation {
 
 };
 
+sub oneline_summary {
+  my $self = shift;
+
+  return sprintf("%s: %s %s (%s)", $self->abbreviation, $self->invnumber, $self->vendor->name, $self->transdate->to_kivitendo);
+}
+
 sub link {
   my ($self) = @_;