X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/6cf3f7762efd40bee49a2b8f11bb4ab6915d9071..e9fb6244fd93562c5789afd315df8f6be5e7901a:/SL/DB/Invoice.pm diff --git a/SL/DB/Invoice.pm b/SL/DB/Invoice.pm index 993920c01..c64cf9d1d 100644 --- a/SL/DB/Invoice.pm +++ b/SL/DB/Invoice.pm @@ -9,6 +9,8 @@ use List::Util qw(first); use SL::DB::MetaSetup::Invoice; use SL::DB::Manager::Invoice; +use SL::DB::Helper::LinkedRecords; +use SL::DB::Helper::PriceTaxCalculator; __PACKAGE__->meta->add_relationship( invoiceitems => { @@ -25,6 +27,8 @@ __PACKAGE__->meta->initialize; # methods +sub items { goto &invoiceitems; } + # it is assumed, that ordnumbers are unique here. sub first_order_by_ordnumber { my $self = shift;