Kosmetik: Alignment, Einrückung

[mfinanz.git] / SL / DB / Part.pm

diff --git a/SL/DB/Part.pm b/SL/DB/Part.pm
index 8ec7b3b1bff99223de7452ab60f2ea8ee3df1afa..94ce4d207d30c5d8602a2ed0f0ff949a384a7004 100644 (file)
--- a/SL/DB/Part.pm
+++ b/SL/DB/Part.pm
@@ -9,32 +9,46 @@ use SL::DBUtils;
 use SL::DB::MetaSetup::Part;
 use SL::DB::Manager::Part;
 use SL::DB::Chart;
 use SL::DB::MetaSetup::Part;
 use SL::DB::Manager::Part;
 use SL::DB::Chart;

+use SL::DB::Helper::TransNumberGenerator;
+use SL::DB::Helper::CustomVariables (
+  module      => 'IC',
+  cvars_alias => 1,
+);

 
 __PACKAGE__->meta->add_relationships(
 
 __PACKAGE__->meta->add_relationships(

-  unit_obj                     => {
-    type         => 'one to one',
-    class        => 'SL::DB::Unit',
-    column_map   => { unit => 'name' },
-  },

   assemblies                     => {
     type         => 'one to many',
     class        => 'SL::DB::Assembly',
     column_map   => { id => 'id' },
   },
   assemblies                     => {
     type         => 'one to many',
     class        => 'SL::DB::Assembly',
     column_map   => { id => 'id' },
   },

-  partsgroup                     => {
-    type         => 'one to one',
-    class        => 'SL::DB::PartsGroup',
-    column_map   => { partsgroup_id => 'id' },
+  prices         => {
+    type         => 'one to many',
+    class        => 'SL::DB::Price',
+    column_map   => { id => 'parts_id' },

   },
   },

-  price_factor   => {
-    type         => 'one to one',
-    class        => 'SL::DB::PriceFactor',
-    column_map   => { price_factor_id => 'id' },
+  makemodels     => {
+    type         => 'one to many',
+    class        => 'SL::DB::MakeModel',
+    column_map   => { id => 'parts_id' },
+  },
+  translations   => {
+    type         => 'one to many',
+    class        => 'SL::DB::Translation',
+    column_map   => { id => 'parts_id' },

   },
 );
 
 __PACKAGE__->meta->initialize;
 
   },
 );
 
 __PACKAGE__->meta->initialize;
 

+__PACKAGE__->before_save('_before_save_set_partnumber');
+
+sub _before_save_set_partnumber {
+  my ($self) = @_;
+
+  $self->create_trans_number if !$self->partnumber;
+  return 1;
+}
+

 sub is_type {
   my $self = shift;
   my $type  = lc(shift || '');
 sub is_type {
   my $self = shift;
   my $type  = lc(shift || '');


@@ -83,7 +97,6 @@ sub orphaned {
     SL::DB::InvoiceItem
     SL::DB::OrderItem
     SL::DB::Inventory
     SL::DB::InvoiceItem
     SL::DB::OrderItem
     SL::DB::Inventory

-    SL::DB::RMAItem

   );
 
   for my $class (@relations) {
   );
 
   for my $class (@relations) {


@@ -166,6 +179,10 @@ sub get_chart {
   return $charts->{$taxzone}->{$type};
 }
 
   return $charts->{$taxzone}->{$type};
 }
 

+sub long_description {
+  join ' ', grep $_, map $_[0]->$_, qw(partnumber description);
+}
+

 1;
 
 __END__
 1;
 
 __END__