X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/82515b2d93dc5632f24d6e0b6f8f05f3fd19fbb0..b6fd15a8dc44f9b09d5a2bce766cda14b87c6e13:/SL/DB/DeliveryOrderItem.pm diff --git a/SL/DB/DeliveryOrderItem.pm b/SL/DB/DeliveryOrderItem.pm index 8b836ee15..873c0a422 100644 --- a/SL/DB/DeliveryOrderItem.pm +++ b/SL/DB/DeliveryOrderItem.pm @@ -3,13 +3,18 @@ package SL::DB::DeliveryOrderItem; 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::CustomVariables ( + sub_module => 'delivery_order_item', + cvars_alias => 1, + overloads => { + parts_id => 'SL::DB::Part', + }, +); __PACKAGE__->meta->make_manager_class; +__PACKAGE__->meta->initialize; + # methods sub part {