Revision d890f886
Von Udo Spallek vor etwa 17 Jahren hinzugefügt
| sql/Pg-upgrade2/USTVA_abstraction.pl | ||
|---|---|---|
| 147 | 147 |
my $query = $iconv->convert($copy_statements[$statement]); |
| 148 | 148 |
my $sth = $dbh->prepare($query) || mydberror($query); |
| 149 | 149 |
|
| 150 |
for my $copy_line ( 1 .. $#{$copy_data[$statement]} ) {
|
|
| 150 |
for my $copy_line ( 0 .. $#{$copy_data[$statement]} ) {
|
|
| 151 | 151 |
#print $copy_data[$statement][$copy_line] . "<br />" |
| 152 | 152 |
$sth->execute(split m/;/, $iconv->convert($copy_data[$statement][$copy_line]), -1) || mydberror($query); |
| 153 | 153 |
} |
Auch abrufbar als: Unified diff
Bug: Array wird von eins an hochgezaehlt, dann fehlt aber der erste Datensatz.