SF.net SVN: ledger-smb: [966] branches/1.2/LedgerSMB/CP.pm

[..hidden..]

Revision: 966
          http://svn.sourceforge.net/ledger-smb/?rev=966&view=rev
Author:   einhverfr
Date:     2007-03-20 17:31:26 -0700 (Tue, 20 Mar 2007)

Log Message:
-----------
fixing multiple database bind variable issues in CP.pm

Modified Paths:
--------------
    branches/1.2/LedgerSMB/CP.pm

Modified: branches/1.2/LedgerSMB/CP.pm
===================================================================
--- branches/1.2/LedgerSMB/CP.pm	2007-03-21 00:18:38 UTC (rev 965)
+++ branches/1.2/LedgerSMB/CP.pm	2007-03-21 00:31:26 UTC (rev 966)
@@ -681,7 +681,7 @@
 				  FROM chart c
 				  JOIN acc_trans a ON (a.chart_id = c.id)
 				 WHERE $where
-				       AND a.trans_id = $form->{"id_$i"}|;
+				       AND a.trans_id = ?|;
 
 			$sth = $dbh->prepare($query);
 			$sth->execute($form->{"id_$i"});
@@ -790,9 +790,9 @@
 			# update AR/AP transaction
 			$query = qq|
 				UPDATE $form->{arap} 
-				   SET paid = $amount,
-				       datepaid = '$form->{datepaid}'
-				 WHERE id = $form->{"id_$i"}|;
+				   SET paid = ?,
+				       datepaid = ?
+				 WHERE id = ?|;
 
 			$sth = $dbh->prepare($query);
 			$sth->execute(


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