Revision 52ee8da6
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
|
($self->{netto_date}, $self->{skonto_date}) =
|
||
|
selectrow_query($self, $dbh, $query, $transdate, $self->{terms_netto}, $transdate, $self->{terms_skonto});
|
||
|
|
||
|
my $total = ($self->{invtotal}) ? $self->{invtotal} : $self->{ordtotal};
|
||
|
my $skonto_amount = $self->parse_amount($myconfig, $total) *
|
||
|
$self->{percent_skonto};
|
||
|
my ($invtotal, $total);
|
||
|
my (%amounts, %formatted_amounts);
|
||
|
|
||
|
$self->{skonto_amount} =
|
||
|
$self->format_amount($myconfig, $skonto_amount, 2);
|
||
|
if ($self->{type} =~ /_order$/) {
|
||
|
$amounts{invtotal} = $self->{ordtotal};
|
||
|
$amounts{total} = $self->{ordtotal};
|
||
|
|
||
|
} elsif ($self->{type} =~ /_quotation$/) {
|
||
|
$amounts{invtotal} = $self->{quototal};
|
||
|
$amounts{total} = $self->{quototal};
|
||
|
|
||
|
} else {
|
||
|
$amounts{invtotal} = $self->{invtotal};
|
||
|
$amounts{total} = $self->{total};
|
||
|
}
|
||
|
|
||
|
map { $amounts{$_} = $self->parse_amount($myconfig, $amounts{$_}) } keys %amounts;
|
||
|
|
||
|
$amounts{skonto_amount} = $amounts{invtotal} * $self->{percent_skonto};
|
||
|
$amounts{invtotal_wo_skonto} = $amounts{invtotal} * (1 - $self->{percent_skonto});
|
||
|
$amounts{total_wo_skonto} = $amounts{total} * (1 - $self->{percent_skonto});
|
||
|
|
||
|
map { $formatted_amounts{$_} = $self->format_amount($myconfig, $amounts{$_}, 2) } keys %amounts;
|
||
|
|
||
|
if ($self->{"language_id"}) {
|
||
|
$query =
|
||
| ... | ... | |
|
($output_numberformat ne $myconfig->{"numberformat"})) {
|
||
|
my $saved_numberformat = $myconfig->{"numberformat"};
|
||
|
$myconfig->{"numberformat"} = $output_numberformat;
|
||
|
$self->{skonto_amount} =
|
||
|
$self->format_amount($myconfig, $skonto_amount, 2);
|
||
|
map { $formatted_amounts{$_} = $self->format_amount($myconfig, $amounts{$_}) } keys %amounts;
|
||
|
$myconfig->{"numberformat"} = $saved_numberformat;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
$self->{payment_terms} =~ s/<%netto_date%>/$self->{netto_date}/g;
|
||
|
$self->{payment_terms} =~ s/<%skonto_date%>/$self->{skonto_date}/g;
|
||
|
$self->{payment_terms} =~ s/<%skonto_amount%>/$self->{skonto_amount}/g;
|
||
|
$self->{payment_terms} =~ s/<%total%>/$self->{total}/g;
|
||
|
$self->{payment_terms} =~ s/<%invtotal%>/$self->{invtotal}/g;
|
||
|
$self->{payment_terms} =~ s/<%currency%>/$self->{currency}/g;
|
||
|
$self->{payment_terms} =~ s/<%terms_netto%>/$self->{terms_netto}/g;
|
||
|
$self->{payment_terms} =~ s/<%account_number%>/$self->{account_number}/g;
|
||
|
$self->{payment_terms} =~ s/<%bank%>/$self->{bank}/g;
|
||
|
$self->{payment_terms} =~ s/<%bank_code%>/$self->{bank_code}/g;
|
||
|
|
||
|
map { $self->{payment_terms} =~ s/<%${_}%>/$formatted_amounts{$_}/g; } keys %formatted_amounts;
|
||
|
|
||
|
$main::lxdebug->leave_sub();
|
||
|
|
||
|
}
|
||
| bin/mozilla/am.pl | ||
|---|---|---|
|
<li>| . $locale->text("<%skonto_amount%> -- The deductible amount")
|
||
|
. qq|</li>
|
||
|
<li>| . $locale->text("<%total%> -- Amount payable")
|
||
|
. qq|</li>
|
||
|
<li>| . $locale->text("<%total_wo_skonto%> -- Amount payable less discount")
|
||
|
. qq|</li>
|
||
|
<li>| . $locale->text("<%invtotal%> -- Invoice total")
|
||
|
. qq|</li>
|
||
|
<li>| . $locale->text("<%invtotal_wo_skonto%> -- Invoice total less discount")
|
||
|
. qq|</li>
|
||
|
<li>| . $locale->text("<%currency%> -- The selected currency")
|
||
|
. qq|</li>
|
||
| doc/changelog | ||
|---|---|---|
|
|
||
|
Neue Features und Verbesserungen:
|
||
|
|
||
|
- Zahlungskonditionen: Neue Variablen <%invtotal_wo_skonto%> und
|
||
|
<%total_wo_skonto%> hinzugef?gt, die die Belegsumme bzw. die noch
|
||
|
offene Summe abz?glich des Skontobetrags beinhalten.
|
||
|
- Verkauf: Es wird der Ertrag (Marge) pro Position und gesamt
|
||
|
angezeigt.
|
||
|
- Bei allen Listenansichten/Berichten Buttons zum Export der Liste
|
||
| ... | ... | |
|
|
||
|
Bugfixes:
|
||
|
|
||
|
- Zahlungskonditionen: Die Variablen <%total%> und <%invtotal%>
|
||
|
waren nur bei Rechnungen gef?llt, nicht aber bei Angeboten und
|
||
|
Auftr?gen.
|
||
|
- Es wurde verhindert, dass durch Manipulation von $form->{callback}
|
||
|
beliebiger Code ausgef?hrt werden kann.
|
||
|
- Webdav: Wenn eine Pfadkomponente Leerzeichen enthielt
|
||
| locale/de/all | ||
|---|---|---|
|
'<%bank_code%> -- Your bank code' => '<%bank_code%> -- Die Bankleitzahl Ihrer Bank',
|
||
|
'<%currency%> -- The selected currency' => '<%currency%> -- Die ausgewählte Währung',
|
||
|
'<%invtotal%> -- Invoice total' => '<%invtotal%> -- Die Rechnungssumme',
|
||
|
'<%invtotal_wo_skonto%> -- Invoice total less discount' => '<%invtotal_wo_skonto%> -- Rechnungssumme abzüglich Skonto',
|
||
|
'<%netto_date%> -- Date the payment is due in full' => '<%netto_date%> -- Das Datum, bis die Rechnung in voller Höhe bezahlt werden muss',
|
||
|
'<%skonto_amount%> -- The deductible amount' => '<%skonto_amount%> -- Der abziehbare Skontobetrag',
|
||
|
'<%skonto_date%> -- Date the payment is due with discount' => '<%skonto_date%> -- Das Datum, bis die Rechnung unter Abzug von Skonto bezahlt werden kann',
|
||
|
'<%terms_netto%> -- The number of days for full payment' => '<%terms_netto%> -- Die Anzahl Tage, bis die Rechnung in voller Höhe bezahlt werden muss',
|
||
|
'<%total%> -- Amount payable' => '<%total%> -- Noch zu bezahlender Betrag',
|
||
|
'<%total_wo_skonto%> -- Amount payable less discount' => '<%total_wo_skonto%> -- Noch zu bezahlender Betrag abzüglich Skonto',
|
||
|
'*/' => '*/',
|
||
|
'...done' => '...fertig',
|
||
|
'1. Quarter' => '1. Quartal',
|
||
| locale/de/am | ||
|---|---|---|
|
'<%bank_code%> -- Your bank code' => '<%bank_code%> -- Die Bankleitzahl Ihrer Bank',
|
||
|
'<%currency%> -- The selected currency' => '<%currency%> -- Die ausgewählte Währung',
|
||
|
'<%invtotal%> -- Invoice total' => '<%invtotal%> -- Die Rechnungssumme',
|
||
|
'<%invtotal_wo_skonto%> -- Invoice total less discount' => '<%invtotal_wo_skonto%> -- Rechnungssumme abzüglich Skonto',
|
||
|
'<%netto_date%> -- Date the payment is due in full' => '<%netto_date%> -- Das Datum, bis die Rechnung in voller Höhe bezahlt werden muss',
|
||
|
'<%skonto_amount%> -- The deductible amount' => '<%skonto_amount%> -- Der abziehbare Skontobetrag',
|
||
|
'<%skonto_date%> -- Date the payment is due with discount' => '<%skonto_date%> -- Das Datum, bis die Rechnung unter Abzug von Skonto bezahlt werden kann',
|
||
|
'<%terms_netto%> -- The number of days for full payment' => '<%terms_netto%> -- Die Anzahl Tage, bis die Rechnung in voller Höhe bezahlt werden muss',
|
||
|
'<%total%> -- Amount payable' => '<%total%> -- Noch zu bezahlender Betrag',
|
||
|
'<%total_wo_skonto%> -- Amount payable less discount' => '<%total_wo_skonto%> -- Noch zu bezahlender Betrag abzüglich Skonto',
|
||
|
'A unit with this name does already exist.' => 'Eine Einheit mit diesem Namen existiert bereits.',
|
||
|
'ADDED' => 'Hinzugef?gt',
|
||
|
'Account' => 'Konto',
|
||
Auch abrufbar als: Unified diff
Zahlungskonditionen:
1. Neue Variablen <%invtotal_wo_skonto%> und <%total_wo_skonto%> hinzugefügt, die die Belegsumme bzw. die noch offene Summe abzüglich des Skontobetrags beinhalten.
2. Die Variablen <%total%> und <%invtotal%> waren nur bei Rechnungen gefüllt, nicht aber bei Angeboten und Aufträgen.