X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/47d35d063516eaa1a058109cf46cf2eb25c852a2..8b7b7b3f6252786b38bb6c9357fc00a08750b8db:/SL/DB/PeriodicInvoicesConfig.pm diff --git a/SL/DB/PeriodicInvoicesConfig.pm b/SL/DB/PeriodicInvoicesConfig.pm index d49595bb5..c9ef22285 100644 --- a/SL/DB/PeriodicInvoicesConfig.pm +++ b/SL/DB/PeriodicInvoicesConfig.pm @@ -2,13 +2,11 @@ package SL::DB::PeriodicInvoicesConfig; use strict; -use Readonly; - use SL::DB::MetaSetup::PeriodicInvoicesConfig; __PACKAGE__->meta->add_relationships( order => { - type => 'one to one', + type => 'many to one', class => 'SL::DB::Order', column_map => { oe_id => 'id' }, }, @@ -19,8 +17,8 @@ __PACKAGE__->meta->initialize; # Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. __PACKAGE__->meta->make_manager_class; -Readonly our @PERIODICITIES => qw(m q f b y); -Readonly our %PERIOD_LENGTHS => ( m => 1, q => 3, f => 4, b => 6, y => 12 ); +our @PERIODICITIES = qw(m q f b y); +our %PERIOD_LENGTHS = ( m => 1, q => 3, f => 4, b => 6, y => 12 ); sub get_period_length { my $self = shift;