Revision be6f6cfd
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
| bin/mozilla/io.pl | ||
|---|---|---|
| 489 | 489 |
qw(bin listprice inventory_accno income_accno expense_accno unit weight |
| 490 | 490 |
assembly taxaccounts partsgroup formel longdescription not_discountable |
| 491 | 491 |
part_payment_id partnotes id lastcost price_factor_id price_factor); |
| 492 |
push @new_fields, "lizenzen" if ($main::lizenzen);
|
|
| 492 |
push @new_fields, "lizenzen" if $::lx_office_conf{system}->{lizenzen};
|
|
| 493 | 493 |
push @new_fields, grep { m/^ic_cvar_/ } keys %{ $form->{item_list}->[0] };
|
| 494 | 494 |
|
| 495 | 495 |
my $i = 0; |
| ... | ... | |
| 497 | 497 |
foreach my $ref (@{ $form->{item_list} }) {
|
| 498 | 498 |
my $checked = ($i++) ? "" : "checked"; |
| 499 | 499 |
|
| 500 |
if ($main::lizenzen) {
|
|
| 500 |
if ($::lx_office_conf{system}->{lizenzen}) {
|
|
| 501 | 501 |
if ($ref->{inventory_accno} > 0) {
|
| 502 | 502 |
$ref->{"lizenzen"} = qq|<option></option>|;
|
| 503 | 503 |
foreach my $item (@{ $form->{LIZENZEN}{ $ref->{"id"} } }) {
|
| ... | ... | |
| 622 | 622 |
$form->{payment_id} = $form->{"part_payment_id_$i"};
|
| 623 | 623 |
} |
| 624 | 624 |
|
| 625 |
if ($main::lizenzen) {
|
|
| 625 |
if ($::lx_office_conf{system}->{lizenzen}) {
|
|
| 626 | 626 |
map { $form->{"${_}_$i"} = $form->{"new_${_}_$j"} } qw(lizenzen);
|
| 627 | 627 |
} |
| 628 | 628 |
|
| ... | ... | |
| 937 | 937 |
my $script = $form->{"script"};
|
| 938 | 938 |
$script =~ s|.*/||; |
| 939 | 939 |
$script =~ s|.pl$||; |
| 940 |
$locale = new Locale($main::language, $script);
|
|
| 940 |
$locale = new Locale($::lx_office_conf{system}->{language}, $script);
|
|
| 941 | 941 |
|
| 942 | 942 |
map { $form->{"select$_"} = "" } ($form->{vc}, "currency");
|
| 943 | 943 |
|
Auch abrufbar als: Unified diff
Globale Variablen für Systemeinstellungen und Features nach %::lx_office_conf verschoben
Betroffen sind:
$webdav
$vertreter
$lizenzen
$show_best_before
$parts_show_image
$parts_image_css
$parts_listing_images
$eur
$dbcharset
$language