custom_variables accessor wird jetzt vom mixin erstellt.
[kivitendo-erp.git] / SL / DB / Customer.pm
1 package SL::DB::Customer;
2
3 use strict;
4
5 use SL::DB::MetaSetup::Customer;
6 use SL::DB::Manager::Customer;
7 use SL::DB::Helper::TransNumberGenerator;
8 use SL::DB::Helper::CustomVariables (
9   module      => 'CT',
10   cvars_alias => 1,
11 );
12
13 use SL::DB::VC;
14
15 __PACKAGE__->meta->add_relationship(
16   shipto => {
17     type         => 'one to many',
18     class        => 'SL::DB::Shipto',
19     column_map   => { id      => 'trans_id' },
20     manager_args => { sort_by => 'lower(shipto.shiptoname)' },
21     query_args   => [ module   => 'CT' ],
22   },
23   contacts => {
24     type         => 'one to many',
25     class        => 'SL::DB::Contact',
26     column_map   => { id      => 'cp_cv_id' },
27     manager_args => { sort_by => 'lower(contacts.cp_name)' },
28   },
29   business => {
30     type         => 'one to one',
31     class        => 'SL::DB::Business',
32     column_map   => { business_id => 'id' },
33   },
34 );
35
36 __PACKAGE__->meta->initialize;
37
38 __PACKAGE__->before_save('_before_save_set_customernumber');
39
40 sub _before_save_set_customernumber {
41   my ($self) = @_;
42
43   $self->create_trans_number if $self->customernumber eq '';
44   return 1;
45 }
46
47 sub short_address {
48   my ($self) = @_;
49
50   return join ', ', grep { $_ } $self->street, $self->zipcode, $self->city;
51 }
52
53 1;