diff options
Diffstat (limited to 'LedgerSMB/AA.pm')
| -rwxr-xr-x | LedgerSMB/AA.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/LedgerSMB/AA.pm b/LedgerSMB/AA.pm index 3f8b35af..bca7f391 100755 --- a/LedgerSMB/AA.pm +++ b/LedgerSMB/AA.pm @@ -39,6 +39,8 @@ use LedgerSMB::Sysconfig; sub post_transaction { my ( $self, $myconfig, $form ) = @_; + $form->{invnumber} = $form->update_defaults( $myconfig, $invnumber ) + unless $form->{invnumber}; # connect to database my $dbh = $form->{dbh}; @@ -286,8 +288,6 @@ sub post_transaction { $form->{datepaid} = $form->{transdate} unless $form->{datepaid}; my $datepaid = ($paid) ? qq|'$form->{datepaid}'| : 'NOW'; - $form->{invnumber} = $form->update_defaults( $myconfig, $invnumber ) - unless $form->{invnumber}; $query = qq| UPDATE $table |