X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/fb742b355ca83bb1d7d9318faa500265f27fde3b..4ec753d:/SL/DB/Helper/FlattenToForm.pm?ds=inline diff --git a/SL/DB/Helper/FlattenToForm.pm b/SL/DB/Helper/FlattenToForm.pm index 1e6ab9bc6..4dca557f9 100644 --- a/SL/DB/Helper/FlattenToForm.pm +++ b/SL/DB/Helper/FlattenToForm.pm @@ -70,6 +70,12 @@ sub flatten_to_form { _copy($item->project, $form, 'project', "_${idx}", 0, qw(number description)) if _has($item, 'project_id'); _copy_custom_variables($item, $form, 'ic_cvar_', "_${idx}"); + + if (ref($self) eq 'SL::DB::Invoice') { + my $date = $item->deliverydate ? $item->deliverydate->to_lxoffice : undef; + $form->{"deliverydate_oe_${idx}"} = $date; + $form->{"reqdate_${idx}"} = $date; + } } _copy_custom_variables($self, $form, 'vc_cvar_', '');