DATEV: Warnungen: Uninitialisierte Variablen

[kivitendo-erp.git] / SL / SEPA.pm

diff --git a/SL/SEPA.pm b/SL/SEPA.pm
index 7724a52aab6a6fb10eb4a9b186ce3c8493aa1231..3231ac9e96e8d3da8cd104eaab28d7d45f85cd89 100644 (file)
--- a/SL/SEPA.pm
+++ b/SL/SEPA.pm
@@ -168,7 +168,7 @@ sub _create_export {
       $transfer->{reference} = "${invnumber}-${num_payments}";
     }
 
-    $h_item_id->execute();
+    $h_item_id->execute() || $::form->dberror($q_item_id);
     my ($item_id)      = $h_item_id->fetchrow_array();
 
     my $end_to_end_id  = strftime "LXO%Y%m%d%H%M%S", localtime;