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

diff --git a/SL/DB/DeliveryOrderItem.pm b/SL/DB/DeliveryOrderItem.pm
new file mode 100644
index 000000000..8b836ee15
--- /dev/null
+++ b/SL/DB/DeliveryOrderItem.pm
@@ -0,0 +1,20 @@
+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);
+}
+
+__PACKAGE__->meta->make_manager_class;
+
+# methods
+
+sub part {
+  # canonial alias for parts.
+  return shift->parts;
+}
+
+1;