Revision f612f63e
Von Moritz Bunkus vor etwa 12 Jahren hinzugefügt
| bin/mozilla/ap.pl | ||
|---|---|---|
| 153 | 153 |
# build the popup menus |
| 154 | 154 |
$form->{taxincluded} = ($form->{id}) ? $form->{taxincluded} : "checked";
|
| 155 | 155 |
|
| 156 |
# notes |
|
| 157 |
$form->{notes} = $form->{intnotes} unless $form->{notes};
|
|
| 158 |
|
|
| 159 | 156 |
# currencies |
| 160 | 157 |
$form->{defaultcurrency} = $form->get_default_currency(\%myconfig);
|
| 161 | 158 |
|
| ... | ... | |
| 287 | 284 |
} |
| 288 | 285 |
my $notes = |
| 289 | 286 |
qq|<textarea name=notes rows=$rows cols=50 wrap=soft $readonly>$form->{notes}</textarea>|;
|
| 287 |
my $intnotes = qq|<textarea name=intnotes rows=$rows cols=50 wrap=soft readonly>$form->{intnotes}</textarea>|;
|
|
| 290 | 288 |
|
| 291 | 289 |
my $department; |
| 292 | 290 |
$department = qq| |
| ... | ... | |
| 627 | 625 |
<tr> |
| 628 | 626 |
<th align=left width=1%>| . $locale->text('Notes') . qq|</th>
|
| 629 | 627 |
<td align=left>$notes</td> |
| 628 |
|
|
| 629 |
<th align=left width=1%>| . $locale->text('Notes for vendor') . qq|</th>
|
|
| 630 |
<td align=left>$intnotes</td> |
|
| 630 | 631 |
</tr> |
| 631 | 632 |
</table> |
| 632 | 633 |
</td> |
| ... | ... | |
| 929 | 930 |
$form->{exchangerate} = $form->{forex} if $form->{forex};
|
| 930 | 931 |
|
| 931 | 932 |
$form->{invdate} = $form->{transdate};
|
| 932 |
my %saved_variables = map +( $_ => $form->{$_} ), qw(AP AP_amount_1 taxchart_1);
|
|
| 933 |
my %saved_variables = map +( $_ => $form->{$_} ), qw(AP AP_amount_1 taxchart_1 notes);
|
|
| 933 | 934 |
|
| 934 | 935 |
my $vendor_changed = &check_name("vendor");
|
| 935 | 936 |
|
| ... | ... | |
| 966 | 967 |
$form->{oldinvtotal} = $form->{invtotal};
|
| 967 | 968 |
$form->{oldtotalpaid} = $totalpaid;
|
| 968 | 969 |
|
| 969 |
# notes |
|
| 970 |
$form->{notes} = $form->{intnotes} if $vendor_changed;
|
|
| 971 |
|
|
| 972 | 970 |
&display_form; |
| 973 | 971 |
|
| 974 | 972 |
$main::lxdebug->leave_sub(); |
Auch abrufbar als: Unified diff
Debitoren-, Kreditorenbuchungen: K/L-Bemerkungen als Extra-Feld anzeigen, nicht in normale Bemerkungen kopieren
Fixt #1858.