diff options
| author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-16 01:24:06 +0000 |
|---|---|---|
| committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-16 01:24:06 +0000 |
| commit | 92ff64bbb9ec1f0826656c8219def40b0a434a94 (patch) | |
| tree | 6e4747c056f7f527b5811f5eab2a944701283ceb /LedgerSMB/AM.pm | |
| parent | d926f740de793966a8d3b6aa6c77f9da90121cf0 (diff) | |
Fix DBI syntax in yearend posting
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@636 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/AM.pm')
| -rwxr-xr-x | LedgerSMB/AM.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/LedgerSMB/AM.pm b/LedgerSMB/AM.pm index df039e90..95b2a075 100755 --- a/LedgerSMB/AM.pm +++ b/LedgerSMB/AM.pm @@ -1763,7 +1763,9 @@ sub post_yearend { FROM gl WHERE reference = ?|; - ($form->{id}) = $dbh->prepare($query)->fetchrow_array($uid); + my $sth = $dbh->prepare($query); + $sth->execute($uid); + ($form->{id}) = $sth->fetchrow_array; $query = qq| UPDATE gl |