1 files changed, 5 insertions, 0 deletions
diff --git a/LedgerSMB/IR.pm b/LedgerSMB/IR.pm
index 899b7939..9c6839d3 100755
--- a/LedgerSMB/IR.pm
+++ b/LedgerSMB/IR.pm
@@ -773,6 +773,11 @@ sub post_invoice {
     $form->{name} =~ s/--$form->{vendor_id}//;
     $form->add_shipto( $dbh, $form->{id} );
 
+    if ($invamount->is_nan) {
+        $dbh->rollback;
+        return;
+    }
+    
     my %audittrail = (
         tablename => 'ap',
         reference => $form->{invnumber},