X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/efac2a408d07588733698720f7198bc053821449..21436d8b965f90a61813aedba3caa40e9f8eaf80:/SL/DB/Helper/FlattenToForm.pm diff --git a/SL/DB/Helper/FlattenToForm.pm b/SL/DB/Helper/FlattenToForm.pm index 198aae5b7..80633b602 100644 --- a/SL/DB/Helper/FlattenToForm.pm +++ b/SL/DB/Helper/FlattenToForm.pm @@ -29,9 +29,11 @@ sub flatten_to_form { $form->{vc} = $vc if ref($self) =~ /^SL::DB::.*Invoice/; - my @vc_fields = (qw(account_number bank bank_code bic business city contact country creditlimit discount - email fax homepage iban language name payment_terms phone street taxnumber zipcode), - "${vc}number"); + my @vc_fields = (qw(account_number bank bank_code bic business city contact country creditlimit + department_1 department_2 discount email fax homepage iban language name + payment_terms phone street taxnumber ustid zipcode), + "${vc}number", + ($vc eq 'customer')? 'c_vendor_id': 'v_customer_id'); my @vc_prefixed_fields = qw(email fax notes number phone); _copy($self, $form, '', '', 1, qw(amount netamount marge_total marge_percent container_remaining_weight container_remaining_volume paid));