Revision 5b0ec556
Von Moritz Bunkus vor mehr als 16 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 919 | 919 |
my $self = shift; |
| 920 | 920 |
my %params = @_; |
| 921 | 921 |
|
| 922 |
Common::check_params(\%params, qw(amount part_unit)); |
|
| 923 |
|
|
| 924 | 922 |
my $myconfig = \%main::myconfig; |
| 925 |
my $amount = $params{amount};
|
|
| 923 |
my $amount = $params{amount} * 1;
|
|
| 926 | 924 |
my $places = $params{places};
|
| 927 | 925 |
my $part_unit_name = $params{part_unit};
|
| 928 | 926 |
my $amount_unit_name = $params{amount_unit};
|
| 929 | 927 |
my $conv_units = $params{conv_units};
|
| 930 | 928 |
my $max_places = $params{max_places};
|
| 931 | 929 |
|
| 930 |
if (!$part_unit_name) {
|
|
| 931 |
$main::lxdebug->leave_sub(); |
|
| 932 |
return ''; |
|
| 933 |
} |
|
| 934 |
|
|
| 932 | 935 |
AM->retrieve_all_units(); |
| 933 | 936 |
my $all_units = $main::all_units; |
| 934 | 937 |
|
Auch abrufbar als: Unified diff
Form::format_amount_units() darf auch ohne die Parameter amount und part_unit aufgerufen werden. Kein amount wird einfach als 0 gewertet, und wenn part_unit fehlt, so wird schlicht ein leerer String zurückgegeben. Macht Ausgaben wie den Lagerinhalt inkl. leerer Lagerplätze aus wh.pl einfacher.