From: Bernd Bleßmann Date: Fri, 9 Jul 2021 09:32:34 +0000 (+0200) Subject: Dialogbuchung: kleine Fixes bei Fehlermeldungen X-Git-Tag: kivitendo-mebil_0.1-0~9^2~46 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=6a3ce09b35ef8994616392387e14edda64056c97;p=kivitendo-erp.git Dialogbuchung: kleine Fixes bei Fehlermeldungen --- diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl index 8efe48fb8..69d3be46e 100644 --- a/bin/mozilla/gl.pl +++ b/bin/mozilla/gl.pl @@ -1363,7 +1363,7 @@ sub post_transaction { die "No bank transaction found" unless $bt; $chart_id = SL::DB::Manager::BankAccount->find_by(id => $bt->local_bank_account_id)->chart_id; - die "no chart id:" unless $chart_id; + die "no chart id" unless $chart_id; $payment = SL::DB::Manager::AccTransaction->get_all(where => [ trans_id => $::form->{id}, chart_link => { like => '%_paid%' }, @@ -1372,7 +1372,7 @@ sub post_transaction { # credit/debit * -1 matches the sign for bt.amount and bt.invoice_amount - die "Can only assign the full (partial) bank amount to a single general ledger booking" . $bt->not_assigned_amount . " " . ($payment->[0]->amount * -1) + die "Can only assign the full (partial) bank amount to a single general ledger booking: " . $bt->not_assigned_amount . " " . ($payment->[0]->amount * -1) unless (abs($bt->not_assigned_amount - ($payment->[0]->amount * -1)) < 0.001); $bt->update_attributes(invoice_amount => $bt->invoice_amount + ($payment->[0]->amount * -1));