From 203d3ceef9acbc0eeecf36f50cf9ab932be134db Mon Sep 17 00:00:00 2001 From: =?utf8?q?Bernd=20Ble=C3=9Fmann?= Date: Fri, 11 Sep 2020 21:21:00 +0200 Subject: [PATCH] sepa: Kosmetik: Kommentar neu formatiert. --- bin/mozilla/sepa.pl | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/bin/mozilla/sepa.pl b/bin/mozilla/sepa.pl index 7218846a9..b78083e99 100755 --- a/bin/mozilla/sepa.pl +++ b/bin/mozilla/sepa.pl @@ -102,10 +102,11 @@ sub bank_transfer_create { my $arap_id = $vc eq 'customer' ? 'ar_id' : 'ap_id'; my $invoices = SL::SEPA->retrieve_open_invoices(vc => $vc); - # load all open invoices (again), but grep out the ones that were selected with checkboxes beforehand ($_->selected). At this stage we again have all the invoice information, including dropdown with payment_type options - # all the information from retrieve_open_invoices is then ADDED to what was passed via @{ $form->{bank_transfers} } - # parse amount from the entry in the form, but take skonto_amount from PT again - # the map inserts the values of invoice_map directly into the array of hashes + # Load all open invoices (again), but grep out the ones that were selected with checkboxes beforehand ($_->selected). + # At this stage we again have all the invoice information, including dropdown with payment_type options. + # All the information from retrieve_open_invoices is then ADDED to what was passed via @{ $form->{bank_transfers} }. + # Parse amount from the entry in the form, but take skonto_amount from PT again. + # The map inserts the values of invoice_map directly into the array of hashes. my %selected_ids = map { ($_ => 1) } @{ $form->{ids} || [] }; my %invoices_map = map { $_->{id} => $_ } @{ $invoices }; my @bank_transfers = -- 2.20.1