From 3fa948b441ab38d7754c3ec6f14fca72fe51fc54 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Mon, 16 Jan 2012 18:40:26 +0100 Subject: [PATCH] Keine Umlagerungen mehr ohne Chargennummer erlauben. Wenn keine angegeben, wird jetzt automatisch eine leere Chargennummer benutzt. --- SL/WH.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/SL/WH.pm b/SL/WH.pm index f760f5e9b..eb3762682 100644 --- a/SL/WH.pm +++ b/SL/WH.pm @@ -115,6 +115,8 @@ sub transfer { $qty /= $part->unit_obj->factor || 1 if $part->unit; } + $params{chargenumber} ||= ''; + if ($direction & 1) { SL::DB::Inventory->new( %params, -- 2.20.1