diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-07-10 01:00:55 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-07-10 01:00:55 +0000 |
| commit | 6e9961e99c62bdf8fd47956fe73988293de4f43d (patch) | |
| tree | 8ebf36ca945729eeddd13c794b4222227c0003c4 | |
| parent | 3b9ecc996fb7c992670442a95db6d7165a751e24 (diff) | |
Fixing minor issues relating to the partial transaction issue
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1365 4979c152-3d1c-0410-bac9-87ea11338e46
| -rw-r--r-- | CONTRIBUTORS | 2 | ||||
| -rwxr-xr-x | LedgerSMB/OP.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/CONTRIBUTORS b/CONTRIBUTORS index 95a8bf6f..497cf833 100644 --- a/CONTRIBUTORS +++ b/CONTRIBUTORS @@ -65,7 +65,7 @@ some performance fixes and has contributed a great deal of work to our web site. Donna Robinson [email omitted] contributed some fixes to the HTML code. -Victor Sterpu <victor @ ambra.ro> has contributed some bug fixes to COGS +Victor Sterpu <victor @ ambra.ro> has contributed several bug fixes to COGS handling. Original Authors of SQL-Ledger: diff --git a/LedgerSMB/OP.pm b/LedgerSMB/OP.pm index f5592086..525717ff 100755 --- a/LedgerSMB/OP.pm +++ b/LedgerSMB/OP.pm @@ -36,6 +36,7 @@ package OP; sub overpayment { my ( $self, $myconfig, $form, $dbh, $amount, $ml ) = @_; + my $invnumber = $form->{invnumber}; $invnumber = $form->update_defaults( $myconfig, ( $form->{arap} eq 'ar' ) @@ -62,7 +63,6 @@ sub overpayment { $query = qq|SELECT id FROM $form->{arap} WHERE invnumber = '$uid'|; ($uid) = $dbh->selectrow_array($query); - my $invnumber = $form->{invnumber}; $query = qq| UPDATE $form->{arap} |