Revision 0cdb369e
Von Tamino Steinert vor etwa 2 Monaten hinzugefügt
SL/DB/PeriodicInvoiceItemsConfig.pm | ||
---|---|---|
1 |
# This file has been auto-generated only because it didn't exist. |
|
2 |
# Feel free to modify it at will; it will not be overwritten automatically. |
|
3 |
|
|
4 | 1 |
package SL::DB::PeriodicInvoiceItemsConfig; |
5 | 2 |
|
6 | 3 |
use strict; |
... | ... | |
8 | 5 |
use SL::DB::MetaSetup::PeriodicInvoiceItemsConfig; |
9 | 6 |
use SL::DB::Manager::PeriodicInvoiceItemsConfig; |
10 | 7 |
|
8 |
use SL::DB::PeriodicInvoicesConfig; |
|
9 |
|
|
11 | 10 |
__PACKAGE__->meta->initialize; |
12 | 11 |
|
12 |
our %ITEM_PERIOD_LENGTHS = ( %SL::DB::PeriodicInvoicesConfig::PERIOD_LENGTHS, n => -1 ); |
|
13 |
|
|
14 |
sub get_item_period_length { |
|
15 |
my ($self) = @_; |
|
16 |
return $self->order_item->order->periodic_invoices_config->get_billing_period_length if $self->periodicity eq 'p'; |
|
17 |
return $ITEM_PERIOD_LENGTHS{ $self->periodicity }; |
|
18 |
} |
|
19 |
|
|
13 | 20 |
1; |
Auch abrufbar als: Unified diff
S:D:PeriodicInvoicesConfig: Positionskonfiguration beachten