Revision 866ed897
Von Jan Büren vor mehr als 3 Jahren hinzugefügt
| SL/Controller/BankTransaction.pm | ||
|---|---|---|
| 206 | 206 |
# to qualify as a proposal there has to be |
| 207 | 207 |
# * agreement >= 5 TODO: make threshold configurable in configuration |
| 208 | 208 |
# * there must be only one exact match |
| 209 |
# * depending on whether sales or purchase the amount has to have the correct sign (so Gutschriften don't work?) |
|
| 210 | 209 |
my $proposal_threshold = 5; |
| 211 | 210 |
my @otherproposals = grep {
|
| 212 | 211 |
($_->{agreement} >= $proposal_threshold)
|
| 213 | 212 |
&& (1 == scalar @{ $_->{proposals} })
|
| 214 |
&& (@{ $_->{proposals} }[0]->is_sales ? abs(@{ $_->{proposals} }[0]->amount - $_->amount) < 0.01
|
|
| 215 |
: abs(@{ $_->{proposals} }[0]->amount + $_->amount) < 0.01)
|
|
| 216 | 213 |
} @{ $bank_transactions };
|
| 217 | 214 |
|
| 218 | 215 |
push @proposals, @otherproposals; |
Auch abrufbar als: Unified diff
Kontoauszug verbuchen: Vorschlagsliste verbessern
- Kommentar stimmt nicht mit dem Code überein.
- Die Prüfung verhindert das Banktransaktionen mit einer Summe größer der
Rechnungssumme als Vorschlag zugewiesen werden. Das war wichtig,
weil der Payment-Helper zu Beginn immer die komplette Bankbewegung auf
einen Beleg gebucht hat. Das ist mittlerweile besser gelöst.