Revision eb2fb9cf
Von G. Richardson vor fast 14 Jahren hinzugefügt
| bin/mozilla/ar.pl | ||
|---|---|---|
| 982 | 982 |
|
| 983 | 983 |
$form->{invdate} = $form->{transdate};
|
| 984 | 984 |
|
| 985 |
my %saved_variables = map +( $_ => $form->{$_} ), qw(AR AR_amount_1 taxchart_1);
|
|
| 986 |
|
|
| 985 |
my %saved_variables = map +( $_ => $form->{$_} ), qw(AR AR_amount_1 taxchart_1 oldcustomer);
|
|
| 986 |
|
|
| 987 | 987 |
&check_name("customer");
|
| 988 |
|
|
| 989 |
# check_name ruft get_customer auf, oldcustomer wird überschrieben, daher wird dies vorher gemerkt |
|
| 990 |
# get_customer holt Bemerkungen als intnotes, für Debitorenbuchungen gibt es aber nur das Feld notes |
|
| 991 |
$form->{notes} = $form->{intnotes} if $saved_variables{oldcustomer} ne $form->{customer};
|
|
| 988 | 992 |
|
| 989 | 993 |
$form->{AR} = $saved_variables{AR};
|
| 990 | 994 |
if ($saved_variables{AR_amount_1} =~ m/.--./) {
|
Auch abrufbar als: Unified diff
Bug 1429 behoben
Bei Wechsel eines Debitoren bei Debitorenrechnungen wird Bemerkungsfeld mit den
internen Bemerkungen des Kunden gefüllt.