Revision 1a4d8bb8
Von Bernd Bleßmann vor etwa 3 Jahren hinzugefügt
| bin/mozilla/wh.pl | ||
|---|---|---|
| 198 | 198 |
my $all_units = AM->retrieve_units(\%myconfig, $form); |
| 199 | 199 |
|
| 200 | 200 |
foreach (@contents) {
|
| 201 |
$_->{qty} = $form->format_amount_units('amount' => $_->{qty},
|
|
| 202 |
'part_unit' => $_->{partunit},
|
|
| 203 |
'conv_units' => 'convertible'); |
|
| 201 |
$_->{qty} = $form->format_amount(\%myconfig, $_->{qty}) . ' ' . $_->{partunit};
|
|
| 202 |
|
|
| 204 | 203 |
my $this_unit = $_->{partunit};
|
| 205 | 204 |
|
| 206 | 205 |
if ($all_units->{$_->{partunit}} && ($all_units->{g}->{base_unit} eq $all_units->{$_->{partunit}}->{base_unit})) {
|
| ... | ... | |
| 1001 | 1000 |
map { $subtotals{$_} += $entry->{$_} } @subtotals_columns;
|
| 1002 | 1001 |
$total_stock_value += $entry->{stock_value} * 1;
|
| 1003 | 1002 |
$entry->{qty} = $form->format_amount(\%myconfig, $entry->{qty});
|
| 1004 |
# $entry->{qty} = $form->format_amount_units('amount' => $entry->{qty},
|
|
| 1005 |
# 'part_unit' => $entry->{partunit},
|
|
| 1006 |
# 'conv_units' => 'convertible'); |
|
| 1007 | 1003 |
$entry->{stock_value} = $form->format_amount(\%myconfig, $entry->{stock_value} * 1, 2);
|
| 1008 | 1004 |
$entry->{purchase_price} = $form->format_amount(\%myconfig, $entry->{purchase_price} * 1, 2);
|
| 1009 | 1005 |
$entry->{list_price} = $form->format_amount(\%myconfig, $entry->{list_price} * 1, 2);
|
| ... | ... | |
| 1016 | 1012 |
|
| 1017 | 1013 |
my $row = { map { $_ => { 'data' => '', 'class' => 'listsubtotal', 'align' => $column_alignment{$_}, } } @columns };
|
| 1018 | 1014 |
$row->{qty}->{data} = $form->format_amount(\%myconfig, $subtotals{qty});
|
| 1019 |
# $row->{qty}->{data} = $form->format_amount_units('amount' => $subtotals{qty} * 1,
|
|
| 1020 |
# 'part_unit' => $entry->{partunit},
|
|
| 1021 |
# 'conv_units' => 'convertible'); |
|
| 1022 | 1015 |
$row->{stock_value}->{data} = $form->format_amount(\%myconfig, $subtotals{stock_value} * 1, 2);
|
| 1023 | 1016 |
$row->{purchase_price}->{data} = $form->format_amount(\%myconfig, $subtotals{purchase_price} * 1, 2);
|
| 1024 | 1017 |
$row->{list_price}->{data} = $form->format_amount(\%myconfig, $subtotals{list_price} * 1, 2);
|
Auch abrufbar als: Unified diff
Aus- und Umlagern: Formatierung der Mengen in verschiedenen Einheiten entfernt.
Die Formatierung der Einheiten der Form "3L 510,0 ml" wurde entfernt.
Das betrifft die Spalte Lagerbestand in der Aus- bzw. Umlagermaske.
Die Menge wird jetzt in der Einheit des Artikels angezeigt.
Für den Lagerbericht waren die Stellen, wo formatiert wurde, schon geändert und
der alte Code war auskommentiert. Dieser auskommentierte Code wurde entfernt.