$sth->finish;
# get taxkeys and description
- $query = qq|SELECT taxkey, taxdescription
+ $query = qq|SELECT taxkey, taxdescription
FROM tax|;
$sth = $dbh->prepare($query);
$sth->execute || $form->dberror($query);
WHERE id = $form->{id}|;
} else {
- $query = qq|INSERT INTO chart
+ $query = qq|INSERT INTO chart
(accno, description, charttype, gifi_accno, category, link, taxkey_id, pos_ustva, pos_bwa, pos_bilanz,pos_eur)
VALUES ('$form->{accno}', '$form->{description}',
'$form->{charttype}', '$form->{gifi_accno}',
# set inventory_accno_id, income_accno_id, expense_accno_id to defaults
$query = qq|UPDATE parts
- SET inventory_accno_id =
+ SET inventory_accno_id =
(SELECT inventory_accno_id FROM defaults)
WHERE inventory_accno_id = $form->{id}|;
$dbh->do($query) || $form->dberror($query);
description = '$form->{description}'
WHERE accno = '$form->{id}'|;
} else {
- $query = qq|INSERT INTO gifi
+ $query = qq|INSERT INTO gifi
(accno, description)
VALUES ('$form->{accno}', '$form->{description}')|;
}
role = '$form->{role}'
WHERE id = $form->{id}|;
} else {
- $query = qq|INSERT INTO department
+ $query = qq|INSERT INTO department
(description, role)
VALUES ('$form->{description}', '$form->{role}')|;
}
salesman = '$form->{salesman}'
WHERE id = $form->{id}|;
} else {
- $query = qq|INSERT INTO business
+ $query = qq|INSERT INTO business
(description, discount, customernumberinit, salesman)
VALUES ('$form->{description}', $form->{discount}, '$form->{customernumberinit}', '$form->{salesman}')|;
}
description = '$form->{description}'
WHERE code = '$form->{id}'|;
} else {
- $query = qq|INSERT INTO sic
+ $query = qq|INSERT INTO sic
(code, sictype, description)
VALUES ('$form->{code}', '$form->{sictype}', '$form->{description}')|;
}
# user specific variables are in myconfig
# save defaults
my $query = qq|UPDATE defaults SET
- inventory_accno_id =
+ inventory_accno_id =
(SELECT c.id FROM chart c
WHERE c.accno = '$form->{inventory_accno}'),
income_accno_id =
}
1;
-