Fix fuer Bug 979 - EK der Einzelwaren fuer ein Erzeugnis wird erst spaeter angezeigt
authorJan Büren <information@richardson-bueren.de>
Mon, 18 May 2009 15:44:47 +0000 (15:44 +0000)
committerJan Büren <information@richardson-bueren.de>
Mon, 18 May 2009 15:44:47 +0000 (15:44 +0000)
SL/IC.pm
bin/mozilla/ic.pl
bin/mozilla/io.pl

index 5314d4b..ea8b929 100644 (file)
--- a/SL/IC.pm
+++ b/SL/IC.pm
@@ -698,8 +698,9 @@ sub assembly_item {
   my $dbh = $form->dbconnect($myconfig);
 
   my $query =
-    qq|SELECT p.id, p.partnumber, p.description, p.sellprice, p.weight, p.onhand, p.unit, pg.partsgroup,
-              p.price_factor_id, pfac.factor AS price_factor
+    qq|SELECT p.id, p.partnumber, p.description, p.sellprice, 
+       p.weight, p.onhand, p.unit, pg.partsgroup, p.lastcost,
+       p.price_factor_id, pfac.factor AS price_factor
        FROM parts p
        LEFT JOIN partsgroup pg ON (p.partsgroup_id = pg.id)
        LEFT JOIN price_factors pfac ON pfac.id = p.price_factor_id
index 5b377b6..e0d59d7 100644 (file)
@@ -1680,6 +1680,7 @@ sub assembly_row {
         </tr>
   <input type=hidden name="id_$i" value=$form->{"id_$i"}>
   <input type=hidden name="sellprice_$i" value=$form->{"sellprice_$i"}>
+  <input type=hidden name="lastcost_$i" value=$form->{"lastcost_$i"}>
   <input type=hidden name="weight_$i" value=$form->{"weight_$i"}>
   <input type=hidden name="price_factor_id_$i" value=$form->{"price_factor_id_$i"}>
   <input type=hidden name="price_factor_$i" value=$form->{"price_factor_$i"}>
index 18d2f4f..058195f 100644 (file)
@@ -695,7 +695,7 @@ sub check_form {
       qw(listprice rop stock);
 
     @flds =
-      qw(id qty unit bom partnumber description sellprice weight runningnumber partsgroup);
+      qw(id qty unit bom partnumber description sellprice weight runningnumber partsgroup lastcost);
 
     for my $i (1 .. ($form->{assembly_rows} - 1)) {
       if ($form->{"qty_$i"}) {