Revision c82106b1
Von Jan Büren vor fast 16 Jahren hinzugefügt
SL/IC.pm | ||
---|---|---|
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
|
bin/mozilla/ic.pl | ||
---|---|---|
</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"}>
|
bin/mozilla/io.pl | ||
---|---|---|
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"}) {
|
Auch abrufbar als: Unified diff
Fix fuer Bug 979 - EK der Einzelwaren fuer ein Erzeugnis wird erst spaeter angezeigt