diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-01 18:29:22 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-01 18:29:22 +0000 |
| commit | f6762a3469fbce0e233c958990ba6a5096540e0a (patch) | |
| tree | fdb0520e3a8cfe696667db8ee5d7f892fe22d462 /LedgerSMB/IS.pm | |
| parent | fc6a287538a9a9490b6b775db5c94fd8228830a6 (diff) | |
Fixing sales invoice posting.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1490 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/IS.pm')
| -rw-r--r-- | LedgerSMB/IS.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/LedgerSMB/IS.pm b/LedgerSMB/IS.pm index 0877b215..489f16d4 100644 --- a/LedgerSMB/IS.pm +++ b/LedgerSMB/IS.pm @@ -1492,7 +1492,7 @@ sub post_invoice { ordnumber = ?, quonumber = ?, transdate = ?, - customer_id = ?, + entity_id = ?, amount = ?, netamount = ?, paid = ?, @@ -1513,14 +1513,13 @@ sub post_invoice { ponumber = ? WHERE id = ? |; - $sth = $dbh->prepare($query); $sth->execute( $form->{invnumber}, $form->{ordnumber}, - $form->{quonumber}, $form->{transdate}, + $form->{quonumber}, $form->{transdate} || 'now', $form->{customer_id}, $invamount, $invnetamount, $form->{paid}, - $form->{datepaid}, $form->{duedate}, + $form->{datepaid} || 'now', $form->{duedate} || 'now', $form->{shippingpoint}, $form->{shipvia}, $form->{terms}, $form->{notes}, $form->{intnotes}, $form->{taxincluded}, |