X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/9fd46de37d7906b7c104c17112b34bae7d534d67..7712480e4a082f84a2229f5b1a90d79a6c01255b:/SL/AR.pm diff --git a/SL/AR.pm b/SL/AR.pm index 17dbd6499..96e66ef4b 100644 --- a/SL/AR.pm +++ b/SL/AR.pm @@ -170,6 +170,10 @@ sub post_transaction { $query = qq|INSERT INTO ar (id, invnumber, employee_id) VALUES (?, 'dummy', ?)|; do_query($form, $dbh, $query, $form->{id}, $form->{employee_id}); + + if (!$form->{invnumber}) { + $form->{invnumber} = $form->update_defaults($myconfig, "invnumber", $dbh); + } } # update department