Revision 99a94401
Von Cem Aydin vor etwa 2 Jahren hinzugefügt
| SL/DB/BankTransaction.pm | ||
|---|---|---|
| 82 | 82 |
wrong_sign => -4, |
| 83 | 83 |
sepa_export_item => 5, |
| 84 | 84 |
batch_sepa_transaction => 20, |
| 85 |
qr_reference => 20, |
|
| 85 | 86 |
); |
| 86 | 87 |
|
| 87 | 88 |
my ($agreement,$rule_matches); |
| ... | ... | |
| 91 | 92 |
$rule_matches .= 'batch_sepa_transaction(' . $points{'batch_sepa_transaction'} . ') ';
|
| 92 | 93 |
} |
| 93 | 94 |
|
| 95 |
# check swiss qr reference if feature enabled |
|
| 96 |
if ($::instance_conf->get_create_qrbill_invoices == 1) {
|
|
| 97 |
if ($self->{qr_reference} && $invoice->{qr_reference} &&
|
|
| 98 |
$self->{qr_reference} eq $invoice->{qr_reference}) {
|
|
| 99 |
|
|
| 100 |
$agreement += $points{qr_reference};
|
|
| 101 |
$rule_matches .= 'qr_reference(' . $points{'qr_reference'} . ') ';
|
|
| 102 |
} |
|
| 103 |
} |
|
| 104 |
|
|
| 94 | 105 |
# compare banking arrangements |
| 95 | 106 |
my ($iban, $bank_code, $account_number); |
| 96 | 107 |
$bank_code = $invoice->customer->bank_code if $invoice->is_sales; |
Auch abrufbar als: Unified diff
Swiss QR-Bill: Beim Filter für Bankbuchungen bzw. Kontenabgleich QR-Referenz berücksichtigen