Revision 8ee1c3bd
Von Jan Büren vor fast 15 Jahren hinzugefügt
| SL/IS.pm | ||
|---|---|---|
| 1017 | 1017 |
conv_i($form->{"id"}));
|
| 1018 | 1018 |
do_query($form, $dbh, $query, @values); |
| 1019 | 1019 |
|
| 1020 |
if($form->{"formname"} eq "credit_note") {
|
|
| 1021 |
for my $i (1 .. $form->{rowcount}) {
|
|
| 1022 |
$query = qq|UPDATE parts SET onhand = onhand - ? WHERE id = ?|; |
|
| 1023 |
@values = (conv_i($form->{"qty_$i"}), conv_i($form->{"id_$i"}));
|
|
| 1024 |
do_query($form, $dbh, $query, @values); |
|
| 1025 |
} |
|
| 1026 |
} |
|
| 1027 | 1020 |
|
| 1028 | 1021 |
if ($form->{storno}) {
|
| 1029 | 1022 |
$query = |
Auch abrufbar als: Unified diff
Bugfix zu 1289 Gutschriften zu Rechnungen haben in der Tat Lagerbewegungen (in der Tabelle parts) ausgelöst. Entsprechend rausgenommen