SF.net SVN: ledger-smb: [755] trunk/LedgerSMB/OE.pm

[..hidden..]

Revision: 755
          http://svn.sourceforge.net/ledger-smb/?rev=755&view=rev
Author:   einhverfr
Date:     2007-01-22 11:03:33 -0800 (Mon, 22 Jan 2007)

Log Message:
-----------
fixing broken query.

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

Modified: trunk/LedgerSMB/OE.pm
===================================================================
--- trunk/LedgerSMB/OE.pm	2007-01-22 18:52:42 UTC (rev 754)
+++ trunk/LedgerSMB/OE.pm	2007-01-22 19:03:33 UTC (rev 755)
@@ -2595,24 +2595,28 @@
 				UPDATE oe SET
 					ordnumber = |.$dbh->quote($ordnumber).qq|,
 					transdate = current_date,
-					vendor_id = $form->{vendor_id},
-					customer_id = $form->{customer_id},
-					amount = $amount,
-					netamount = $netamount,
-					reqdate = |.$form->dbquote($ref->{reqdate}, SQL_DATE).qq|,
-					taxincluded = '$ref->{taxincluded}',
-					shippingpoint = |.$dbh->quote($ref->{shippingpoint}).qq|,
-					notes = |.$dbh->quote($ref->{notes}).qq|,
-					curr = '$curr',
-					employee_id = $ref->{employee_id},
-					intnotes = |.$dbh->quote($ref->{intnotes}).qq|,
-					shipvia = |.$dbh->quote($ref->{shipvia}).qq|,
-					language_code = '$ref->{language_code}',
-					ponumber = |.$dbh->quote($form->{ponumber}).qq|,
-					department_id = $department_id
-				WHERE id = $id|;
+					vendor_id = ?,
+					customer_id = ?,
+					amount = ?,
+					netamount = ?,
+					reqdate = ?,
+					taxincluded = ?,
+					shippingpoint = ?,
+					notes = ?,
+					curr = ?,
+					employee_id = ?,
+					intnotes = ?,
+					shipvia = ?,
+					language_code = ?,
+					ponumber = ?,
+					department_id = ?
+				WHERE id = ?|;
 			$sth = $dbh->prepare($query);
 			$sth->execute (
+				$form->{vendor_id}, $form->{customer_id}, $amount, $netamount,
+				$form->{reqdate}, $form->{taxincluded}, $form->{shippingpoint},
+				$form->{notes}, $curr, $ref->{employee_id}, $form->{intnotes},
+				$form->{shipvia}, $ref->{language_code}, $form->{po_number},
 				$department_id, $id
 				) || $form->dberror($query);
 	  


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