USTVA Weiteren toten Code identifizieren - Werte mit Key undef ignorieren

[mfinanz.git] / SL / USTVA.pm

diff --git a/SL/USTVA.pm b/SL/USTVA.pm
index e4fb191c0f6339a63adbc191666704fac9f5af4c..556698e8c09ab3e3409e21ce804dbb1342b1da7b 100644 (file)
--- a/SL/USTVA.pm
+++ b/SL/USTVA.pm
@@ -845,7 +845,7 @@ sub get_accounts_ustva {
   $sth->execute || $form->dberror($query);
 
   while (my $ref = $sth->fetchrow_hashref("NAME_lc")) {
-    # Bug 365 solved?!
+    next unless $ref->{$category};
     $ref->{amount} *= -1;
     $form->{ $ref->{$category} } += $ref->{amount};
   }