X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FDB%2FHelper%2FFlattenToForm.pm;h=ddc5f0696e7826283c81aaaa502a1b059ad05418;hb=78d813b90a293eafa7e17f711edeef5551f937d3;hp=dff9e1df9740f7658dfffc2c00096a6b0b54f8ac;hpb=f83b7068545abf5b9da6d13019f872eb989b8fc9;p=kivitendo-erp.git diff --git a/SL/DB/Helper/FlattenToForm.pm b/SL/DB/Helper/FlattenToForm.pm index dff9e1df9..ddc5f0696 100644 --- a/SL/DB/Helper/FlattenToForm.pm +++ b/SL/DB/Helper/FlattenToForm.pm @@ -82,7 +82,9 @@ sub flatten_to_form { $idx++; - $form->{"partsgroup_${idx}"} = $item->part->partsgroup->partsgroup if _has($item->part, 'partsgroup_id'); + $form->{"std_warehouse_${idx}"} = $item->part->warehouse->description if _has($item->part, 'warehouse_id'); + $form->{"std_bin_${idx}"} = $item->part->bin->description if _has($item->part, 'bin_id'); + $form->{"partsgroup_${idx}"} = $item->part->partsgroup->partsgroup if _has($item->part, 'partsgroup_id'); _copy($item, $form, "${items_name}_", "_${idx}", 0, qw(id)) if $items_name; # TODO: is part_type correct here? Do we need to set part_type as default? _copy($item->part, $form, '', "_${idx}", 0, qw(id partnumber weight part_type)); @@ -105,6 +107,7 @@ sub flatten_to_form { } _copy_custom_variables($self, $form, 'vc_cvar_', '', $cvar_validity{vc}); + _copy_custom_variables($self->contact, $form, 'cp_cvar_', '') if $self->contact; return $self; } @@ -131,7 +134,7 @@ sub _copy { sub _copy_custom_variables { my ($src, $form, $prefix, $postfix, $cvar_validity) = @_; - my $obj = (any { ref($src) eq $_ } qw(SL::DB::OrderItem SL::DB::DeliveryOrderItem SL::DB::InvoiceItem)) + my $obj = (any { ref($src) eq $_ } qw(SL::DB::OrderItem SL::DB::DeliveryOrderItem SL::DB::InvoiceItem SL::DB::Contact)) ? $src : $src->customervendor;