Revision eae950d7
Von Kivitendo Admin vor fast 8 Jahren hinzugefügt
SL/DB/GLTransaction.pm | ||
---|---|---|
49 | 49 |
sub link { |
50 | 50 |
my ($self) = @_; |
51 | 51 |
|
52 |
my $html; |
|
53 |
$html = SL::Presenter->get->gl_transaction($self, display => 'inline'); |
|
54 |
|
|
55 |
return $html; |
|
52 |
return SL::Presenter->get->gl_transaction($self, display => 'inline'); |
|
56 | 53 |
} |
57 | 54 |
|
58 | 55 |
sub invnumber { |
SL/DB/Invoice.pm | ||
---|---|---|
581 | 581 |
sub link { |
582 | 582 |
my ($self) = @_; |
583 | 583 |
|
584 |
my $html; |
|
585 |
$html = SL::Presenter->get->sales_invoice($self, display => 'inline') if $self->invoice; |
|
586 |
$html = SL::Presenter->get->ar_transaction($self, display => 'inline') if !$self->invoice; |
|
587 |
|
|
588 |
return $html; |
|
584 |
return SL::Presenter->get->invoice($self, display => 'inline'); |
|
589 | 585 |
} |
590 | 586 |
|
591 | 587 |
sub mark_as_paid { |
SL/DB/PurchaseInvoice.pm | ||
---|---|---|
102 | 102 |
sub link { |
103 | 103 |
my ($self) = @_; |
104 | 104 |
|
105 |
my $html; |
|
106 |
$html = SL::Presenter->get->purchase_invoice($self, display => 'inline') if $self->invoice; |
|
107 |
$html = SL::Presenter->get->ap_transaction($self, display => 'inline') if !$self->invoice; |
|
108 |
|
|
109 |
return $html; |
|
105 |
return SL::Presenter->get->invoice($self, display => 'inline'); |
|
110 | 106 |
} |
111 | 107 |
|
112 | 108 |
sub invoice_type { |
Auch abrufbar als: Unified diff
Refactoring von link-Methode in FiBu-Belegen
wird die Method überhaupt irgendwo genutzt?