Revision 7933b6bd
Von Udo Spallek vor etwa 19 Jahren hinzugefügt
| bin/mozilla/ir.pl | ||
|---|---|---|
| 176 | 176 |
$form->{"sellprice_$i"} =
|
| 177 | 177 |
$form->format_amount(\%myconfig, $form->{"sellprice_$i"},
|
| 178 | 178 |
$decimalplaces); |
| 179 |
|
|
| 180 |
(my $dec_qty) = ($form->{"qty_$i"} =~ /\.(\d+)/);
|
|
| 181 |
$dec_qty = length $dec_qty; |
|
| 182 |
|
|
| 179 | 183 |
$form->{"qty_$i"} =
|
| 180 |
$form->format_amount(\%myconfig, ($form->{"qty_$i"} * -1));
|
|
| 184 |
$form->format_amount(\%myconfig, ($form->{"qty_$i"} * -1), $dec_qty);
|
|
| 181 | 185 |
|
| 182 | 186 |
$form->{rowcount} = $i;
|
| 183 | 187 |
} |
| ... | ... | |
| 823 | 827 |
$form->format_amount(\%myconfig, $form->{"sellprice_$i"},
|
| 824 | 828 |
$decimalplaces); |
| 825 | 829 |
$form->{"qty_$i"} =
|
| 826 |
$form->format_amount(\%myconfig, $form->{"qty_$i"});
|
|
| 830 |
$form->format_amount(\%myconfig, $form->{"qty_$i"}, $dec_qty);
|
|
| 827 | 831 |
} |
| 828 | 832 |
|
| 829 | 833 |
&display_form; |
Auch abrufbar als: Unified diff
Bugfix: svn 639 - Auch die entsprechenden Buchungen sind falsch gewesen.
Angepasst für Verkauf: Rechnungen, Aufträge, Angebote und
Einkauf: Einkaufsrechnung, Lieferantenauftrag, Preisanfrage.