X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FOE.pm;h=e8127a27d11277cb02ad01deea7bda8ce187cfa4;hb=aa1102e99b95c7ffc7bfb0078af520429595b702;hp=8af63e6aa43ed95506186278b5682dd650dd7dbb;hpb=99308d4c3fe7fe8a0b83c41ae5c97e55dbf86fd8;p=kivitendo-erp.git diff --git a/SL/OE.pm b/SL/OE.pm index 8af63e6aa..e8127a27d 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -1183,7 +1183,9 @@ sub order_details { while (my $ref = $sth->fetchrow_hashref(NAME_lc)) { if ($form->{groupitems} && $ref->{partsgroup} ne $sameitem) { map { push(@{ $form->{$_} }, "") } - qw(runningnumber ship bin serialnumber number unit bin qty reqdate sellprice listprice netprice discount linetotal nodiscount_linetotal); + qw(runningnumber ship bin serialnumber number unit bin qty + reqdate sellprice listprice netprice discount p_discount + linetotal nodiscount_linetotal); $sameitem = ($ref->{partsgroup}) ? $ref->{partsgroup} : "--"; push(@{ $form->{description} }, $sameitem); } @@ -1194,7 +1196,9 @@ sub order_details { . qq|, $ref->{partnumber}, $ref->{description}|); map { push(@{ $form->{$_} }, "") } - qw(number unit qty runningnumber ship bin serialnumber reqdate sellprice listprice netprice discount linetotal nodiscount_linetotal); + qw(number unit qty runningnumber ship bin serialnumber reqdate + sellprice listprice netprice discount p_discount linetotal + nodiscount_linetotal); } $sth->finish;