Solved Bug 503. Patch von TkKleindienst im Forum. Bitte testen.
authorUdo Spallek <info@wissensvermittlung.com>
Mon, 15 Jan 2007 22:28:22 +0000 (22:28 +0000)
committerUdo Spallek <info@wissensvermittlung.com>
Mon, 15 Jan 2007 22:28:22 +0000 (22:28 +0000)
BTW. kommt die qw-Konstruktion noch zwei weitere Male in dem
Modul vor. Muss das auch angepasst werden?

SL/OE.pm

index 460e191..f421596 100644 (file)
--- a/SL/OE.pm
+++ b/SL/OE.pm
@@ -1021,7 +1021,9 @@ sub order_details {
       $sameitem = $item->[1];
 
       map { push(@{ $form->{$_} }, "") }
-        qw(runningnumber number qty ship unit bin partnotes serialnumber reqdate sellprice listprice netprice discount linetotal);
+        qw(runningnumber number qty ship unit bin partnotes 
+        serialnumber reqdate sellprice listprice netprice 
+        discount pdiscountlinetotal);
     }
 
     $form->{"qty_$i"} = $form->parse_amount($myconfig, $form->{"qty_$i"});