Eine Warnung über undefinierte Werte vermeiden.

[mfinanz.git] / SL / WH.pm

diff --git a/SL/WH.pm b/SL/WH.pm
index a8492ec0a7a49661bc00892cbfd02adbd934d9ca..91ac127076c94916f542da34254f284e522f8b0e 100644 (file)
--- a/SL/WH.pm
+++ b/SL/WH.pm
@@ -602,7 +602,7 @@ sub get_warehouse_report {
       @all_fields                    = keys %{ $ref } unless (@all_fields);
     }
 
-    $ref->{stock_value} *= $ref->{qty};
+    $ref->{stock_value} = ($ref->{stock_value} || 0) * $ref->{qty};
 
     push @contents, $ref;
   }