X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/82515b2d93dc5632f24d6e0b6f8f05f3fd19fbb0..ba802064109d19f3488e5555ec04491681e37b51:/SL/DB/DeliveryOrderItem.pm

diff --git a/SL/DB/DeliveryOrderItem.pm b/SL/DB/DeliveryOrderItem.pm
index 8b836ee15..638082ccf 100644
--- a/SL/DB/DeliveryOrderItem.pm
+++ b/SL/DB/DeliveryOrderItem.pm
@@ -3,18 +3,21 @@ 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_items',
+  cvars_alias => 1,
+  overloads   => {
+    parts_id => {
+      class => 'SL::DB::Part',
+      module => 'IC',
+    }
+  },
+);
 
 __PACKAGE__->meta->make_manager_class;
 
-# methods
+__PACKAGE__->meta->initialize;
 
-sub part {
-  # canonial alias for parts.
-  return shift->parts;
-}
+# methods
 
 1;