From 92483c539c55b85c3435de918fd6baca2d236c74 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20B=C3=BCren?= Date: Tue, 2 Feb 2010 09:27:20 +0100 Subject: [PATCH] =?utf8?q?Finanzbuchhaltung=20->=20Kreditorenbuchung.=20Gi?= =?utf8?q?bt=20derzeit=20keine=20R=C3=BCckmeldung=20mehr,=20ob=20die=20Buc?= =?utf8?q?hung=20erfolgreich=20durchgef=C3=BChrt=20wurde.=20Ferner=20gibt?= =?utf8?q?=20die=20Backend-Funktion=20AP->post=5Ftransaction=20immer=20wah?= =?utf8?q?r=20zur=C3=BCck.=20Minimal=20verbessert=20und=20kommentiert,=20o?= =?utf8?q?hne=20das=20Ursprungsproblem=20zu=20l=C3=B6sen=20...?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/AP.pm | 5 +++-- bin/mozilla/ap.pl | 4 +++- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/SL/AP.pm b/SL/AP.pm index aaf2d5e6e..c2ed2b5e3 100644 --- a/SL/AP.pm +++ b/SL/AP.pm @@ -46,7 +46,7 @@ sub post_transaction { $main::lxdebug->enter_sub(); my ($self, $myconfig, $form, $provided_dbh, $payments_only) = @_; - + my $rc = 0; # return code auf false setzen # connect to database my $dbh = $provided_dbh ? $provided_dbh : $form->dbconnect_noauto($myconfig); @@ -356,12 +356,13 @@ sub post_transaction { IO->set_datepaid(table => 'ap', id => $form->{id}, dbh => $dbh); - my $rc = 1; if (!$provided_dbh) { $dbh->commit(); $dbh->disconnect(); } + $rc = 1; # Den return-code auf true setzen, aber nur falls beim commit alles i.O. ist + $main::lxdebug->leave_sub(); return $rc; diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl index bac1b8197..a6d5cdc5c 100644 --- a/bin/mozilla/ap.pl +++ b/bin/mozilla/ap.pl @@ -1081,9 +1081,11 @@ sub post { } # /saving the history remove_draft() if $form->{remove_draft}; + # Dieser Text wird niemals ausgegeben: Probleme beim redirect? $form->redirect($locale->text('Transaction posted!')); + } else { + $form->error($locale->text('Cannot post transaction!')); } - $form->error($locale->text('Cannot post transaction!')); $main::lxdebug->leave_sub(); } -- 2.20.1