Hash initialisieren.

diff --git a/SL/IS.pm b/SL/IS.pm
index f2eef1e..0ec51c1 100644 (file)
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -553,6 +553,7 @@ sub post_invoice {
   my %price_factors = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} };
   my $price_factor;
 
+  $form->{amount}      = {};
   $form->{amount_cogs} = {};
 
   foreach my $i (1 .. $form->{rowcount}) {