summaryrefslogtreecommitdiff
path: root/LedgerSMB
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB')
-rw-r--r--LedgerSMB/CT.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/LedgerSMB/CT.pm b/LedgerSMB/CT.pm
index e9497b57..b51f48bf 100644
--- a/LedgerSMB/CT.pm
+++ b/LedgerSMB/CT.pm
@@ -329,12 +329,13 @@ sub save_customer {
if ( $form->{"tax_$item"} ) {
$query = qq|
INSERT INTO customertax (customer_id, chart_id)
- VALUES (?, (SELECT id
+ VALUES (currval('entity_credit_account_id_seq'),
+ (SELECT id
FROM chart
WHERE accno = ?))|;
$sth = $dbh->prepare($query);
- $sth->execute( $form->{id}, $item )
+ $sth->execute( $item )
|| $form->dberror($query);
}
}