projekt kivitendo

    $open_invoice->{skonto_type} = 'without_skonto';

    foreach ( @{$all_open_sepa_export_items}) {

      if ( $_->ap_id == $open_invoice->id ||  $_->ar_id == $open_invoice->id ) {

        #$main::lxdebug->message(LXDebug->DEBUG2(),"sepa_exitem=".$_->id." for invoice ".$open_invoice->id." factor=".$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}->{is_ar}++ if  $_->ar_id == $open_invoice->id;

        $sepa_exports{$_->sepa_export_id}->{amount} += $_->amount * $factor;

        push @{ $sepa_exports{$_->sepa_export_id}->{invoices} }, $open_invoice;