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