diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-12-05 22:06:23 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-12-05 22:06:23 +0000 |
| commit | 765c47844e21cf00903866a88147d88d5e28afc6 (patch) | |
| tree | 23cbe224b9dcfdf73b7b8e0dde73dd3cbf9965e0 /LedgerSMB/CP.pm | |
| parent | f0b28de58e81376d42a7d53bcd9332abb81d4b31 (diff) | |
Fixed invoices not showing up on cash screens.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@724 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/CP.pm')
| -rwxr-xr-x | LedgerSMB/CP.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LedgerSMB/CP.pm b/LedgerSMB/CP.pm index 279aab95..4d9e6d22 100755 --- a/LedgerSMB/CP.pm +++ b/LedgerSMB/CP.pm @@ -215,7 +215,7 @@ sub get_openinvoices { my $where = qq|WHERE a.$form->{vc}_id = $vc_id AND a.amount != a.paid|; - $curr = $dbh->quote($form->{curr}); + $curr = $dbh->quote($form->{currency}); $where .= qq| AND a.curr = $curr| if $form->{currency}; my $sortorder = "transdate, invnumber"; |