diff options
| -rwxr-xr-x | LedgerSMB/CP.pm | 8 |
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); |