diff options
Diffstat (limited to 'LedgerSMB/IR.pm')
-rwxr-xr-x | LedgerSMB/IR.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/LedgerSMB/IR.pm b/LedgerSMB/IR.pm index 709d5dcf..c79b3b33 100755 --- a/LedgerSMB/IR.pm +++ b/LedgerSMB/IR.pm @@ -41,6 +41,8 @@ sub post_invoice { my ( $self, $myconfig, $form ) = @_; my $dbh = $form->{dbh}; + $form->{invnumber} = $form->update_defaults( $myconfig, "vinumber", $dbh ) + unless $form->{invnumber}; for ( 1 .. $form->{rowcount} ) { unless ( $form->{"deliverydate_$_"} ) { @@ -671,8 +673,6 @@ sub post_invoice { # set values which could be empty $form->{taxincluded} *= 1; - $form->{invnumber} = $form->update_defaults( $myconfig, "vinumber", $dbh ) - unless $form->{invnumber}; # save AP record $query = qq| |