From: Bernd Bleßmann Date: Wed, 11 May 2022 09:48:19 +0000 (+0200) Subject: BankTransaction: Kosmetik: Ausrichtung und "make emacs happy" X-Git-Tag: kivitendo-mebil_0.1-0~10^2~2^2~34 X-Git-Url: http://wagnertech.de/git?p=kivitendo-erp.git;a=commitdiff_plain;h=a9d9ca02abd3a0ff1e43f23888142266174bec55 BankTransaction: Kosmetik: Ausrichtung und "make emacs happy" --- diff --git a/SL/Controller/BankTransaction.pm b/SL/Controller/BankTransaction.pm index 8263588bb..48f35ed04 100644 --- a/SL/Controller/BankTransaction.pm +++ b/SL/Controller/BankTransaction.pm @@ -90,24 +90,28 @@ sub gather_bank_transactions_and_proposals { sort_by => $sort_by, limit => 10000, where => [ - amount => {ne => \'invoice_amount'}, + amount => {ne => \'invoice_amount'}, # '} make emacs happy local_bank_account_id => $params{bank_account}->id, cleared => 0, @where ], ); # credit notes have a negative amount, treat differently - my $all_open_ar_invoices = SL::DB::Manager::Invoice ->get_all(where => [ or => [ amount => { gt => \'paid' }, - and => [ type => 'credit_note', - amount => { lt => \'paid' } - ], - ], - ], - with_objects => ['customer','payment_terms']); - - my $all_open_ap_invoices = SL::DB::Manager::PurchaseInvoice->get_all(where => [amount => { ne => \'paid' }], with_objects => ['vendor' ,'payment_terms']); - my $all_open_sepa_export_items = SL::DB::Manager::SepaExportItem->get_all(where => [chart_id => $params{bank_account}->chart_id , - 'sepa_export.executed' => 0, 'sepa_export.closed' => 0 ], with_objects => ['sepa_export']); + my $all_open_ar_invoices = SL::DB::Manager::Invoice->get_all(where => [ or => [ amount => { gt => \'paid' }, # '} make emacs happy + and => [ type => 'credit_note', + amount => { lt => \'paid' } # '} make emacs happy + ], + ], + ], + with_objects => ['customer','payment_terms']); + + my $all_open_ap_invoices = SL::DB::Manager::PurchaseInvoice->get_all(where => [amount => { ne => \'paid' }], # '}] make emacs happy + with_objects => ['vendor' ,'payment_terms']); + my $all_open_sepa_export_items = SL::DB::Manager::SepaExportItem->get_all(where => [chart_id => $params{bank_account}->chart_id , + 'sepa_export.executed' => 0, + 'sepa_export.closed' => 0 + ], + with_objects => ['sepa_export']); my @all_open_invoices; # filter out invoices with less than 1 cent outstanding