FiBu Schellsuche in Headerzeile

[kivitendo-erp.git] / SL / DB / GLTransaction.pm

diff --git a/SL/DB/GLTransaction.pm b/SL/DB/GLTransaction.pm
index c4ca221be0924445c9e4f47150d0d4fef5e15439..078e2b98154b05d4a08901baebcdc125bbbfc8ae 100644 (file)
--- a/SL/DB/GLTransaction.pm
+++ b/SL/DB/GLTransaction.pm
@@ -4,11 +4,18 @@ use strict;
 
 use SL::DB::MetaSetup::GLTransaction;
 
-for my $field (qw(transdate gldate)) {
-  __PACKAGE__->attr_date($field);
-}
+__PACKAGE__->meta->initialize;
 
 # Creates get_all, get_all_count, get_all_iterator, delete_all and update_all.
 __PACKAGE__->meta->make_manager_class;
 
+sub abbreviation {
+  my $self = shift;
+
+  my $abbreviation = $::locale->text('GL Transaction (abbreviation)');
+  $abbreviation   .= "(" . $::locale->text('Storno (one letter abbreviation)') . ")" if $self->storno;
+  return $abbreviation;
+
+}
+
 1;