use strict;
use SL::DB::MetaSetup::DeliveryOrderItem;
-
-for my $field (qw(qty sellprice discount base_qty lastcost price_factor marge_price_factor)) {
- __PACKAGE__->attr_number($field, places => -2);
-}
+use SL::DB::Helper::ActsAsList;
+use SL::DB::Helper::LinkedRecords;
+use SL::DB::Helper::CustomVariables (
+ sub_module => 'delivery_order_items',
+ cvars_alias => 1,
+ overloads => {
+ parts_id => {
+ class => 'SL::DB::Part',
+ module => 'IC',
+ }
+ },
+);
__PACKAGE__->meta->make_manager_class;
+__PACKAGE__->meta->initialize;
+
+__PACKAGE__->configure_acts_as_list(group_by => [qw(delivery_order_id)]);
+
# methods
-sub part {
- # canonial alias for parts.
- return shift->parts;
-}
+sub record { goto &delivery_order }
1;