X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FOrderItem.pm;h=8ae5e0bddc97fd06e36bdde908cf9d1ab0bb6c8c;hb=24ab7ec0bfb052edce7a3c7a6e37c151f9cd6a04;hp=81e6cd39e5b58c019bf158a9571771484a6f0cb5;hpb=3b7bda404f28890a4c3796d76619fc5b0c4a26bb;p=kivitendo-erp.git diff --git a/SL/DB/OrderItem.pm b/SL/DB/OrderItem.pm index 81e6cd39e..8ae5e0bdd 100644 --- a/SL/DB/OrderItem.pm +++ b/SL/DB/OrderItem.pm @@ -7,6 +7,9 @@ use List::Util qw(sum); use SL::DB::MetaSetup::OrderItem; use SL::DB::Manager::OrderItem; use SL::DB::DeliveryOrderItemsStock; +use SL::DB::Helper::ActsAsList; +use SL::DB::Helper::LinkedRecords; +use SL::DB::Helper::RecordItem; use SL::DB::Helper::CustomVariables ( sub_module => 'orderitems', cvars_alias => 1, @@ -20,6 +23,8 @@ use SL::DB::Helper::CustomVariables ( __PACKAGE__->meta->initialize; +__PACKAGE__->configure_acts_as_list(group_by => [qw(trans_id)]); + sub is_price_update_available { my $self = shift; return $self->origprice > $self->part->sellprice; @@ -86,4 +91,7 @@ sub taxincluded { return SL::DB::Manager::Order->find_by(id => $self->trans_id)->taxincluded ? $::locale->text('WARN: Tax included value!') : ''; } + +sub record { goto &order } + 1;