Revision 2a968d9a
Von Jan Büren vor mehr als 6 Jahren hinzugefügt
SL/Controller/BankTransaction.pm | ||
---|---|---|
|
||
use List::UtilsBy qw(partition_by);
|
||
use List::MoreUtils qw(any);
|
||
use List::MoreUtils qw(any none);
|
||
use List::Util qw(max);
|
||
|
||
use Rose::Object::MakeMethods::Generic
|
||
... | ... | |
$open_invoice->{skonto_type} = 'without_skonto';
|
||
foreach (@{ $sepa_export_items_by_id{ $open_invoice->id } || [] }) {
|
||
my $factor = ($_->ar_id == $open_invoice->id ? 1 : -1);
|
||
$open_invoice->{realamount} = $::form->format_sellprice($open_invoice->amount*$factor);
|
||
$open_invoice->{realamount} = $::form->format_amount(\%::myconfig,$open_invoice->amount*$factor,2);
|
||
|
||
$open_invoice->{skonto_type} = $_->payment_type;
|
||
$sepa_exports{$_->sepa_export_id} ||= { count => 0, is_ar => 0, amount => 0, proposed => 0, invoices => [], item => $_ };
|
||
$sepa_exports{$_->sepa_export_id}->{count}++;
|
Auch abrufbar als: Unified diff
Ergänzung zum cherry-pick von gerade format_sellprice ist nicht in Form.pm
Ferner doppelt gepickte Bibliothek entfernt.