summaryrefslogtreecommitdiff
path: root/LedgerSMB/PE.pm
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2007-06-21 18:31:22 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2007-06-21 18:31:22 +0000
commitc91a0fe516d246a35a9b4976b99da611c5d1b662 (patch)
treef42ca377d645aeffb2b80721c40ae051e55182cc /LedgerSMB/PE.pm
parentee831ab438efeb5b68ee964f7ca0da6f0a1c79a8 (diff)
Fixing placeholder error saving project
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1290 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/PE.pm')
-rw-r--r--LedgerSMB/PE.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/LedgerSMB/PE.pm b/LedgerSMB/PE.pm
index 209f6767..a9c733c5 100644
--- a/LedgerSMB/PE.pm
+++ b/LedgerSMB/PE.pm
@@ -236,6 +236,8 @@ sub save_project {
$sth->execute( $form->{projectnumber},
$form->{description}, $startdate, $enddate, $form->{customer_id} )
|| $form->dberror($query);
+ $query = "SELECT currval('id')";
+ ($form->{id}) = $dbh->selectrow_array($query) || $form->dberror($query);
$form->run_custom_queries( 'project', 'UPDATE' );
$dbh->commit;