X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f9676efea9ccfa01df2a57dca9c45cc8fde0d09e..5547891f42ef3b13d477eba65bb0537ece1d703c:/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;