projekt kivitendo

use SL::DB::MetaSetup::Chart;

use SL::DB::Manager::Chart;

__PACKAGE__->meta->add_relationships(taxkeys => { type         => 'one to many',

                                                  class        => 'SL::DB::TaxKey',

sub get_active_taxkey {

  my ($self, $date) = @_;

  $date ||= DateTime->today_local;

  return SL::DB::Manager::TaxKey->get_all(query   => [ and => [ chart_id  => $self->id,

                                                                startdate => { le => $date } ] ],

                                          sort_by => "startdate DESC")->[0];