summaryrefslogtreecommitdiff
path: root/LedgerSMB
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB')
-rwxr-xr-xLedgerSMB/IR.pm2
-rwxr-xr-xLedgerSMB/RP.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/LedgerSMB/IR.pm b/LedgerSMB/IR.pm
index e47093bc..01bb05ca 100755
--- a/LedgerSMB/IR.pm
+++ b/LedgerSMB/IR.pm
@@ -595,7 +595,7 @@ sub post_invoice {
WHERE accno = ?),
?, ?)|;
- $sth = $dbh->$dbh->prepare($query);
+ $sth = $dbh->prepare($query);
$sth->execute(
$form->{id}, $form->{AP}, $amount,
$form->{"datepaid_$i"}
diff --git a/LedgerSMB/RP.pm b/LedgerSMB/RP.pm
index 8be97f17..dbb3294b 100755
--- a/LedgerSMB/RP.pm
+++ b/LedgerSMB/RP.pm
@@ -1419,7 +1419,7 @@ sub aging {
my $dbh = $form->{dbh};
my $invoice = ($form->{arap} eq 'ar') ? 'is' : 'ir';
- my $query = qq|SELECT value FROM defaults WHERE settings_key = 'curr'|;
+ my $query = qq|SELECT value FROM defaults WHERE setting_key = 'curr'|;
($form->{currencies}) = $dbh->selectrow_array($query);
($null, $form->{todate})