X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/930e5ecb0d071e20e9fc57e6050859a0a7a5a98d..70ff48b402fcd79c156c7594c43acf12d78a4480:/SL/DB/Vendor.pm diff --git a/SL/DB/Vendor.pm b/SL/DB/Vendor.pm index e8ec8bca0..5841edadc 100644 --- a/SL/DB/Vendor.pm +++ b/SL/DB/Vendor.pm @@ -4,6 +4,10 @@ use strict; use SL::DB::MetaSetup::Vendor; use SL::DB::Helper::TransNumberGenerator; +use SL::DB::Helper::CustomVariables ( + module => 'CT', + cvars_alias => 1, +); use SL::DB::VC; @@ -13,7 +17,13 @@ __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' ], + }, + contacts => { + type => 'one to many', + class => 'SL::DB::Contact', + column_map => { id => 'cp_cv_id' }, + manager_args => { sort_by => 'lower(contacts.cp_name)' }, }, business => { type => 'one to one', @@ -31,6 +41,7 @@ sub _before_save_set_vendornumber { my ($self) = @_; $self->create_trans_number if $self->vendornumber eq ''; + return 1; } 1;