Revision 61813c8c
Von Jan Büren vor mehr als 11 Jahren hinzugefügt
| SL/DO.pm | ||
|---|---|---|
| 874 | 874 |
|
| 875 | 875 |
while (my $ref = $h_pg->fetchrow_hashref("NAME_lc")) {
|
| 876 | 876 |
if ($form->{groupitems} && $ref->{partsgroup} ne $sameitem) {
|
| 877 |
map({ push(@{ $form->{$_} }, "") } grep({ $_ ne "description" } @arrays));
|
|
| 877 |
map({ push(@{ $form->{TEMPLATE_ARRAYS}->{$_} }, "") } grep({ $_ ne "description" } @arrays));
|
|
| 878 | 878 |
$sameitem = ($ref->{partsgroup}) ? $ref->{partsgroup} : "--";
|
| 879 |
push(@{ $form->{description} }, $sameitem);
|
|
| 879 |
push(@{ $form->{TEMPLATE_ARRAYS}->{description} }, $sameitem);
|
|
| 880 | 880 |
} |
| 881 |
push(@{ $form->{description} }, $form->format_amount($myconfig, $ref->{qty} * $form->{"qty_$i"}) . qq|, $ref->{partnumber}, $ref->{description}|);
|
|
| 881 |
push(@{ $form->{TEMPLATE_ARRAYS}->{"description"} }, $form->format_amount($myconfig, $ref->{qty} * $form->{"qty_$i"}) . qq| -- $ref->{partnumber}, $ref->{description}|);
|
|
| 882 | 882 |
|
| 883 |
map({ push(@{ $form->{$_} }, "") } grep({ $_ ne "description" } @arrays));
|
|
| 883 |
map({ push(@{ $form->{TEMPLATE_ARRAYS}->{$_} }, "") } grep({ $_ ne "description" } @arrays));
|
|
| 884 | 884 |
} |
| 885 | 885 |
} |
| 886 | 886 |
|
Auch abrufbar als: Unified diff
Vergessene Lieferscheindruckvariablen (bom Stückliste) in TEMPLATE_ARRAYS ausgelagert
Hinterngrund: commit 02475b7f88ed372dd8d17cc2ed22c1dac251340b.
(Lieferscheindruckvariablen in den speziellen "TEMPLATE_ARRAYS" namespache ausgelagert)
Stücklisten-Druck von Erzeugnissen wird entsprechend selten angehakt und wurde deshalb bei
der Erweiterung für TEMPLATE_ARRAYS übersehen.
Ferner hab ich den Ausdruck der Stückliste auch genauso wie bei der Rechnung formatiert, da es sich
hier um "denselben" Code handelt.
Optimalerweise sollte man den Stücklisten-Code auch noch für alle Druckvorlagen in ein- und.
diesselbe Funktion auslagen (DRY), dann wird das beim nächsten Mal nicht vergessen und die.
Formatierung ist in allen Verkaufsvorlagen einheitlich.