X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/fc890e1040a469ee62b3661c5da2f3d2efb4cce9..a2bab345aedcfbb03bdf0e0aa1f28a5c57a5d02b:/SL/DB/Order.pm

diff --git a/SL/DB/Order.pm b/SL/DB/Order.pm
index 4d0a2fa07..b7bdae070 100644
--- a/SL/DB/Order.pm
+++ b/SL/DB/Order.pm
@@ -210,6 +210,16 @@ sub date {
   goto &transdate;
 }
 
+sub digest {
+  my ($self) = @_;
+
+  sprintf "%s %s %s (%s)",
+    $self->number,
+    $self->customervendor->name,
+    $self->amount_as_number,
+    $self->date->to_kivitendo;
+}
+
 1;
 
 __END__