Revision 152cf512
Von Rolf Fluehmann vor mehr als 8 Jahren hinzugefügt
bin/mozilla/am.pl | ||
---|---|---|
45 | 45 |
use SL::DB::Printer; |
46 | 46 |
use SL::DB::Tax; |
47 | 47 |
use SL::DB::Language; |
48 |
use SL::DB::Default; |
|
48 | 49 |
use CGI; |
49 | 50 |
|
50 | 51 |
require "bin/mozilla/common.pl"; |
... | ... | |
87 | 88 |
|
88 | 89 |
my $form = $main::form; |
89 | 90 |
my %myconfig = %main::myconfig; |
91 |
my $defaults = SL::DB::Default->get; |
|
90 | 92 |
|
91 | 93 |
$main::auth->assert('config'); |
92 | 94 |
|
93 | 95 |
$form->{title} = "Edit"; |
96 |
$form->{feature_balance} = $defaults->feature_balance; |
|
97 |
$form->{feature_datev} = $defaults->feature_datev; |
|
98 |
$form->{feature_erfolgsrechnung} = $defaults->feature_erfolgsrechnung; |
|
99 |
$form->{feature_eurechnung} = $defaults->feature_eurechnung; |
|
100 |
$form->{feature_ustva} = $defaults->feature_ustva; |
|
101 |
|
|
94 | 102 |
AM->get_account(\%myconfig, \%$form); |
95 | 103 |
|
96 | 104 |
foreach my $item (split(/:/, $form->{link})) { |
Auch abrufbar als: Unified diff
featured form-objects visible/unvisible