X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDO.pm;h=3ab2ffa6a0a030ec751d1bed303b6cb69b5766d0;hb=f869a45a1b3ff7c92a4b54f387ab12436e18e4b0;hp=91d896d7b0eec04657c126eb73a01652dfdf28e0;hpb=6b64a63ecb462a610515fd1609d490e33b28825d;p=kivitendo-erp.git diff --git a/SL/DO.pm b/SL/DO.pm index 91d896d7b..3ab2ffa6a 100644 --- a/SL/DO.pm +++ b/SL/DO.pm @@ -390,9 +390,9 @@ SQL do_query($form, $dbh, $query, conv_i($sinfo->{"delivery_order_items_stock_id"}), conv_i($form->{"delivery_order_items_id_$i"}), $sinfo->{qty}, $sinfo->{unit}, conv_i($sinfo->{warehouse_id}), conv_i($sinfo->{bin_id})); - $h_item_stock_id->finish(); - # write back the id to the form (important if only transfer was clicked (id fk for invoice) - $form->{"stock_${in_out}_$i"} = YAML::Dump($stock_info); + $h_item_stock_id->finish(); + # write back the id to the form (important if only transfer was clicked (id fk for invoice) + $form->{"stock_${in_out}_$i"} = YAML::Dump($stock_info); } @values = ($form->{"delivery_order_items_id_$i"}, $sinfo->{qty}, $sinfo->{unit}, conv_i($sinfo->{warehouse_id}), conv_i($sinfo->{bin_id}), $sinfo->{chargenumber}, conv_date($sinfo->{bestbefore}), @@ -477,6 +477,8 @@ SQL conv_i($form->{id})); do_query($form, $dbh, $query, @values); + $form->new_lastmtime('delivery_orders'); + $form->{name} = $form->{ $form->{vc} }; $form->{name} =~ s/--$form->{"$form->{vc}_id"}//; @@ -605,6 +607,7 @@ sub close_orders { do_query($form, $dbh, $query, map { conv_i($_) } @{ $params{ids} }); $dbh->commit() unless ($params{dbh}); + $form->new_lastmtime('delivery_orders'); $main::lxdebug->leave_sub(); }