Revision 83914eeb
Von Moritz Bunkus vor mehr als 16 Jahren hinzugefügt
SL/LICENSES.pm | ||
---|---|---|
68 | 68 |
$sth->execute || $form->dberror($query); |
69 | 69 |
$sth->finish(); |
70 | 70 |
|
71 |
if ($form->{own_product}) { |
|
72 |
$form->update_balance($dbh, "parts", "onhand", qq|id = ?|, |
|
73 |
1, $form->{parts_id}); |
|
74 |
} |
|
75 |
|
|
76 | 71 |
$dbh->disconnect(); |
77 | 72 |
|
78 | 73 |
$main::lxdebug->leave_sub(); |
Auch abrufbar als: Unified diff
Lagerverwaltung implementiert.