Revision b6d6ad18
Von Moritz Bunkus vor fast 12 Jahren hinzugefügt
SL/SEPA.pm | ||
---|---|---|
18 | 18 |
my $dbh = $params{dbh} || $form->get_standard_dbh($myconfig); |
19 | 19 |
my $arap = $params{vc} eq 'customer' ? 'ar' : 'ap'; |
20 | 20 |
my $vc = $params{vc} eq 'customer' ? 'customer' : 'vendor'; |
21 |
my $extra_columns = $arap eq 'ar' ? 'ar.direct_debit, ' : ''; |
|
21 | 22 |
|
22 | 23 |
my $query = |
23 | 24 |
qq| |
24 | 25 |
SELECT ${arap}.id, ${arap}.invnumber, ${arap}.${vc}_id as vc_id, ${arap}.amount AS invoice_amount, ${arap}.invoice, |
25 |
vc.name AS vcname, vc.language_id, ${arap}.duedate as duedate, |
|
26 |
vc.name AS vcname, vc.language_id, ${arap}.duedate as duedate, ${extra_columns}
|
|
26 | 27 |
|
27 | 28 |
COALESCE(vc.iban, '') <> '' AND COALESCE(vc.bic, '') <> '' AS vc_bank_info_ok, |
28 | 29 |
|
bin/mozilla/sepa.pl | ||
---|---|---|
40 | 40 |
return; |
41 | 41 |
} |
42 | 42 |
|
43 |
$_->{checked} = $_->{direct_debit} for @{ $invoices }; |
|
44 |
|
|
43 | 45 |
my $bank_account_label_sub = sub { $locale->text('Account number #1, bank code #2, #3', $_[0]->{account_number}, $_[0]->{bank_code}, $_[0]->{bank}) }; |
44 | 46 |
|
45 | 47 |
my $translation_list = GenericTranslations->list(translation_type => 'sepa_remittance_info_pfx'); |
templates/webpages/sepa/bank_transfer_add.html | ||
---|---|---|
47 | 47 |
<tr class="listrow[% loop.count % 2 %]"> |
48 | 48 |
<td align="center"> |
49 | 49 |
[%- IF invoice.vc_bank_info_ok %] |
50 |
<input type="checkbox" name="bank_transfers[].selected" value="1"> |
|
50 |
<input type="checkbox" name="bank_transfers[].selected" value="1"[% IF invoice.checked %] checked[% END %]>
|
|
51 | 51 |
[%- END %] |
52 | 52 |
</td> |
53 | 53 |
<td> |
Auch abrufbar als: Unified diff
SEPA-Einzug: Rechnungen mit gesetztem "Lastschrifteinzug" vorauswählen