1 package SL::DB::Customer;
5 use SL::DB::MetaSetup::Customer;
6 use SL::DB::Manager::Customer;
7 use SL::DB::Helper::TransNumberGenerator;
11 __PACKAGE__->meta->add_relationship(
13 type => 'one to many',
14 class => 'SL::DB::Shipto',
15 column_map => { id => 'trans_id' },
16 manager_args => { sort_by => 'lower(shipto.shiptoname)' },
17 query_args => [ 'module' => 'CT' ],
21 class => 'SL::DB::Business',
22 column_map => { business_id => 'id' },
26 __PACKAGE__->meta->make_manager_class;
27 __PACKAGE__->meta->initialize;
29 __PACKAGE__->before_save('_before_save_set_customernumber');
31 sub _before_save_set_customernumber {
34 $self->create_trans_number if $self->customernumber eq '';
41 return join ', ', grep { $_ } $self->street, $self->zipcode, $self->city;