Hash initialisieren.

diff --git a/SL/IS.pm b/SL/IS.pm
index f2eef1edb9d3d13382b2eb214d18932b5fa1fd01..0ec51c10d822e0692df7bf8db567bb000e0bda45 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;
 
   my %price_factors = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} };
   my $price_factor;
 

+  $form->{amount}      = {};

   $form->{amount_cogs} = {};
 
   foreach my $i (1 .. $form->{rowcount}) {
   $form->{amount_cogs} = {};
 
   foreach my $i (1 .. $form->{rowcount}) {