Revision efd84f2a
Von Jan Büren vor mehr als 1 Jahr hinzugefügt
| SL/Controller/Reconciliation.pm | ||
|---|---|---|
| 257 | 257 |
if ($linked_record->to_table eq 'ar') {
|
| 258 | 258 |
$invoice = SL::DB::Manager::Invoice->find_by(id => $linked_record->to_id); |
| 259 | 259 |
#find payments |
| 260 |
my $payments = SL::DB::Manager::AccTransaction->get_all(where => [ trans_id => $invoice->id, chart_link => { like => '%AR_paid%' }, transdate => $bt->transdate ]);
|
|
| 260 |
my $payments = SL::DB::Manager::AccTransaction->get_all(where => [ trans_id => $invoice->id, chart_id => $bt->local_bank_account->chart_id , transdate => $bt->transdate ]);
|
|
| 261 | 261 |
foreach my $payment (@{ $payments }) {
|
| 262 | 262 |
$check_sum += $payment->amount; |
| 263 | 263 |
push @{ $proposal->{BB} }, $payment;
|
| ... | ... | |
| 266 | 266 |
if ($linked_record->to_table eq 'ap') {
|
| 267 | 267 |
$invoice = SL::DB::Manager::PurchaseInvoice->find_by(id => $linked_record->to_id); |
| 268 | 268 |
#find payments |
| 269 |
my $payments = SL::DB::Manager::AccTransaction->get_all(where => [ trans_id => $invoice->id, chart_link => { like => '%AP_paid%' }, transdate => $bt->transdate ]);
|
|
| 269 |
my $payments = SL::DB::Manager::AccTransaction->get_all(where => [ trans_id => $invoice->id, chart_id => $bt->local_bank_account->chart_id, transdate => $bt->transdate ]);
|
|
| 270 | 270 |
foreach my $payment (@{ $payments }) {
|
| 271 | 271 |
$check_sum += $payment->amount; |
| 272 | 272 |
push @{ $proposal->{BB} }, $payment;
|
Auch abrufbar als: Unified diff
Kontenabgleich mit Bank, in acc_trans mit chart_id anstatt chart_link suchen
Ansonsten kommen auch die ganzen Skonto-Konten hoch und der Abgleich
geht auf keinen Fall mehr genau auf => entsprechend kurze Vorschlagsliste