Revision 8bfb21c7
Von Philip Reetz vor etwa 17 Jahren hinzugefügt
| SL/IS.pm | ||
|---|---|---|
| 959 | 959 |
do_query($form, $dbh, $query, @values); |
| 960 | 960 |
|
| 961 | 961 |
if($form->{"formname"} eq "credit_note") {
|
| 962 |
for my $i (1 .. $form->{paidaccounts}) {
|
|
| 962 |
for my $i (1 .. $form->{rowcount}) {
|
|
| 963 | 963 |
$query = qq|UPDATE parts SET onhand = onhand - ? WHERE id = ?|; |
| 964 | 964 |
@values = (conv_i($form->{"qty_$i"}), conv_i($form->{"id_$i"}));
|
| 965 | 965 |
do_query($form, $dbh, $query, @values); |
Auch abrufbar als: Unified diff
Bei Gutschriften wurde der Lagerbestand falsch aktualisiert