X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/c74b01dd6d1e7236c034d907ff999b7121710bf9..040aa711a11c32b18e08f048a4014310bddf074f:/SL/DB/Helper/FlattenToForm.pm diff --git a/SL/DB/Helper/FlattenToForm.pm b/SL/DB/Helper/FlattenToForm.pm index a0daf4491..7a3922c99 100644 --- a/SL/DB/Helper/FlattenToForm.pm +++ b/SL/DB/Helper/FlattenToForm.pm @@ -20,8 +20,10 @@ sub flatten_to_form { if ( $vc eq 'customer' ) { $form->{customer_id} = $self->customer_id; + $form->{customer} = $self->customer->name if $self->customer; } else { - $form->{vendor_id} = $self->vendor_id; + $form->{vendor_id} = $self->vendor_id; + $form->{vendor} = $self->vendor->name if $self->vendor; }; if (_has($self, 'transdate')) { @@ -31,7 +33,7 @@ sub flatten_to_form { $form->{$transdate_idx} = $self->transdate->to_lxoffice; } - $form->{vc} = $vc if ref($self) =~ m{^SL::DB::(?:.*Invoice|Order)}; + $form->{vc} = $vc if ref($self) =~ m{^SL::DB::(?:.*Invoice|.*Order)}; my @vc_fields = (qw(account_number bank bank_code bic business city contact country creditlimit department_1 department_2 discount email fax gln homepage iban language name