X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/566d2e3d39ec9f699aeb32b244ccb912b4c90718..e0201a3f8f11b3a32f76b0c89eebb475e4798eca:/SL/DO.pm diff --git a/SL/DO.pm b/SL/DO.pm index e847f5e33..f2675d3e9 100644 --- a/SL/DO.pm +++ b/SL/DO.pm @@ -41,6 +41,7 @@ use SL::Common; use SL::CVar; use SL::DBUtils; use SL::RecordLinks; +use SL::IC; sub transactions { $main::lxdebug->enter_sub(); @@ -777,12 +778,17 @@ sub order_details { my $ic_cvar_configs = CVar->get_configs(module => 'IC'); + $form->{TEMPLATE_ARRAYS} = { }; + IC->prepare_parts_for_printing(); + my @arrays = qw(runningnumber number description longdescription qty unit partnotes serialnumber reqdate projectnumber si_runningnumber si_number si_description si_warehouse si_bin si_chargenumber si_qty si_unit); + map { $form->{TEMPLATE_ARRAYS}->{$_} = [] } (@arrays, @tax_arrays); + push @arrays, map { "ic_cvar_$_->{name}" } @{ $ic_cvar_configs }; my $sameitem = "";