Revision 2247150c
Von Bernd Bleßmann vor fast 10 Jahren hinzugefügt
| SL/DO.pm | ||
|---|---|---|
| 898 | 898 |
next if (!$form->{"id_$i"});
|
| 899 | 899 |
|
| 900 | 900 |
if ($item->[1] ne $sameitem) {
|
| 901 |
push(@{ $form->{description} }, qq|$item->[1]|);
|
|
| 901 |
push(@{ $form->{TEMPLATE_ARRAYS}->{description} }, qq|$item->[1]|);
|
|
| 902 | 902 |
$sameitem = $item->[1]; |
| 903 | 903 |
|
| 904 |
map({ push(@{ $form->{$_} }, "") } grep({ $_ ne "description" } @arrays));
|
|
| 904 |
map({ push(@{ $form->{TEMPLATE_ARRAYS}->{$_} }, "") } grep({ $_ ne "description" && $_ !~ /^si_/} @arrays));
|
|
| 905 |
map({ push(@{ $form->{TEMPLATE_ARRAYS}->{$_} }, []) } grep({ $_ =~ /^si_/} @arrays));
|
|
| 906 |
$si_position++; |
|
| 905 | 907 |
} |
| 906 | 908 |
|
| 907 | 909 |
$form->{"qty_$i"} = $form->parse_amount($myconfig, $form->{"qty_$i"});
|
Auch abrufbar als: Unified diff
Lieferschein: Ausdruck mit Gruppierung repariert.
behebt #26.