my $attribs = $term->Attribs;
- my $sth = $dbh->prepare ("INSERT INTO $table VALUES (?,?,?,?,?,?,?,?,?)");
+ my $sth = $dbh->prepare ("INSERT INTO $table (nr,date,category,description,tax_percent,tax_assigned,price,paid) VALUES (?,?,?,?,?,?,?,?)");
print "Buchungseingabe\n\n";
while ($weiter =~ /[JjYy1]/) {
}
$sth->execute (get_next_nr(), date_to_string($input[0]), $input[1], $input[2], $input[4],
- $input[5], $input[6], 1, $input[7]);
+ $input[5], $input[6], $input[7]);
$weiter = read_input("Weiter",'j');
$input[5] = 0.0;
}