X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c3cbcf4f45b0d3de476c0f8a4a51e1c0d2e4eb00..0b2ca0abb53db0d372bcc51e8093abb30f2aeea6:/SL/IS.pm?ds=inline diff --git a/SL/IS.pm b/SL/IS.pm index 666d8bc04..7087c5aa0 100644 --- a/SL/IS.pm +++ b/SL/IS.pm @@ -963,10 +963,7 @@ sub post_invoice { $query = qq|UPDATE ar SET paid = ? WHERE id = ?|; do_query($form, $dbh, $query, $form->{paid}, conv_i($form->{id})); - if (!$provided_dbh) { - $dbh->commit(); - $dbh->disconnect(); - } + $dbh->commit if !$provided_dbh; $main::lxdebug->leave_sub(); return; @@ -1081,10 +1078,7 @@ sub post_invoice { 'table' => 'ar',); my $rc = 1; - if (!$provided_dbh) { - $dbh->commit(); - $dbh->disconnect(); - } + $dbh->commit if !$provided_dbh; $main::lxdebug->leave_sub(); @@ -1379,7 +1373,7 @@ sub delete_invoice { # Falls wir ein Storno haben, müssen zwei Felder in der stornierten Rechnung wieder # zurückgesetzt werden. Vgl: - # id | storno | storno_id | paid | amount + # id | storno | storno_id | paid | amount #----+--------+-----------+---------+----------- # 18 | f | | 0.00000 | 119.00000 # ZU: