my $abbreviation = $::locale->text('GL Transaction (abbreviation)');
$abbreviation .= "(" . $::locale->text('Storno (one letter abbreviation)') . ")" if $self->storno;
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) = @_;
+
+ my $html;
+ $html = SL::Presenter->get->gl_transaction($self, display => 'inline');
+
+ return $html;
+}
+sub invnumber {
+ return $_[0]->reference;
}
1;