Revision a9d9ca02
Von Bernd Bleßmann vor mehr als 2 Jahren hinzugefügt
| SL/Controller/BankTransaction.pm | ||
|---|---|---|
| 90 | 90 |
sort_by => $sort_by, |
| 91 | 91 |
limit => 10000, |
| 92 | 92 |
where => [ |
| 93 |
amount => {ne => \'invoice_amount'},
|
|
| 93 |
amount => {ne => \'invoice_amount'}, # '} make emacs happy
|
|
| 94 | 94 |
local_bank_account_id => $params{bank_account}->id,
|
| 95 | 95 |
cleared => 0, |
| 96 | 96 |
@where |
| 97 | 97 |
], |
| 98 | 98 |
); |
| 99 | 99 |
# credit notes have a negative amount, treat differently |
| 100 |
my $all_open_ar_invoices = SL::DB::Manager::Invoice ->get_all(where => [ or => [ amount => { gt => \'paid' },
|
|
| 101 |
and => [ type => 'credit_note', |
|
| 102 |
amount => { lt => \'paid' }
|
|
| 103 |
], |
|
| 104 |
], |
|
| 105 |
], |
|
| 106 |
with_objects => ['customer','payment_terms']); |
|
| 107 |
|
|
| 108 |
my $all_open_ap_invoices = SL::DB::Manager::PurchaseInvoice->get_all(where => [amount => { ne => \'paid' }], with_objects => ['vendor' ,'payment_terms']);
|
|
| 109 |
my $all_open_sepa_export_items = SL::DB::Manager::SepaExportItem->get_all(where => [chart_id => $params{bank_account}->chart_id ,
|
|
| 110 |
'sepa_export.executed' => 0, 'sepa_export.closed' => 0 ], with_objects => ['sepa_export']); |
|
| 100 |
my $all_open_ar_invoices = SL::DB::Manager::Invoice->get_all(where => [ or => [ amount => { gt => \'paid' }, # '} make emacs happy
|
|
| 101 |
and => [ type => 'credit_note', |
|
| 102 |
amount => { lt => \'paid' } # '} make emacs happy
|
|
| 103 |
], |
|
| 104 |
], |
|
| 105 |
], |
|
| 106 |
with_objects => ['customer','payment_terms']); |
|
| 107 |
|
|
| 108 |
my $all_open_ap_invoices = SL::DB::Manager::PurchaseInvoice->get_all(where => [amount => { ne => \'paid' }], # '}] make emacs happy
|
|
| 109 |
with_objects => ['vendor' ,'payment_terms']); |
|
| 110 |
my $all_open_sepa_export_items = SL::DB::Manager::SepaExportItem->get_all(where => [chart_id => $params{bank_account}->chart_id ,
|
|
| 111 |
'sepa_export.executed' => 0, |
|
| 112 |
'sepa_export.closed' => 0 |
|
| 113 |
], |
|
| 114 |
with_objects => ['sepa_export']); |
|
| 111 | 115 |
|
| 112 | 116 |
my @all_open_invoices; |
| 113 | 117 |
# filter out invoices with less than 1 cent outstanding |
Auch abrufbar als: Unified diff
BankTransaction: Kosmetik: Ausrichtung und "make emacs happy"