X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1baea8cb6d9de284e35c8dc981c7a9559e9e9888..2d0387d1624b5b7ed6b13b79b9d5a87ce9b6d12b:/SL/DB/Helper/FlattenToForm.pm diff --git a/SL/DB/Helper/FlattenToForm.pm b/SL/DB/Helper/FlattenToForm.pm index 5ba2f3d57..f99993922 100644 --- a/SL/DB/Helper/FlattenToForm.pm +++ b/SL/DB/Helper/FlattenToForm.pm @@ -39,7 +39,7 @@ sub flatten_to_form { department_1 department_2 discount email fax gln greeting homepage iban language name natural_person phone street taxnumber ustid zipcode), "${vc}number", - ($vc eq 'customer')? 'c_vendor_id': 'v_customer_id'); + ($vc eq 'customer')? qw(c_vendor_id c_vendor_routing_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 exchangerate)); @@ -97,7 +97,7 @@ sub flatten_to_form { _copy($item->part, $form, '', "_${idx}", 0, qw(listprice)); _copy($item, $form, '', "_${idx}", 0, qw(description project_id ship serialnumber pricegroup_id ordnumber donumber cusordnumber unit subtotal longdescription price_factor_id marge_price_factor reqdate transdate - active_price_source active_discount_source)); + active_price_source active_discount_source optional)); _copy($item, $form, '', "_${idx}", $format_noround, qw(qty sellprice fxsellprice)); _copy($item, $form, '', "_${idx}", $format_amounts, qw(marge_total marge_percent lastcost)); _copy($item, $form, '', "_${idx}", $format_percent, qw(discount));