X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FHelper%2FFlattenToForm.pm;h=1f54a8afef1cd5aae59268ebfedf22e88120a1e2;hb=eb974ef68990905c94b52a28c133780f0b8890ed;hp=920bdf2e84123557602b62e93bf7db94596b1fdf;hpb=ec77bc7820d8cc17dd44e8fdef943f3276efcae4;p=kivitendo-erp.git diff --git a/SL/DB/Helper/FlattenToForm.pm b/SL/DB/Helper/FlattenToForm.pm index 920bdf2e8..1f54a8afe 100644 --- a/SL/DB/Helper/FlattenToForm.pm +++ b/SL/DB/Helper/FlattenToForm.pm @@ -52,10 +52,8 @@ sub flatten_to_form { _copy($self->salesman, $form, 'salesman_', '', 0, map { $_->name } SL::DB::Employee->meta->columns) if _has($self, 'salesman_id'); _copy($self->acceptance_confirmed_by, $form, 'acceptance_confirmed_by_', '', 0, map { $_->name } SL::DB::Employee->meta->columns) if _has($self, 'acceptance_confirmed_by_id'); - if (_has($self, 'employee_id')) { - my $user = User->new(login => $self->employee->login); - $form->{"employee_$_"} = $user->{$_} for qw(tel email fax); - } + _handle_user_data($self, $form); + # company is employee and login independent $form->{"${_}_company"} = $::instance_conf->get_company for qw (employee salesman); @@ -170,4 +168,23 @@ sub _determine_cvar_validity { ); } +sub _handle_user_data { + my ($self, $form) = @_; + + foreach my $type (qw(employee salesman)) { + next if !_has($self, "${type}_id"); + + my $user = User->new(login => $self->$type->login); + $form->{"${type}_$_"} = $user->{$_} for qw(tel email fax signature); + + if ($self->$type->deleted) { + for my $key (grep { $_ =~ m{^deleted_} } SL::DB::Employee->meta->columns) { + $key =~ s{^deleted_}{}; + $form->{"${type}_${key}"} = $form->{"${type}_deleted_${key}"} + } + } + + } +} + 1;