From 44351ca4b1e92a63eb80e23dfb6a84ccc503ce9c Mon Sep 17 00:00:00 2001 From: "Martin Helmling martin.helmling@octosoft.eu" Date: Wed, 10 Jan 2018 16:55:14 +0100 Subject: [PATCH] SEPA-Sammelanweisung (is_batch_transaction): BUGFIX Loop richtig beenden MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Wurde eine Sammelanweisung gefunden, ist die Suche für die betroffenen Banktransaktion beendet. Fälschlicherweise wurde nur die innere Schleife beendet, es muss aber die äußere Schleife beendet werden. --- SL/Controller/BankTransaction.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/SL/Controller/BankTransaction.pm b/SL/Controller/BankTransaction.pm index 692fb701b..fcea62217 100644 --- a/SL/Controller/BankTransaction.pm +++ b/SL/Controller/BankTransaction.pm @@ -153,6 +153,7 @@ sub action_list { $bt->{remote_name} .= $bt->{remote_name_1} if $bt->{remote_name_1}; if ( $bt->is_batch_transaction ) { + my $found=0; foreach ( keys %sepa_exports) { if ( abs(($sepa_exports{$_}->{amount} * 1) - ($bt->amount * 1)) < 0.01 ) { ## jupp @@ -160,9 +161,11 @@ sub action_list { $bt->{sepa_export_ok} = 1; $sepa_exports{$_}->{proposed}=1; push(@proposals, $bt); - next; + $found=1; + last; } } + next if $found; # batch transaction has no remotename !! } else { next unless $bt->{remote_name}; # bank has no name, usually fees, use create invoice to assign -- 2.20.1