summaryrefslogtreecommitdiff
path: root/LedgerSMB/CP.pm
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB/CP.pm')
-rwxr-xr-xLedgerSMB/CP.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/LedgerSMB/CP.pm b/LedgerSMB/CP.pm
index 150e226d..635080e1 100755
--- a/LedgerSMB/CP.pm
+++ b/LedgerSMB/CP.pm
@@ -520,13 +520,13 @@ sub post_payment {
# 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(
- $amount, $$form->{datepaid}, $form->{"id_$i"})
+ $amount, $form->{datepaid}, $form->{"id_$i"})
|| $form->dberror($query, 'CP.pm',
530);