Revision f3f2ec38
Von Moritz Bunkus vor fast 8 Jahren hinzugefügt
bin/mozilla/dn.pl | ||
---|---|---|
36 | 36 |
|
37 | 37 |
use SL::IS; |
38 | 38 |
use SL::DN; |
39 |
use SL::DB::Department; |
|
39 | 40 |
use SL::DB::Dunning; |
40 | 41 |
use SL::Helper::Flash qw(flash); |
41 | 42 |
use SL::Locale::String qw(t8); |
... | ... | |
98 | 99 |
|
99 | 100 |
$main::auth->assert('dunning_edit'); |
100 | 101 |
|
101 |
# setup customer selection |
|
102 |
$form->all_vc(\%myconfig, "customer", "AR"); |
|
103 |
|
|
104 | 102 |
DN->get_config(\%myconfig, \%$form); |
105 | 103 |
|
106 |
$form->{SHOW_CUSTOMER_SELECTION} = $form->{all_customer} && scalar @{ $form->{all_customer} }; |
|
107 | 104 |
$form->{SHOW_DUNNING_LEVEL_SELECTION} = $form->{DUNNING} && scalar @{ $form->{DUNNING} }; |
108 | 105 |
$form->{SHOW_DEPARTMENT_SELECTION} = $form->{all_departments} && scalar @{ $form->{all_departments} || [] }; |
109 | 106 |
|
templates/webpages/dunning/add.html | ||
---|---|---|
8 | 8 |
<tr> |
9 | 9 |
<th align="right">[% 'Customer' | $T8 %]</th> |
10 | 10 |
<td colspan="3"> |
11 |
[% IF SHOW_CUSTOMER_SELECTION %] |
|
12 |
<select name="customer" class="initial_focus"> |
|
13 |
<option></option> |
|
14 |
[% FOREACH row = all_customer %]<option>[% HTML.escape(row.name) %]--[% HTML.escape(row.id) %]</option>[% END %] |
|
15 |
</select> |
|
16 |
[% ELSE %] |
|
17 | 11 |
<input name="customer" size="35" class="initial_focus"> |
18 |
[% END %] |
|
19 | 12 |
</td> |
20 | 13 |
</tr> |
21 | 14 |
|
... | ... | |
31 | 24 |
</tr> |
32 | 25 |
[% END %] |
33 | 26 |
|
34 |
[% IF SHOW_DEPARTMENT_SELECTION %] |
|
35 |
<tr> |
|
36 |
<th align="right">[% 'Department' | $T8 %]</th> |
|
37 |
<td colspan="3"> |
|
38 |
<select name="department"> |
|
39 |
<option></option> |
|
40 |
[% FOREACH row = all_departments %]<option>[% HTML.escape(row.description) %]--[% HTML.escape(row.id) %]</option>[% END %] |
|
41 |
</select> |
|
42 |
</td> |
|
43 |
</tr> |
|
44 |
[% END %] |
|
45 |
|
|
46 | 27 |
<tr> |
47 | 28 |
<th align="right" nowrap>[% 'Invoice Number' | $T8 %]</th> |
48 | 29 |
<td colspan="3"><input name="invnumber" size="20"></td> |
Auch abrufbar als: Unified diff
Mahnungen: $form->all_vc nicht mehr verwenden