X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/40ebe601936458cebc78a48a20b2cc5e67f6c1da..9d07c34f5b429bfc118629d74b376479c37a8383:/SL/WH.pm diff --git a/SL/WH.pm b/SL/WH.pm index 5b24cfd70..a8c1ae3bf 100644 --- a/SL/WH.pm +++ b/SL/WH.pm @@ -110,7 +110,7 @@ sub transfer { trans_id => $trans_id, shippingdate => !$transfer->{shippingdate} || $transfer->{shippingdate} eq 'current_date' ? $now : $transfer->{shippingdate}, - map { $_ => $transfer->{$_} } qw( chargenumber bestbefore oe_id delivery_order_items_stock_id comment), + map { $_ => $transfer->{$_} } qw(chargenumber bestbefore oe_id delivery_order_items_stock_id invoice_id comment), ); if ($unit) {