X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FVendor.pm;h=b1458efc34bfd9481f0266080587b9f439738e0d;hb=4ddcd46105d2a7afc41220ba51a703f9e2aef034;hp=11e23fe5174a8aa1b3040ea25b1247cb1aba2f0a;hpb=f9676efea9ccfa01df2a57dca9c45cc8fde0d09e;p=kivitendo-erp.git diff --git a/SL/DB/Vendor.pm b/SL/DB/Vendor.pm index 11e23fe51..b1458efc3 100644 --- a/SL/DB/Vendor.pm +++ b/SL/DB/Vendor.pm @@ -2,7 +2,15 @@ package SL::DB::Vendor; use strict; +use Rose::DB::Object::Helpers qw(as_tree); + use SL::DB::MetaSetup::Vendor; +use SL::DB::Manager::Vendor; +use SL::DB::Helper::TransNumberGenerator; +use SL::DB::Helper::CustomVariables ( + module => 'CT', + cvars_alias => 1, +); use SL::DB::VC; @@ -12,16 +20,44 @@ __PACKAGE__->meta->add_relationship( class => 'SL::DB::Shipto', column_map => { id => 'trans_id' }, manager_args => { sort_by => 'lower(shipto.shiptoname)' }, - query_args => [ 'shipto.module' => 'CT' ], + query_args => [ module => 'CT' ], }, - business => { - type => 'one to one', - class => 'SL::DB::Business', - column_map => { business_id => 'id' }, + contacts => { + type => 'one to many', + class => 'SL::DB::Contact', + column_map => { id => 'cp_cv_id' }, + manager_args => { sort_by => 'lower(contacts.cp_name)' }, }, ); -__PACKAGE__->meta->make_manager_class; __PACKAGE__->meta->initialize; +__PACKAGE__->before_save('_before_save_set_vendornumber'); + +sub _before_save_set_vendornumber { + my ($self) = @_; + + $self->create_trans_number if !defined $self->vendornumber || $self->vendornumber eq ''; + return 1; +} + +sub validate { + my ($self) = @_; + + my @errors; + push @errors, $::locale->text('The vendor name is missing.') if !$self->name; + + return @errors; +} + +sub displayable_name { + my $self = shift; + + return join ' ', grep $_, $self->vendornumber, $self->name; +} + +sub is_customer { 0 }; +sub is_vendor { 1 }; +sub payment_terms { goto &payment } + 1;