Bugfix: nicht abgefangene typenkonvertierung

diff --git a/SL/AP.pm b/SL/AP.pm
index d4fe48428f8e7e658319e9fd6e11f77c53ebac50..f5dd45ecef1a118976fc0765ce1e88ee8918043b 100644 (file)
--- a/SL/AP.pm
+++ b/SL/AP.pm
@@ -642,6 +642,7 @@ sub setup_form {
     $j = 0;
     $k = 0;
 
+    next unless $form->{acc_trans}{$key};
     for $i (1 .. scalar @{ $form->{acc_trans}{$key} }) {
 
       if ($key eq "AP_paid") {