SF.net SVN: ledger-smb:[2781] trunk/LedgerSMB/PE.pm

[..hidden..]

Revision: 2781
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=2781&view=rev
Author:   einhverfr
Date:     2009-11-05 21:55:58 +0000 (Thu, 05 Nov 2009)

Log Message:
-----------
Minr fix to projects

Modified Paths:
--------------
    trunk/LedgerSMB/PE.pm

Modified: trunk/LedgerSMB/PE.pm
===================================================================
--- trunk/LedgerSMB/PE.pm	2009-11-05 20:45:26 UTC (rev 2780)
+++ trunk/LedgerSMB/PE.pm	2009-11-05 21:55:58 UTC (rev 2781)
@@ -288,7 +288,7 @@
 
         $query = qq|
 			INSERT INTO project (projectnumber, description, 
-			            startdate, enddate, customer_id)
+			            startdate, enddate, credit_id)
 			     VALUES (?, ?, ?, ?, ?)|;
     }
     $sth = $dbh->prepare($query);
@@ -296,7 +296,7 @@
         $form->{description}, $startdate, $enddate, $form->{customer_id} )
       || $form->dberror($query);
     if (!$form->{id}){
-        $query = "SELECT currval('id')";
+        $query = "SELECT currval('project_id_seq')";
         ($form->{id}) = $dbh->selectrow_array($query) || $form->dberror($query);
     }
     $form->run_custom_queries( 'project', 'UPDATE' );


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.