X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=inline;f=SL%2FSEPA.pm;h=ced75be7e1274e11727231e11e8ae6000b08d25f;hb=31b1b2c2a84f79d030033a3974957a94a11f752c;hp=9a2978314a66e51194747bc6f5b2b77613d451c0;hpb=7ad942750f0294bdbbbb6f0693bea17dcc75f18b;p=kivitendo-erp.git diff --git a/SL/SEPA.pm b/SL/SEPA.pm index 9a2978314..ced75be7e 100644 --- a/SL/SEPA.pm +++ b/SL/SEPA.pm @@ -21,7 +21,7 @@ sub retrieve_open_invoices { my $query = qq| - SELECT ${arap}.id, ${arap}.invnumber, ${arap}.${vc}_id, ${arap}.amount AS invoice_amount, ${arap}.invoice, + SELECT ${arap}.id, ${arap}.invnumber, ${arap}.${vc}_id as vc_id, ${arap}.amount AS invoice_amount, ${arap}.invoice, vc.name AS vcname, vc.language_id, ${arap}.duedate as duedate, COALESCE(vc.iban, '') <> '' AND COALESCE(vc.bic, '') <> '' AS vc_bank_info_ok, @@ -305,7 +305,7 @@ sub list_exports { push @where, 'se.vc = ?'; push @values, $vc; - my $where = ' WHERE ' . join(' AND ', map { "(${_})" } @where) if (@where); + my $where = @where ? ' WHERE ' . join(' AND ', map { "(${_})" } @where) : ''; my $query = qq|SELECT se.id, se.employee_id, se.executed, se.closed, itime::date AS export_date,