From eb2fb9cf3117515e9182ca4eb3c5f008ab2da225 Mon Sep 17 00:00:00 2001 From: "G. Richardson" Date: Tue, 28 Dec 2010 13:47:20 +0100 Subject: [PATCH] Bug 1429 behoben MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Bei Wechsel eines Debitoren bei Debitorenrechnungen wird Bemerkungsfeld mit den internen Bemerkungen des Kunden gefüllt. --- bin/mozilla/ar.pl | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/bin/mozilla/ar.pl b/bin/mozilla/ar.pl index e2777bd49..251c4644c 100644 --- a/bin/mozilla/ar.pl +++ b/bin/mozilla/ar.pl @@ -982,9 +982,13 @@ sub update { $form->{invdate} = $form->{transdate}; - my %saved_variables = map +( $_ => $form->{$_} ), qw(AR AR_amount_1 taxchart_1); - + my %saved_variables = map +( $_ => $form->{$_} ), qw(AR AR_amount_1 taxchart_1 oldcustomer); + &check_name("customer"); + + # check_name ruft get_customer auf, oldcustomer wird überschrieben, daher wird dies vorher gemerkt + # get_customer holt Bemerkungen als intnotes, für Debitorenbuchungen gibt es aber nur das Feld notes + $form->{notes} = $form->{intnotes} if $saved_variables{oldcustomer} ne $form->{customer}; $form->{AR} = $saved_variables{AR}; if ($saved_variables{AR_amount_1} =~ m/.--./) { -- 2.20.1