X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/98b64fe1e380c232428d63cea0eb5f44b1d1a2c3..c954dea7c1b814d66b8c31d04fa70a1bbbcce71e:/SL/DB/Helper/FlattenToForm.pm?ds=sidebyside diff --git a/SL/DB/Helper/FlattenToForm.pm b/SL/DB/Helper/FlattenToForm.pm index cca17044b..3627cfa49 100644 --- a/SL/DB/Helper/FlattenToForm.pm +++ b/SL/DB/Helper/FlattenToForm.pm @@ -56,6 +56,8 @@ sub flatten_to_form { my $user = User->new(login => $self->employee->login); $form->{"employee_$_"} = $user->{$_} for qw(tel email fax); } + # company is employee and login independent + $form->{"${_}_company"} = $::instance_conf->get_company for qw (employee salesman); $form->{employee} = $self->employee->name if _has($self, 'employee_id'); $form->{language} = $self->language->template_code if _has($self, 'language_id');