Revision 7a80b1c2
Von Sven Schöling vor mehr als 11 Jahren hinzugefügt
| sql/Pg-upgrade2/erzeugnisnummern.pl | ||
|---|---|---|
|
foreach my $i (1 .. $::form->{rowcount}) {
|
||
|
$update_query = qq|UPDATE parts SET partnumber = '| . $::form->{"partnumber_$i"} . qq|' WHERE id = | . $::form->{"partid_$i"};
|
||
|
$self->db_query($update_query);
|
||
|
print FH $i;
|
||
|
}
|
||
|
$self->dbh->commit();
|
||
|
}
|
||
Auch abrufbar als: Unified diff
Überflüssige Debugmeldung