+};
+
+sub link {
+ my ($self) = @_;
+
+ my $html;
+ $html = SL::Presenter->get->purchase_invoice($self, display => 'inline') if $self->invoice;
+ $html = SL::Presenter->get->ap_transaction($self, display => 'inline') if !$self->invoice;
+
+ return $html;