Revision 07948c34
Von Moritz Bunkus vor mehr als 16 Jahren hinzugefügt
bin/mozilla/io.pl | ||
---|---|---|
150 | 150 |
my @column_index = map { $_->{id} } grep { $_->{display} } @HEADER; |
151 | 151 |
|
152 | 152 |
# cache units |
153 |
my $dimension_units = AM->retrieve_units(\%myconfig, $form, "dimension"); |
|
154 |
my $service_units = AM->retrieve_units(\%myconfig, $form, "service"); |
|
155 | 153 |
my $all_units = AM->retrieve_units(\%myconfig, $form); |
156 | 154 |
|
157 | 155 |
my %price_factors = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} }; |
... | ... | |
200 | 198 |
$form->{"unit_old_$i"} ||= $form->{"unit_$i"}; |
201 | 199 |
$form->{"selected_unit_$i"} ||= $form->{"unit_$i"}; |
202 | 200 |
|
203 |
my $local_units = $form->{"inventory_accno_$i"} || $form->{"assembly_$i"} ? $dimension_units |
|
204 |
: $form->{"id_$i"} ? $service_units |
|
205 |
: $all_units; |
|
206 |
if ( !$local_units->{$form->{"selected_unit_$i"}} # Die ausgewaehlte Einheit ist fuer diesen Artikel nicht gueltig |
|
201 |
if ( !$all_units->{$form->{"selected_unit_$i"}} # Die ausgewaehlte Einheit ist fuer diesen Artikel nicht gueltig |
|
207 | 202 |
|| !AM->convert_unit($form->{"selected_unit_$i"}, $form->{"unit_old_$i"}, $all_units)) { # (z.B. Dimensionseinheit war ausgewaehlt, es handelt sich aber |
208 | 203 |
$form->{"unit_old_$i"} = $form->{"selected_unit_$i"} = $form->{"unit_$i"}; # um eine Dienstleistung). Dann keinerlei Umrechnung vornehmen. |
209 | 204 |
} |
... | ... | |
230 | 225 |
$column_data{price_factor} = ' '; |
231 | 226 |
} |
232 | 227 |
|
233 |
$column_data{"unit"} = AM->unit_select_html($local_units, "unit_$i", $this_unit, $form->{"id_$i"} ? $form->{"unit_$i"} : undef);
|
|
228 |
$column_data{"unit"} = AM->unit_select_html($all_units, "unit_$i", $this_unit, $form->{"id_$i"} ? $form->{"unit_$i"} : undef);
|
|
234 | 229 |
# / unit ending |
235 | 230 |
|
236 | 231 |
$form->{"sellprice_$i"} =~ /\.(\d+)/; |
Auch abrufbar als: Unified diff
Trennung zwischen Dienstleistungs- und Wareneinheiten aufgehoben.