X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/46aa98a931708ad5ee5003437af92f0358e582b3..6f30741b2ec6d7d68aa37d7dc6918fd058c22c7b:/SL/DB/Helper/FlattenToForm.pm?ds=inline 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');