Revision 07e01856
Von Bernd Bleßmann vor fast 3 Jahren hinzugefügt
SL/IS.pm | ||
---|---|---|
586 | 586 |
my %pat = $invoice_for_advance_payment->calculate_prices_and_taxes; |
587 | 587 |
my $taxamount = sum0 values %{ $pat{taxes_by_tax_id} }; |
588 | 588 |
|
589 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_$_"} }, $invoice_for_advance_payment->$_) for qw(invnumber transdate); |
|
590 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_amount_nofmt"} }, $invoice_for_advance_payment->amount); |
|
591 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_amount"} }, $invoice_for_advance_payment->amount_as_number); |
|
592 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_taxamount_nofmt"} }, $taxamount); |
|
593 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_taxamount"} }, $form->format_amount($myconfig, $taxamount, 2)); |
|
594 |
|
|
595 |
$form->{iap_amount_nofmt} += $invoice_for_advance_payment->amount; |
|
596 |
$form->{iap_taxamount_nofmt} += $taxamount; |
|
597 |
$form->{iap_existing} = 1; |
|
598 |
} |
|
599 |
$form->{iap_amount} = $form->format_amount($myconfig, $form->{iap_amount_nofmt}, 2); |
|
600 |
$form->{iap_taxamount} = $form->format_amount($myconfig, $form->{iap_taxamount_nofmt}, 2); |
|
589 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_$_"} }, $invoice_for_advance_payment->$_) for qw(invnumber transdate); |
|
590 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_amount_nofmt"} }, $invoice_for_advance_payment->amount); |
|
591 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_amount"} }, $invoice_for_advance_payment->amount_as_number); |
|
592 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_taxamount_nofmt"} }, $taxamount); |
|
593 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_taxamount"} }, $form->format_amount($myconfig, $taxamount, 2)); |
|
594 |
|
|
595 |
my $open_amount = $form->round_amount($invoice_for_advance_payment->open_amount, 2); |
|
596 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_open_amount_nofmt"} }, $open_amount); |
|
597 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"iap_open_amount"} }, $form->format_amount($myconfig, $open_amount, 2)); |
|
598 |
|
|
599 |
$form->{iap_amount_nofmt} += $invoice_for_advance_payment->amount; |
|
600 |
$form->{iap_taxamount_nofmt} += $taxamount; |
|
601 |
$form->{iap_open_amount_nofmt} += $open_amount; |
|
602 |
$form->{iap_existing} = 1; |
|
603 |
} |
|
604 |
$form->{iap_amount} = $form->format_amount($myconfig, $form->{iap_amount_nofmt}, 2); |
|
605 |
$form->{iap_taxamount} = $form->format_amount($myconfig, $form->{iap_taxamount_nofmt}, 2); |
|
606 |
$form->{iap_open_amount} = $form->format_amount($myconfig, $form->{iap_open_amount_nofmt}, 2); |
|
601 | 607 |
|
602 | 608 |
$main::lxdebug->leave_sub(); |
603 | 609 |
} |
Auch abrufbar als: Unified diff
Anzahlungs-Rg.: Druckvariblen: offenen Betrag jeder Anzahlungs-Rg. und Summe