+__PACKAGE__->meta->add_relationship(
+ transactions => {
+ type => 'one to many',
+ class => 'SL::DB::AccTransaction',
+ column_map => { id => 'trans_id' },
+ manager_args => {
+ with_objects => [ 'chart' ],
+ sort_by => 'acc_trans_id ASC',
+ },
+ },
+);
+
+__PACKAGE__->meta->initialize;
+
+sub abbreviation {
+ my $self = shift;
+
+ my $abbreviation = $::locale->text('GL Transaction (abbreviation)');
+ $abbreviation .= "(" . $::locale->text('Storno (one letter abbreviation)') . ")" if $self->storno;
+ return $abbreviation;
+}
+
+sub link {
+ my ($self) = @_;
+
+ my $html;
+ $html = SL::Presenter->get->gl_transaction($self, display => 'inline');
+
+ return $html;
+}
+
+sub invnumber {
+ return $_[0]->reference;
+}
+