X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=sql%2FPg-upgrade2%2Forderitems_delivery_order_items_positions.pl;h=97d1a31aaa0f25b53f8d33333e76f258f10478cb;hb=a9d9ca02abd3a0ff1e43f23888142266174bec55;hp=c3adfa12a3c413d8ff583ed9acc59c6ce82d2466;hpb=3954d14b8a2d394b95bb8ecf8b0ed92c030fbd1d;p=kivitendo-erp.git diff --git a/sql/Pg-upgrade2/orderitems_delivery_order_items_positions.pl b/sql/Pg-upgrade2/orderitems_delivery_order_items_positions.pl index c3adfa12a..97d1a31aa 100644 --- a/sql/Pg-upgrade2/orderitems_delivery_order_items_positions.pl +++ b/sql/Pg-upgrade2/orderitems_delivery_order_items_positions.pl @@ -1,7 +1,6 @@ # @tag: orderitems_delivery_order_items_positions # @description: Spalte für Positionen der Einträge in Angeboten/Auftträgen und Lieferscheinen. # @depends: release_3_1_0 -# @encoding: utf-8 package SL::DBUpgrade2::orderitems_delivery_order_items_positions; use strict; @@ -25,11 +24,13 @@ sub run { my $order_id_col = $order_id_cols{ $table }; $query = qq|SELECT * FROM $table ORDER BY $order_id_col, id|; + my $query2 = qq|UPDATE $table SET position = ? WHERE id = ?|; my $sth = $self->dbh->prepare($query); + my $sth2 = $self->dbh->prepare($query2); $sth->execute || $::form->dberror($query); - # set new postition field in order of ids, starting by one for each order + # set new position field in order of ids, starting by one for each order my $last_order_id; my $position; while (my $ref = $sth->fetchrow_hashref("NAME_lc")) { @@ -40,10 +41,10 @@ sub run { } $last_order_id = $ref->{ $order_id_col }; - $query = qq|UPDATE $table SET position = ? WHERE id = ?|; - $self->db_query($query, bind => [ $position, $ref->{id} ]); + $sth2->execute($position, $ref->{id}); } $sth->finish; + $sth2->finish; $query = qq|ALTER TABLE $table ALTER COLUMN position SET NOT NULL|;