Revision 9de83d1a
Von Moritz Bunkus vor etwa 15 Jahren hinzugefügt
| SL/WH.pm | ||
|---|---|---|
| 602 | 602 |
@all_fields = keys %{ $ref } unless (@all_fields);
|
| 603 | 603 |
} |
| 604 | 604 |
|
| 605 |
$ref->{stock_value} *= $ref->{qty};
|
|
| 605 |
$ref->{stock_value} = ($ref->{stock_value} || 0) * $ref->{qty};
|
|
| 606 | 606 |
|
| 607 | 607 |
push @contents, $ref; |
| 608 | 608 |
} |
Auch abrufbar als: Unified diff
Eine Warnung über undefinierte Werte vermeiden.